| ofs | hex dump | ascii |
|---|---|---|
| 0000 | 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 32 30 32 33 31 32 32 30 2e 31 35 31 35 2f 00 00 00 00 | org-web-tools-20231220.1515/.... |
| 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 33 35 30 30 00 20 35 00 00 00 | 0000000.00000000000.013500..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 | 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 32 30 32 33 31 32 32 30 2e 31 35 31 35 2f 6f 72 67 2d | org-web-tools-20231220.1515/org- |
| 0220 | 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 | web-tools-archive.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 34 36 32 33 37 00 30 30 30 30 30 30 30 30 30 30 30 00 30 32 30 31 35 35 00 20 30 00 00 00 | 0046237.00000000000.020155..0... |
| 02a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 02c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 02e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0300 | 00 75 73 74 61 72 20 20 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .ustar...root................... |
| 0320 | 00 00 00 00 00 00 00 00 00 72 6f 6f 74 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | .........root................... |
| 0340 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0360 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 03a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 03c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 03e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 0400 | 3b 3b 3b 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2e 65 6c 20 2d 2d 2d | ;;;.org-web-tools-archive.el.--- |
| 0420 | 20 54 6f 6f 6c 73 20 66 6f 72 20 61 72 63 68 69 76 65 2e 69 73 20 20 2d 2a 2d 20 6c 65 78 69 63 | .Tools.for.archive.is..-*-.lexic |
| 0440 | 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 74 20 2d 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 | al-binding:.t.-*-..;;.Copyright. |
| 0460 | 28 43 29 20 32 30 31 38 2d 32 30 32 33 20 20 41 64 61 6d 20 50 6f 72 74 65 72 0a 0a 3b 3b 20 41 | (C).2018-2023..Adam.Porter..;;.A |
| 0480 | 75 74 68 6f 72 3a 20 41 64 61 6d 20 50 6f 72 74 65 72 20 3c 61 64 61 6d 40 61 6c 70 68 61 70 61 | uthor:.Adam.Porter.<adam@alphapa |
| 04a0 | 70 61 2e 6e 65 74 3e 0a 3b 3b 20 55 72 6c 3a 20 68 74 74 70 3a 2f 2f 67 69 74 68 75 62 2e 63 6f | pa.net>.;;.Url:.http://github.co |
| 04c0 | 6d 2f 61 6c 70 68 61 70 61 70 61 2f 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 0a 0a 3b 3b 3b 20 43 | m/alphapapa/org-web-tools..;;;.C |
| 04e0 | 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 63 6f 6e 74 61 69 6e | ommentary:..;;.This.file.contain |
| 0500 | 73 20 63 6f 64 65 20 66 6f 72 20 72 65 74 72 69 65 76 69 6e 67 20 61 72 63 68 69 76 65 64 20 63 | s.code.for.retrieving.archived.c |
| 0520 | 6f 6e 74 65 6e 74 20 66 72 6f 6d 20 61 72 63 68 69 76 65 2e 69 73 2e 0a 0a 3b 3b 3b 20 4c 69 63 | ontent.from.archive.is...;;;.Lic |
| 0540 | 65 6e 73 65 3a 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 66 72 65 65 20 73 | ense:..;;.This.program.is.free.s |
| 0560 | 6f 66 74 77 61 72 65 3b 20 79 6f 75 20 63 61 6e 20 72 65 64 69 73 74 72 69 62 75 74 65 20 69 74 | oftware;.you.can.redistribute.it |
| 0580 | 20 61 6e 64 2f 6f 72 20 6d 6f 64 69 66 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 | .and/or.modify.;;.it.under.the.t |
| 05a0 | 65 72 6d 73 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c | erms.of.the.GNU.General.Public.L |
| 05c0 | 69 63 65 6e 73 65 20 61 73 20 70 75 62 6c 69 73 68 65 64 20 62 79 0a 3b 3b 20 74 68 65 20 46 72 | icense.as.published.by.;;.the.Fr |
| 05e0 | 65 65 20 53 6f 66 74 77 61 72 65 20 46 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 | ee.Software.Foundation,.either.v |
| 0600 | 65 72 73 69 6f 6e 20 33 20 6f 66 20 74 68 65 20 4c 69 63 65 6e 73 65 2c 20 6f 72 0a 3b 3b 20 28 | ersion.3.of.the.License,.or.;;.( |
| 0620 | 61 74 20 79 6f 75 72 20 6f 70 74 69 6f 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f | at.your.option).any.later.versio |
| 0640 | 6e 2e 0a 0a 3b 3b 20 54 68 69 73 20 70 72 6f 67 72 61 6d 20 69 73 20 64 69 73 74 72 69 62 75 74 | n...;;.This.program.is.distribut |
| 0660 | 65 64 20 69 6e 20 74 68 65 20 68 6f 70 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 | ed.in.the.hope.that.it.will.be.u |
| 0680 | 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e | seful,.;;.but.WITHOUT.ANY.WARRAN |
| 06a0 | 54 59 3b 20 77 69 74 68 6f 75 74 20 65 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 | TY;.without.even.the.implied.war |
| 06c0 | 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 | ranty.of.;;.MERCHANTABILITY.or.F |
| 06e0 | 49 54 4e 45 53 53 20 46 4f 52 20 41 20 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e | ITNESS.FOR.A.PARTICULAR.PURPOSE. |
| 0700 | 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 | ..See.the.;;.GNU.General.Public. |
| 0720 | 4c 69 63 65 6e 73 65 20 66 6f 72 20 6d 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 0a 3b 3b 20 59 6f | License.for.more.details...;;.Yo |
| 0740 | 75 20 73 68 6f 75 6c 64 20 68 61 76 65 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 | u.should.have.received.a.copy.of |
| 0760 | 20 74 68 65 20 47 4e 55 20 47 65 6e 65 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a | .the.GNU.General.Public.License. |
| 0780 | 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 20 74 68 69 73 20 70 72 6f 67 72 61 6d 2e 20 20 49 66 20 | ;;.along.with.this.program...If. |
| 07a0 | 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 70 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 | not,.see.<http://www.gnu.org/lic |
| 07c0 | 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b 20 43 6f 64 65 3a 0a 0a 3b 3b 20 54 4f 44 4f 3a 20 41 64 | enses/>...;;;.Code:..;;.TODO:.Ad |
| 07e0 | 64 20 6e 65 77 20 6f 72 67 20 6c 69 6e 6b 20 74 79 70 65 20 22 61 74 74 61 63 68 6d 65 6e 74 3a | d.new.org.link.type."attachment: |
| 0800 | 22 20 74 68 61 74 20 63 61 6e 20 6c 69 6e 6b 20 74 6f 20 65 6e 74 72 79 20 61 74 74 61 63 68 6d | ".that.can.link.to.entry.attachm |
| 0820 | 65 6e 74 73 2e 0a 0a 3b 3b 3b 3b 20 52 65 71 75 69 72 65 6d 65 6e 74 73 0a 0a 28 72 65 71 75 69 | ents...;;;;.Requirements..(requi |
| 0840 | 72 65 20 27 62 72 6f 77 73 65 2d 75 72 6c 29 0a 28 72 65 71 75 69 72 65 20 27 63 6c 2d 6c 69 62 | re.'browse-url).(require.'cl-lib |
| 0860 | 29 0a 28 72 65 71 75 69 72 65 20 27 73 65 71 29 0a 28 72 65 71 75 69 72 65 20 27 73 75 62 72 2d | ).(require.'seq).(require.'subr- |
| 0880 | 78 29 0a 28 72 65 71 75 69 72 65 20 27 75 72 6c 2d 68 61 6e 64 6c 65 72 73 29 0a 28 72 65 71 75 | x).(require.'url-handlers).(requ |
| 08a0 | 69 72 65 20 27 75 72 6c 2d 75 74 69 6c 29 0a 0a 28 72 65 71 75 69 72 65 20 27 6f 72 67 2d 61 74 | ire.'url-util)..(require.'org-at |
| 08c0 | 74 61 63 68 29 0a 0a 28 72 65 71 75 69 72 65 20 27 64 61 73 68 29 0a 28 72 65 71 75 69 72 65 20 | tach)..(require.'dash).(require. |
| 08e0 | 27 65 73 78 6d 6c 2d 71 75 65 72 79 29 0a 28 72 65 71 75 69 72 65 20 27 72 65 71 75 65 73 74 29 | 'esxml-query).(require.'request) |
| 0900 | 0a 0a 28 72 65 71 75 69 72 65 20 27 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 29 0a 0a 3b 3b 3b 3b | ..(require.'org-web-tools)..;;;; |
| 0920 | 20 56 61 72 69 61 62 6c 65 73 0a 0a 28 64 65 66 76 61 72 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c | .Variables..(defvar.org-web-tool |
| 0940 | 73 2d 61 72 63 68 69 76 65 2d 64 65 62 75 67 2d 6c 65 76 65 6c 20 6e 69 6c 0a 20 20 22 53 65 65 | s-archive-debug-level.nil..."See |
| 0960 | 20 60 72 65 71 75 65 73 74 2d 6c 6f 67 2d 6c 65 76 65 6c 27 2e 22 29 0a 0a 28 64 65 66 76 61 72 | .`request-log-level'.")..(defvar |
| 0980 | 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 74 74 61 63 68 2d 75 72 6c 2d 61 72 63 68 69 76 | .org-web-tools-attach-url-archiv |
| 09a0 | 65 2d 61 74 74 65 6d 70 74 73 20 30 0a 20 20 22 43 75 72 72 65 6e 74 20 6e 75 6d 62 65 72 20 6f | e-attempts.0..."Current.number.o |
| 09c0 | 66 20 61 74 74 65 6d 70 74 73 20 69 6e 20 61 20 72 65 74 72 79 20 63 68 61 69 6e 2e 22 29 0a 0a | f.attempts.in.a.retry.chain.").. |
| 09e0 | 28 64 65 66 76 61 72 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 74 74 61 63 68 2d 75 72 6c | (defvar.org-web-tools-attach-url |
| 0a00 | 2d 61 72 63 68 69 76 65 2d 61 74 74 65 6d 70 74 65 64 2d 66 6e 73 20 6e 69 6c 0a 20 20 22 46 75 | -archive-attempted-fns.nil..."Fu |
| 0a20 | 6e 63 74 69 6f 6e 73 20 75 73 65 64 20 74 6f 20 61 74 74 65 6d 70 74 20 61 72 63 68 69 76 65 20 | nctions.used.to.attempt.archive. |
| 0a40 | 64 6f 77 6e 6c 6f 61 64 2e 22 29 0a 0a 3b 3b 3b 3b 20 43 75 73 74 6f 6d 69 7a 61 74 69 6f 6e 0a | download.")..;;;;.Customization. |
| 0a60 | 0a 28 64 65 66 67 72 6f 75 70 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 | .(defgroup.org-web-tools-archive |
| 0a80 | 20 6e 69 6c 0a 20 20 22 4f 70 74 69 6f 6e 73 20 66 6f 72 20 61 72 63 68 69 76 69 6e 67 20 63 6f | .nil..."Options.for.archiving.co |
| 0aa0 | 6d 6d 61 6e 64 73 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 | mmands."...:group.'org-web-tools |
| 0ac0 | 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 | )..(defcustom.org-web-tools-arch |
| 0ae0 | 69 76 65 2d 68 6f 73 74 6e 61 6d 65 20 22 61 72 63 68 69 76 65 2e 74 6f 64 61 79 22 0a 20 20 22 | ive-hostname."archive.today"..." |
| 0b00 | 44 6f 6d 61 69 6e 20 6e 61 6d 65 20 74 6f 20 6d 61 6b 65 20 72 65 71 75 65 73 74 73 20 66 6f 72 | Domain.name.to.make.requests.for |
| 0b20 | 20 5c 22 61 72 63 68 69 76 65 2e 69 73 5c 22 20 74 6f 2e 0a 54 68 65 20 73 65 72 76 69 63 65 20 | .\"archive.is\".to..The.service. |
| 0b40 | 72 65 64 69 72 65 63 74 73 20 74 6f 20 76 61 72 69 6f 75 73 20 64 6f 6d 61 69 6e 73 2e 22 0a 20 | redirects.to.various.domains.".. |
| 0b60 | 20 3a 74 79 70 65 20 27 73 74 72 69 6e 67 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 6f 72 67 2d | .:type.'string)..(defcustom.org- |
| 0b80 | 77 65 62 2d 74 6f 6f 6c 73 2d 61 74 74 61 63 68 2d 61 72 63 68 69 76 65 2d 72 65 74 72 79 20 31 | web-tools-attach-archive-retry.1 |
| 0ba0 | 35 0a 20 20 22 52 65 74 72 79 20 61 74 74 61 63 68 69 6e 67 20 61 72 63 68 69 76 65 73 20 74 68 | 5..."Retry.attaching.archives.th |
| 0bc0 | 61 74 20 61 72 65 6e 27 74 20 79 65 74 20 61 76 61 69 6c 61 62 6c 65 2e 22 0a 20 20 3a 74 79 70 | at.aren't.yet.available."...:typ |
| 0be0 | 65 20 27 28 63 68 6f 69 63 65 20 28 69 6e 74 65 67 65 72 20 3a 74 61 67 20 22 52 65 74 72 79 20 | e.'(choice.(integer.:tag."Retry. |
| 0c00 | 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 20 61 66 74 65 72 20 4e 20 73 65 63 6f 6e 64 73 22 29 | asynchronously.after.N.seconds") |
| 0c20 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 44 | ..................(const.:tag."D |
| 0c40 | 6f 6e 27 74 20 72 65 74 72 79 2c 20 6a 75 73 74 20 67 69 76 65 20 61 6e 20 65 72 72 6f 72 22 20 | on't.retry,.just.give.an.error". |
| 0c60 | 6e 69 6c 29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 | nil)))..(defcustom.org-web-tools |
| 0c80 | 2d 61 74 74 61 63 68 2d 61 72 63 68 69 76 65 2d 6d 61 78 2d 61 74 74 65 6d 70 74 73 20 36 0a 20 | -attach-archive-max-attempts.6.. |
| 0ca0 | 20 22 4e 75 6d 62 65 72 20 6f 66 20 74 69 6d 65 73 20 74 6f 20 74 72 79 20 74 6f 20 61 74 74 61 | ."Number.of.times.to.try.to.atta |
| 0cc0 | 63 68 20 61 72 63 68 69 76 65 73 20 61 73 79 6e 63 68 72 6f 6e 6f 75 73 6c 79 2e 0a 49 66 20 79 | ch.archives.asynchronously..If.y |
| 0ce0 | 6f 75 20 75 73 65 20 61 72 63 68 69 76 65 2e 69 73 2c 20 69 74 20 6f 66 74 65 6e 20 72 65 71 75 | ou.use.archive.is,.it.often.requ |
| 0d00 | 69 72 65 73 20 61 20 6d 69 6e 75 74 65 20 6f 72 20 74 77 6f 20 74 6f 20 66 75 6c 6c 79 0a 61 72 | ires.a.minute.or.two.to.fully.ar |
| 0d20 | 63 68 69 76 65 20 61 20 70 61 67 65 2c 20 73 6f 20 63 6f 6e 73 69 64 65 72 20 74 68 65 20 6e 75 | chive.a.page,.so.consider.the.nu |
| 0d40 | 6d 62 65 72 20 6f 66 20 73 65 63 6f 6e 64 73 20 73 65 74 20 69 6e 0a 60 6f 72 67 2d 77 65 62 2d | mber.of.seconds.set.in.`org-web- |
| 0d60 | 74 6f 6f 6c 73 2d 61 74 74 61 63 68 2d 61 72 63 68 69 76 65 2d 72 65 74 72 79 27 20 77 68 65 6e | tools-attach-archive-retry'.when |
| 0d80 | 20 73 65 74 74 69 6e 67 20 74 68 69 73 2e 22 0a 20 20 3a 74 79 70 65 20 27 69 6e 74 65 67 65 72 | .setting.this."...:type.'integer |
| 0da0 | 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 74 74 61 | )..(defcustom.org-web-tools-atta |
| 0dc0 | 63 68 2d 61 72 63 68 69 76 65 2d 72 65 74 72 79 2d 66 61 6c 6c 62 61 63 6b 20 27 6f 72 67 2d 77 | ch-archive-retry-fallback.'org-w |
| 0de0 | 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 66 6e 0a 20 20 22 54 72 79 20 6f 74 68 65 72 | eb-tools-archive-fn..."Try.other |
| 0e00 | 20 66 75 6e 63 74 69 6f 6e 73 20 69 66 20 72 65 74 72 79 20 6c 69 6d 69 74 20 69 73 20 65 78 63 | .functions.if.retry.limit.is.exc |
| 0e20 | 65 65 64 65 64 2e 22 0a 20 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65 20 28 63 6f 6e 73 74 20 | eeded."...:type.'(choice.(const. |
| 0e40 | 3a 74 61 67 20 22 4f 74 68 65 72 20 66 75 6e 63 74 69 6f 6e 73 20 69 6e 20 60 6f 72 67 2d 77 65 | :tag."Other.functions.in.`org-we |
| 0e60 | 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 66 6e 27 22 20 6f 72 67 2d 77 65 62 2d 74 6f 6f | b-tools-archive-fn'".org-web-too |
| 0e80 | 6c 73 2d 61 72 63 68 69 76 65 2d 66 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ls-archive-fn).................. |
| 0ea0 | 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 44 6f 6e 27 74 20 74 72 79 20 6f 74 68 65 72 20 66 75 6e | (const.:tag."Don't.try.other.fun |
| 0ec0 | 63 74 69 6f 6e 73 22 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 | ctions".nil)..................(r |
| 0ee0 | 65 70 65 61 74 20 3a 74 61 67 20 22 43 75 73 74 6f 6d 20 66 75 6e 63 74 69 6f 6e 73 22 20 66 75 | epeat.:tag."Custom.functions".fu |
| 0f00 | 6e 63 74 69 6f 6e 29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 6f 72 67 2d 77 65 62 2d 74 6f | nction)))..(defcustom.org-web-to |
| 0f20 | 6f 6c 73 2d 61 72 63 68 69 76 65 2d 66 6e 20 23 27 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 | ols-archive-fn.#'org-web-tools-a |
| 0f40 | 72 63 68 69 76 65 2d 2d 77 67 65 74 2d 74 61 72 0a 20 20 22 46 75 6e 63 74 69 6f 6e 20 75 73 65 | rchive--wget-tar..."Function.use |
| 0f60 | 64 20 74 6f 20 61 72 63 68 69 76 65 20 77 65 62 20 70 61 67 65 73 2e 22 0a 20 20 3a 74 79 70 65 | d.to.archive.web.pages."...:type |
| 0f80 | 20 27 28 63 68 6f 69 63 65 20 28 63 6f 6e 73 74 20 3a 74 61 67 20 22 61 72 63 68 69 76 65 2e 69 | .'(choice.(const.:tag."archive.i |
| 0fa0 | 73 22 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 2d 61 72 63 68 69 76 | s".org-web-tools-archive--archiv |
| 0fc0 | 65 2e 69 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a 74 | e.is)..................(const.:t |
| 0fe0 | 61 67 20 22 77 67 65 74 20 7c 20 74 61 72 20 28 77 69 74 68 20 70 61 67 65 20 72 65 73 6f 75 72 | ag."wget.|.tar.(with.page.resour |
| 1000 | 63 65 73 29 22 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 2d 77 67 65 | ces)".org-web-tools-archive--wge |
| 1020 | 74 2d 74 61 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 74 20 3a | t-tar)..................(const.: |
| 1040 | 74 61 67 20 22 77 67 65 74 20 7c 20 74 61 72 20 28 48 54 4d 4c 20 6f 6e 6c 79 29 22 20 6f 72 67 | tag."wget.|.tar.(HTML.only)".org |
| 1060 | 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 2d 77 67 65 74 2d 74 61 72 2d 68 74 6d | -web-tools-archive--wget-tar-htm |
| 1080 | 6c 2d 6f 6e 6c 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 75 6e 63 74 69 | l-only)..................(functi |
| 10a0 | 6f 6e 20 3a 74 61 67 20 22 43 75 73 74 6f 6d 20 66 75 6e 63 74 69 6f 6e 22 29 29 29 0a 0a 28 64 | on.:tag."Custom.function")))..(d |
| 10c0 | 65 66 63 75 73 74 6f 6d 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 63 | efcustom.org-web-tools-archive-c |
| 10e0 | 6f 6d 70 72 65 73 73 6f 72 20 22 78 7a 22 0a 20 20 22 43 6f 6d 70 72 65 73 73 6f 72 20 66 6f 72 | ompressor."xz"..."Compressor.for |
| 1100 | 20 61 72 63 68 69 76 65 73 20 73 61 76 65 64 20 77 69 74 68 20 57 67 65 74 2e 0a 46 69 6c 65 6e | .archives.saved.with.Wget..Filen |
| 1120 | 61 6d 65 20 65 78 74 65 6e 73 69 6f 6e 20 66 6f 72 20 66 69 6c 65 73 20 6d 61 64 65 20 77 69 74 | ame.extension.for.files.made.wit |
| 1140 | 68 20 74 61 72 2d 63 6f 6d 70 61 74 69 62 6c 65 0a 63 6f 6d 70 72 65 73 73 6f 72 20 28 77 69 74 | h.tar-compatible.compressor.(wit |
| 1160 | 68 6f 75 74 20 5c 22 2e 74 61 72 2e 5c 22 29 2e 20 20 54 61 72 20 77 69 6c 6c 20 63 61 6c 6c 20 | hout.\".tar.\")...Tar.will.call. |
| 1180 | 74 68 65 20 61 70 70 72 6f 70 72 69 61 74 65 0a 70 72 6f 67 72 61 6d 20 66 6f 72 20 74 68 65 20 | the.appropriate.program.for.the. |
| 11a0 | 65 78 74 65 6e 73 69 6f 6e 2e 22 0a 20 20 3a 74 79 70 65 20 27 28 63 68 6f 69 63 65 20 28 63 6f | extension."...:type.'(choice.(co |
| 11c0 | 6e 73 74 20 22 78 7a 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 | nst."xz")..................(cons |
| 11e0 | 74 20 22 62 7a 69 70 32 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e | t."bzip2")..................(con |
| 1200 | 73 74 20 22 67 7a 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e | st."gz")..................(strin |
| 1220 | 67 20 3a 74 61 67 20 22 43 75 73 74 6f 6d 22 29 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 6f | g.:tag."Custom")))..(defcustom.o |
| 1240 | 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 77 67 65 74 2d 6f 70 74 69 6f 6e | rg-web-tools-archive-wget-option |
| 1260 | 73 0a 20 20 28 6c 69 73 74 20 22 2d 2d 69 67 6e 6f 72 65 2d 74 61 67 73 3d 73 63 72 69 70 74 2c | s...(list."--ignore-tags=script, |
| 1280 | 69 66 72 61 6d 65 22 0a 20 20 20 20 20 20 20 20 22 2d 2d 72 65 6a 65 63 74 3d 65 6f 74 2c 74 74 | iframe"........."--reject=eot,tt |
| 12a0 | 66 2c 73 76 67 2c 6f 74 66 2c 2a 2e 77 6f 66 66 2a 22 0a 20 20 20 20 20 20 20 20 22 2d 2d 65 78 | f,svg,otf,*.woff*"........."--ex |
| 12c0 | 65 63 75 74 65 22 20 22 72 6f 62 6f 74 73 3d 6f 66 66 22 0a 20 20 20 20 20 20 20 20 22 2d 2d 61 | ecute"."robots=off"........."--a |
| 12e0 | 64 6a 75 73 74 2d 65 78 74 65 6e 73 69 6f 6e 22 0a 20 20 20 20 20 20 20 20 22 2d 2d 73 70 61 6e | djust-extension"........."--span |
| 1300 | 2d 68 6f 73 74 73 22 0a 20 20 20 20 20 20 20 20 22 2d 2d 63 6f 6e 76 65 72 74 2d 6c 69 6e 6b 73 | -hosts"........."--convert-links |
| 1320 | 22 0a 20 20 20 20 20 20 20 20 22 2d 2d 70 61 67 65 2d 72 65 71 75 69 73 69 74 65 73 22 0a 20 20 | "........."--page-requisites"... |
| 1340 | 20 20 20 20 20 20 22 2d 2d 74 69 6d 65 73 74 61 6d 70 69 6e 67 22 0a 20 20 20 20 20 20 20 20 22 | ......"--timestamping"........." |
| 1360 | 2d 2d 6e 6f 2d 64 69 72 65 63 74 6f 72 69 65 73 22 29 0a 20 20 22 4f 70 74 69 6f 6e 73 20 70 61 | --no-directories")..."Options.pa |
| 1380 | 73 73 65 64 20 74 6f 20 57 67 65 74 2e 0a 4f 70 74 69 6f 6e 73 20 77 68 69 63 68 20 74 61 6b 65 | ssed.to.Wget..Options.which.take |
| 13a0 | 20 61 72 67 75 6d 65 6e 74 73 20 73 68 6f 75 6c 64 20 68 61 76 65 20 74 68 65 20 6f 70 74 69 6f | .arguments.should.have.the.optio |
| 13c0 | 6e 20 61 6e 64 20 61 72 67 75 6d 65 6e 74 0a 70 61 73 73 65 64 20 61 73 20 73 65 70 61 72 61 74 | n.and.argument.passed.as.separat |
| 13e0 | 65 20 73 74 72 69 6e 67 73 2c 20 6f 72 20 77 69 74 68 20 74 68 65 20 61 72 67 75 6d 65 6e 74 20 | e.strings,.or.with.the.argument. |
| 1400 | 73 65 70 61 72 61 74 65 64 20 62 79 0a 5c 22 3d 5c 22 2e 20 20 43 65 72 74 61 69 6e 20 6f 70 74 | separated.by.\"=\"...Certain.opt |
| 1420 | 69 6f 6e 73 20 61 72 65 20 61 64 64 65 64 20 61 75 74 6f 6d 61 74 69 63 61 6c 6c 79 20 74 6f 20 | ions.are.added.automatically.to. |
| 1440 | 66 61 63 69 6c 69 74 61 74 65 0a 73 75 62 73 65 71 75 65 6e 74 20 61 72 63 68 69 76 69 6e 67 2c | facilitate.subsequent.archiving, |
| 1460 | 20 6c 69 6b 65 20 5c 22 2d 2d 64 69 72 65 63 74 6f 72 79 2d 70 72 65 66 69 78 5c 22 3b 20 6f 70 | .like.\"--directory-prefix\";.op |
| 1480 | 74 69 6f 6e 73 20 77 68 69 63 68 0a 64 6f 6e 27 74 20 69 6e 74 65 72 66 65 72 65 20 77 69 74 68 | tions.which.don't.interfere.with |
| 14a0 | 20 74 68 61 74 20 61 72 65 20 73 61 66 65 20 74 6f 20 61 64 64 20 68 65 72 65 2e 22 0a 20 20 3a | .that.are.safe.to.add.here."...: |
| 14c0 | 74 79 70 65 20 27 28 72 65 70 65 61 74 20 73 74 72 69 6e 67 29 29 0a 0a 28 64 65 66 63 75 73 74 | type.'(repeat.string))..(defcust |
| 14e0 | 6f 6d 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 77 67 65 74 2d 68 74 | om.org-web-tools-archive-wget-ht |
| 1500 | 6d 6c 2d 6f 6e 6c 79 2d 6f 70 74 69 6f 6e 73 0a 20 20 28 6c 69 73 74 20 22 2d 2d 65 78 65 63 75 | ml-only-options...(list."--execu |
| 1520 | 74 65 20 72 6f 62 6f 74 73 3d 6f 66 66 22 0a 20 20 20 20 20 20 20 20 22 2d 2d 61 64 6a 75 73 74 | te.robots=off"........."--adjust |
| 1540 | 2d 65 78 74 65 6e 73 69 6f 6e 22 0a 20 20 20 20 20 20 20 20 22 2d 2d 74 69 6d 65 73 74 61 6d 70 | -extension"........."--timestamp |
| 1560 | 69 6e 67 22 0a 20 20 20 20 20 20 20 20 22 2d 2d 6e 6f 2d 64 69 72 65 63 74 6f 72 69 65 73 22 29 | ing"........."--no-directories") |
| 1580 | 0a 20 20 22 4f 70 74 69 6f 6e 73 20 70 61 73 73 65 64 20 74 6f 20 57 67 65 74 20 77 68 65 6e 20 | ..."Options.passed.to.Wget.when. |
| 15a0 | 6f 6e 6c 79 20 64 6f 77 6e 6c 6f 61 64 69 6e 67 20 48 54 4d 4c 2e 0a 4f 70 74 69 6f 6e 73 20 77 | only.downloading.HTML..Options.w |
| 15c0 | 68 69 63 68 20 74 61 6b 65 20 61 72 67 75 6d 65 6e 74 73 20 73 68 6f 75 6c 64 20 68 61 76 65 20 | hich.take.arguments.should.have. |
| 15e0 | 74 68 65 20 6f 70 74 69 6f 6e 20 61 6e 64 20 61 72 67 75 6d 65 6e 74 0a 70 61 73 73 65 64 20 61 | the.option.and.argument.passed.a |
| 1600 | 73 20 73 65 70 61 72 61 74 65 20 73 74 72 69 6e 67 73 2c 20 6f 72 20 77 69 74 68 20 74 68 65 20 | s.separate.strings,.or.with.the. |
| 1620 | 61 72 67 75 6d 65 6e 74 20 73 65 70 61 72 61 74 65 64 20 62 79 0a 5c 22 3d 5c 22 2e 20 20 43 65 | argument.separated.by.\"=\"...Ce |
| 1640 | 72 74 61 69 6e 20 6f 70 74 69 6f 6e 73 20 61 72 65 20 61 64 64 65 64 20 61 75 74 6f 6d 61 74 69 | rtain.options.are.added.automati |
| 1660 | 63 61 6c 6c 79 20 74 6f 20 66 61 63 69 6c 69 74 61 74 65 0a 73 75 62 73 65 71 75 65 6e 74 20 61 | cally.to.facilitate.subsequent.a |
| 1680 | 72 63 68 69 76 69 6e 67 2c 20 6c 69 6b 65 20 5c 22 2d 2d 64 69 72 65 63 74 6f 72 79 2d 70 72 65 | rchiving,.like.\"--directory-pre |
| 16a0 | 66 69 78 5c 22 3b 20 6f 70 74 69 6f 6e 73 20 77 68 69 63 68 0a 64 6f 6e 27 74 20 69 6e 74 65 72 | fix\";.options.which.don't.inter |
| 16c0 | 66 65 72 65 20 77 69 74 68 20 74 68 61 74 20 61 72 65 20 73 61 66 65 20 74 6f 20 61 64 64 20 68 | fere.with.that.are.safe.to.add.h |
| 16e0 | 65 72 65 2e 22 0a 20 20 3a 74 79 70 65 20 27 28 72 65 70 65 61 74 20 73 74 72 69 6e 67 29 29 0a | ere."...:type.'(repeat.string)). |
| 1700 | 0a 3b 3b 3b 3b 20 43 6f 6d 6d 61 6e 64 73 0a 0a 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f | .;;;;.Commands..(declare-functio |
| 1720 | 6e 20 61 72 63 68 69 76 65 2d 66 69 6e 64 2d 74 79 70 65 20 22 61 72 63 2d 6d 6f 64 65 22 29 0a | n.archive-find-type."arc-mode"). |
| 1740 | 28 64 65 63 6c 61 72 65 2d 66 75 6e 63 74 69 6f 6e 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d | (declare-function.org-web-tools- |
| 1760 | 2d 72 65 61 64 2d 75 72 6c 20 22 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 22 29 0a 0a 3b 3b 3b 23 | -read-url."org-web-tools")..;;;# |
| 1780 | 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d | ##autoload.(defun.org-web-tools- |
| 17a0 | 61 72 63 68 69 76 65 2d 61 74 74 61 63 68 20 28 75 72 6c 20 26 6f 70 74 69 6f 6e 61 6c 20 63 68 | archive-attach.(url.&optional.ch |
| 17c0 | 6f 6f 73 65 2d 66 6e 2d 70 20 76 69 65 77 29 0a 20 20 22 44 6f 77 6e 6c 6f 61 64 20 61 72 63 68 | oose-fn-p.view)..."Download.arch |
| 17e0 | 69 76 65 20 6f 66 20 70 61 67 65 20 61 74 20 55 52 4c 20 61 6e 64 20 61 74 74 61 63 68 20 77 69 | ive.of.page.at.URL.and.attach.wi |
| 1800 | 74 68 20 60 6f 72 67 2d 61 74 74 61 63 68 27 2e 0a 49 66 20 43 48 4f 4f 53 45 2d 46 4e 2d 50 20 | th.`org-attach'..If.CHOOSE-FN-P. |
| 1820 | 69 73 20 6e 6f 6e 2d 6e 69 6c 20 28 69 6e 74 65 72 61 63 74 69 76 65 6c 79 2c 20 77 69 74 68 20 | is.non-nil.(interactively,.with. |
| 1840 | 75 6e 69 76 65 72 73 61 6c 20 70 72 65 66 69 78 29 2c 0a 70 72 6f 6d 70 74 20 66 6f 72 20 74 68 | universal.prefix),.prompt.for.th |
| 1860 | 65 20 61 72 63 68 69 76 65 20 66 75 6e 63 74 69 6f 6e 20 74 6f 20 75 73 65 2e 20 20 49 66 20 56 | e.archive.function.to.use...If.V |
| 1880 | 49 45 57 20 69 73 0a 6e 6f 6e 2d 6e 69 6c 20 28 69 6e 74 65 72 61 63 74 69 76 65 6c 79 2c 20 77 | IEW.is.non-nil.(interactively,.w |
| 18a0 | 69 74 68 20 74 77 6f 20 75 6e 69 76 65 72 73 61 6c 20 70 72 65 66 69 78 65 73 29 2c 20 76 69 65 | ith.two.universal.prefixes),.vie |
| 18c0 | 77 20 74 68 65 0a 61 72 63 68 69 76 65 20 69 6d 6d 65 64 69 61 74 65 6c 79 20 61 66 74 65 72 20 | w.the.archive.immediately.after. |
| 18e0 | 61 74 74 61 63 68 69 6e 67 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 28 6c 69 73 74 | attaching."...(interactive.(list |
| 1900 | 20 28 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 72 65 61 64 2d 75 72 6c 29 0a 20 20 20 20 20 | .(org-web-tools--read-url)...... |
| 1920 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d 61 | ................current-prefix-a |
| 1940 | 72 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 3e 20 28 70 72 65 66 | rg......................(>.(pref |
| 1960 | 69 78 2d 6e 75 6d 65 72 69 63 2d 76 61 6c 75 65 20 63 75 72 72 65 6e 74 2d 70 72 65 66 69 78 2d | ix-numeric-value.current-prefix- |
| 1980 | 61 72 67 29 20 34 29 29 29 0a 20 20 28 6c 65 74 20 28 28 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 | arg).4)))...(let.((org-web-tools |
| 19a0 | 2d 61 72 63 68 69 76 65 2d 66 6e 20 28 69 66 20 63 68 6f 6f 73 65 2d 66 6e 2d 70 0a 20 20 20 20 | -archive-fn.(if.choose-fn-p..... |
| 19c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 19e0 | 20 20 28 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 2d 63 68 6f 6f 73 65 | ..(org-web-tools-archive--choose |
| 1a00 | 2d 61 72 63 68 69 76 65 2d 66 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -archive-fn).................... |
| 1a20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 | .................org-web-tools-a |
| 1a40 | 72 63 68 69 76 65 2d 66 6e 29 29 29 0a 20 20 20 20 28 70 63 61 73 65 2d 65 78 68 61 75 73 74 69 | rchive-fn))).....(pcase-exhausti |
| 1a60 | 76 65 20 28 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 74 74 61 63 68 2d 75 72 6c 2d 61 72 63 | ve.(org-web-tools-attach-url-arc |
| 1a80 | 68 69 76 65 2d 2d 31 20 75 72 6c 29 0a 20 20 20 20 20 20 28 28 61 6e 64 20 28 70 72 65 64 20 73 | hive--1.url).......((and.(pred.s |
| 1aa0 | 74 72 69 6e 67 70 29 20 73 69 7a 65 29 0a 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 41 | tringp).size)........(message."A |
| 1ac0 | 74 74 61 63 68 65 64 20 25 73 20 61 72 63 68 69 76 65 20 6f 66 20 25 73 25 73 22 20 73 69 7a 65 | ttached.%s.archive.of.%s%s".size |
| 1ae0 | 20 75 72 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 20 6f 72 67 2d 77 65 62 | .url.................(if.org-web |
| 1b00 | 2d 74 6f 6f 6c 73 2d 61 74 74 61 63 68 2d 75 72 6c 2d 61 72 63 68 69 76 65 2d 61 74 74 65 6d 70 | -tools-attach-url-archive-attemp |
| 1b20 | 74 65 64 2d 66 6e 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 | ted-fns.....................(for |
| 1b40 | 6d 61 74 20 22 20 28 72 65 74 72 69 65 64 20 77 69 74 68 20 66 75 6e 63 74 69 6f 6e 20 25 73 29 | mat.".(retried.with.function.%s) |
| 1b60 | 22 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 66 6e 29 0a 20 20 20 20 | ".org-web-tools-archive-fn)..... |
| 1b80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 22 29 29 0a 20 20 20 20 20 20 20 28 77 68 65 6e 20 | ..............""))........(when. |
| 1ba0 | 76 69 65 77 0a 20 20 20 20 20 20 20 20 20 3b 3b 20 54 4f 44 4f 3a 20 50 61 73 73 20 74 68 65 20 | view..........;;.TODO:.Pass.the. |
| 1bc0 | 66 69 6c 65 6e 61 6d 65 20 64 69 72 65 63 74 6c 79 20 69 6e 20 63 61 73 65 20 6f 66 20 6d 75 6c | filename.directly.in.case.of.mul |
| 1be0 | 74 69 70 6c 65 20 61 74 74 61 63 68 6d 65 6e 74 73 2c 20 73 6f 20 74 68 65 20 75 73 65 72 20 64 | tiple.attachments,.so.the.user.d |
| 1c00 | 6f 65 73 6e 27 74 20 68 61 76 65 20 74 6f 20 70 69 63 6b 20 74 68 65 20 72 69 67 68 74 20 6f 6e | oesn't.have.to.pick.the.right.on |
| 1c20 | 65 2e 0a 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 56 49 45 57 49 4e 47 22 29 0a | e...........(message."VIEWING"). |
| 1c40 | 20 20 20 20 20 20 20 20 20 28 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d | .........(org-web-tools-archive- |
| 1c60 | 76 69 65 77 29 29 29 0a 20 20 20 20 20 20 28 27 72 65 74 72 79 69 6e 67 20 28 6d 65 73 73 61 67 | view))).......('retrying.(messag |
| 1c80 | 65 20 22 41 72 63 68 69 76 65 20 6e 6f 74 20 79 65 74 20 61 76 61 69 6c 61 62 6c 65 2e 20 20 52 | e."Archive.not.yet.available...R |
| 1ca0 | 65 74 72 79 69 6e 67 20 69 6e 20 25 73 20 73 65 63 6f 6e 64 73 20 28 25 73 2f 25 73 20 61 74 74 | etrying.in.%s.seconds.(%s/%s.att |
| 1cc0 | 65 6d 70 74 73 29 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | empts)"......................... |
| 1ce0 | 20 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 74 74 61 63 68 2d 61 72 63 68 69 76 65 2d 72 | ..org-web-tools-attach-archive-r |
| 1d00 | 65 74 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b | etry...........................; |
| 1d20 | 3b 20 49 6e 63 72 65 6d 65 6e 74 20 61 74 74 65 6d 70 74 73 20 62 79 20 6f 6e 65 2c 20 62 65 63 | ;.Increment.attempts.by.one,.bec |
| 1d40 | 61 75 73 65 20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 73 0a 20 20 20 20 20 20 20 20 20 20 | ause.this.function.is........... |
| 1d60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 66 69 72 73 74 20 63 61 6c 6c 65 64 20 | ................;;.first.called. |
| 1d80 | 6f 75 74 73 69 64 65 20 6f 66 20 74 68 65 20 6c 65 78 69 63 61 6c 20 72 65 62 69 6e 64 69 6e 67 | outside.of.the.lexical.rebinding |
| 1da0 | 20 74 68 61 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .that........................... |
| 1dc0 | 3b 3b 20 69 6e 63 72 65 6d 65 6e 74 73 20 69 74 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ;;.increments.it................ |
| 1de0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 31 2b 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 74 | ............(1+.org-web-tools-at |
| 1e00 | 74 61 63 68 2d 75 72 6c 2d 61 72 63 68 69 76 65 2d 61 74 74 65 6d 70 74 73 29 0a 20 20 20 20 20 | tach-url-archive-attempts)...... |
| 1e20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6f 72 67 2d 77 65 62 2d 74 6f 6f | .....................org-web-too |
| 1e40 | 6c 73 2d 61 74 74 61 63 68 2d 61 72 63 68 69 76 65 2d 6d 61 78 2d 61 74 74 65 6d 70 74 73 29 29 | ls-attach-archive-max-attempts)) |
| 1e60 | 0a 20 20 20 20 20 20 28 27 72 65 74 72 69 65 73 2d 65 78 63 65 65 64 65 64 20 28 69 66 20 28 6e | .......('retries-exceeded.(if.(n |
| 1e80 | 6f 74 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 74 74 61 63 68 2d 61 72 63 68 69 76 65 2d | ot.org-web-tools-attach-archive- |
| 1ea0 | 72 65 74 72 79 2d 66 61 6c 6c 62 61 63 6b 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | retry-fallback)................. |
| 1ec0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 | .............(progn............. |
| 1ee0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 6f 70 2d 74 6f 2d 62 75 66 66 65 | ...................(pop-to-buffe |
| 1f00 | 72 20 28 63 75 72 72 65 6e 74 2d 62 75 66 66 65 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | r.(current-buffer))............. |
| 1f20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 52 65 74 72 79 | ...................(error."Retry |
| 1f40 | 20 6c 69 6d 69 74 20 65 78 63 65 65 64 65 64 20 77 68 65 6e 20 61 74 74 61 63 68 69 6e 67 20 61 | .limit.exceeded.when.attaching.a |
| 1f60 | 72 63 68 69 76 65 20 6f 66 20 25 73 2e 20 20 54 72 79 20 61 67 61 69 6e 20 6d 61 6e 75 61 6c 6c | rchive.of.%s...Try.again.manuall |
| 1f80 | 79 22 20 75 72 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | y".url))........................ |
| 1fa0 | 20 20 20 20 3b 3b 20 52 65 74 72 79 20 77 69 74 68 20 6f 74 68 65 72 20 66 75 6e 63 74 69 6f 6e | ....;;.Retry.with.other.function |
| 1fc0 | 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 66 | s............................(if |
| 1fe0 | 2d 6c 65 74 2a 20 28 28 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 74 74 61 63 68 2d 61 72 63 | -let*.((org-web-tools-attach-arc |
| 2000 | 68 69 76 65 2d 6d 61 78 2d 61 74 74 65 6d 70 74 73 20 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 | hive-max-attempts.0)............ |
| 2020 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 67 2d 77 | ..........................(org-w |
| 2040 | 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 66 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 | eb-tools-archive-fn............. |
| 2060 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 42 69 6e | ..........................;;.Bin |
| 2080 | 64 20 74 6f 20 75 6e 74 72 69 65 64 20 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 | d.to.untried.function........... |
| 20a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 61 72 | ............................(car |
| 20c0 | 20 28 73 65 71 2d 64 69 66 66 65 72 65 6e 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .(seq-difference................ |
| 20e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 63 | .............................(pc |
| 2100 | 61 73 65 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 74 74 61 63 68 2d 61 72 63 68 69 76 65 | ase.org-web-tools-attach-archive |
| 2120 | 2d 72 65 74 72 79 2d 66 61 6c 6c 62 61 63 6b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -retry-fallback................. |
| 2140 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 27 | ..............................(' |
| 2160 | 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 66 6e 0a 20 20 20 20 20 20 20 | org-web-tools-archive-fn........ |
| 2180 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 21a0 | 20 20 20 20 20 20 20 20 3b 3b 20 4c 69 73 74 20 64 65 66 61 75 6c 74 20 63 68 6f 69 63 65 73 20 | ........;;.List.default.choices. |
| 21c0 | 61 6e 64 20 63 75 72 72 65 6e 74 20 63 68 6f 69 63 65 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | and.current.choice.............. |
| 21e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 2200 | 20 20 28 2d 75 6e 69 71 20 28 61 70 70 65 6e 64 20 28 2d 3e 3e 20 28 67 65 74 20 27 6f 72 67 2d | ..(-uniq.(append.(->>.(get.'org- |
| 2220 | 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 66 6e 20 27 63 75 73 74 6f 6d 2d 74 79 70 | web-tools-archive-fn.'custom-typ |
| 2240 | 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | e).............................. |
| 2260 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 2280 | 20 20 20 20 20 20 63 64 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ......cdr....................... |
| 22a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 22c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2d 2d 73 65 6c 65 63 74 20 28 65 71 20 28 63 61 72 20 | .............(--select.(eq.(car. |
| 22e0 | 69 74 29 20 27 63 6f 6e 73 74 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | it).'const)).................... |
| 2300 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 2320 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 2d 6d 61 70 20 23 27 2d 6c 61 73 74 2d 69 74 | ................(-map.#'-last-it |
| 2340 | 65 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | em))............................ |
| 2360 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 2380 | 20 20 20 28 63 64 61 72 20 28 67 65 74 20 27 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 | ...(cdar.(get.'org-web-tools-arc |
| 23a0 | 68 69 76 65 2d 66 6e 20 27 63 75 73 74 6f 6d 69 7a 65 64 2d 76 61 6c 75 65 29 29 29 29 29 0a 20 | hive-fn.'customized-value))))).. |
| 23c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 23e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 28 70 72 65 64 20 6c 69 73 74 70 29 20 6f 72 67 2d 77 | .............((pred.listp).org-w |
| 2400 | 65 62 2d 74 6f 6f 6c 73 2d 61 74 74 61 63 68 2d 61 72 63 68 69 76 65 2d 72 65 74 72 79 2d 66 61 | eb-tools-attach-archive-retry-fa |
| 2420 | 6c 6c 62 61 63 6b 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | llback))........................ |
| 2440 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6f 72 67 2d 77 65 62 2d 74 6f 6f | .....................org-web-too |
| 2460 | 6c 73 2d 61 74 74 61 63 68 2d 75 72 6c 2d 61 72 63 68 69 76 65 2d 61 74 74 65 6d 70 74 65 64 2d | ls-attach-url-archive-attempted- |
| 2480 | 66 6e 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | fns))).......................... |
| 24a0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 74 74 61 63 | ............(org-web-tools-attac |
| 24c0 | 68 2d 75 72 6c 2d 61 72 63 68 69 76 65 2d 61 74 74 65 6d 70 74 65 64 2d 66 6e 73 20 28 63 6f 6e | h-url-archive-attempted-fns.(con |
| 24e0 | 73 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 66 6e 20 6f 72 67 2d 77 | s.org-web-tools-archive-fn.org-w |
| 2500 | 65 62 2d 74 6f 6f 6c 73 2d 61 74 74 61 63 68 2d 75 72 6c 2d 61 72 63 68 69 76 65 2d 61 74 74 65 | eb-tools-attach-url-archive-atte |
| 2520 | 6d 70 74 65 64 2d 66 6e 73 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | mpted-fns))).................... |
| 2540 | 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | ............(progn.............. |
| 2560 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 52 65 | ....................(message."Re |
| 2580 | 74 72 79 69 6e 67 20 77 69 74 68 20 6f 74 68 65 72 20 66 75 6e 63 74 69 6f 6e 73 2e 2e 2e 22 29 | trying.with.other.functions...") |
| 25a0 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 25c0 | 20 20 28 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 61 74 74 61 63 68 20 | ..(org-web-tools-archive-attach. |
| 25e0 | 75 72 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | url))........................... |
| 2600 | 20 20 20 28 65 72 72 6f 72 20 22 55 6e 61 62 6c 65 20 74 6f 20 61 74 74 61 63 68 20 61 72 63 68 | ...(error."Unable.to.attach.arch |
| 2620 | 69 76 65 20 6f 66 20 25 73 2c 20 6e 6f 20 66 75 6e 63 74 69 6f 6e 73 20 6c 65 66 74 20 74 6f 20 | ive.of.%s,.no.functions.left.to. |
| 2640 | 74 72 79 22 20 75 72 6c 29 29 29 29 0a 20 20 20 20 20 20 28 27 6e 69 6c 20 28 65 72 72 6f 72 20 | try".url)))).......('nil.(error. |
| 2660 | 22 55 6e 61 62 6c 65 20 74 6f 20 61 72 63 68 69 76 65 20 25 73 2e 20 20 52 65 74 72 79 20 6d 61 | "Unable.to.archive.%s...Retry.ma |
| 2680 | 6e 75 61 6c 6c 79 20 69 6e 20 61 20 66 65 77 20 73 65 63 6f 6e 64 73 22 20 75 72 6c 29 29 29 29 | nually.in.a.few.seconds".url)))) |
| 26a0 | 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 6f 72 67 2d 77 65 62 | )..;;;###autoload.(defun.org-web |
| 26c0 | 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 76 69 65 77 20 28 29 0a 20 20 22 4f 70 65 6e 20 5a | -tools-archive-view.()..."Open.Z |
| 26e0 | 69 70 20 66 69 6c 65 20 61 72 63 68 69 76 65 20 6f 66 20 77 65 62 20 70 61 67 65 2e 0a 45 78 74 | ip.file.archive.of.web.page..Ext |
| 2700 | 72 61 63 74 73 20 74 6f 20 61 20 74 65 6d 70 20 64 69 72 65 63 74 6f 72 79 20 61 6e 64 20 6f 70 | racts.to.a.temp.directory.and.op |
| 2720 | 65 6e 73 20 77 69 74 68 0a 60 62 72 6f 77 73 65 2d 75 72 6c 2d 64 65 66 61 75 6c 74 2d 62 72 6f | ens.with.`browse-url-default-bro |
| 2740 | 77 73 65 72 27 2e 20 20 4e 6f 74 65 3a 20 74 68 65 20 65 78 74 72 61 63 74 65 64 20 66 69 6c 65 | wser'...Note:.the.extracted.file |
| 2760 | 73 20 61 72 65 20 6c 65 66 74 0a 6f 6e 2d 64 69 73 6b 20 69 6e 20 74 68 65 20 74 65 6d 70 20 64 | s.are.left.on-disk.in.the.temp.d |
| 2780 | 69 72 65 63 74 6f 72 79 2e 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 75 6e | irectory."...(interactive)...(un |
| 27a0 | 6c 65 73 73 20 28 65 78 65 63 75 74 61 62 6c 65 2d 66 69 6e 64 20 22 75 6e 7a 69 70 22 29 0a 20 | less.(executable-find."unzip").. |
| 27c0 | 20 20 20 28 65 72 72 6f 72 20 22 43 61 6e 27 74 20 66 69 6e 64 20 75 6e 7a 69 70 20 63 6f 6d 6d | ...(error."Can't.find.unzip.comm |
| 27e0 | 61 6e 64 22 29 29 0a 20 20 28 6c 65 74 2a 20 28 28 61 74 74 61 63 68 2d 64 69 72 20 28 6f 72 67 | and"))...(let*.((attach-dir.(org |
| 2800 | 2d 61 74 74 61 63 68 2d 64 69 72 20 74 29 29 0a 09 20 28 66 69 6c 65 73 20 28 6f 72 67 2d 61 74 | -attach-dir.t))...(files.(org-at |
| 2820 | 74 61 63 68 2d 66 69 6c 65 2d 6c 69 73 74 20 61 74 74 61 63 68 2d 64 69 72 29 29 0a 09 20 28 66 | tach-file-list.attach-dir))...(f |
| 2840 | 69 6c 65 20 28 69 66 20 28 3d 20 28 6c 65 6e 67 74 68 20 66 69 6c 65 73 29 20 31 29 0a 09 09 20 | ile.(if.(=.(length.files).1).... |
| 2860 | 20 20 28 63 61 72 20 66 69 6c 65 73 29 0a 09 09 20 28 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 | ..(car.files)....(completing-rea |
| 2880 | 64 20 22 4f 70 65 6e 20 61 74 74 61 63 68 6d 65 6e 74 3a 20 22 0a 09 09 09 09 20 20 28 6d 61 70 | d."Open.attachment:.".......(map |
| 28a0 | 63 61 72 20 23 27 6c 69 73 74 20 66 69 6c 65 73 29 20 6e 69 6c 20 74 29 29 29 0a 20 20 20 20 20 | car.#'list.files).nil.t)))...... |
| 28c0 | 20 20 20 20 28 65 78 74 65 6e 73 69 6f 6e 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 65 78 74 65 6e 73 | ....(extension.(file-name-extens |
| 28e0 | 69 6f 6e 20 66 69 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 28 61 72 63 68 69 76 65 2d 70 61 74 | ion.file))..........(archive-pat |
| 2900 | 68 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 66 69 6c 65 20 61 74 74 61 63 68 2d | h.(expand-file-name.file.attach- |
| 2920 | 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 28 74 65 6d 70 2d 64 69 72 20 28 6d 61 6b 65 2d 74 | dir))..........(temp-dir.(make-t |
| 2940 | 65 6d 70 2d 66 69 6c 65 20 22 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 76 69 65 77 2d 61 72 63 | emp-file."org-web-tools-view-arc |
| 2960 | 68 69 76 65 2d 22 20 27 64 69 72 29 29 29 0a 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 | hive-".'dir))).....(with-temp-bu |
| 2980 | 66 66 65 72 0a 20 20 20 20 20 20 28 75 6e 6c 65 73 73 20 28 7a 65 72 6f 70 20 28 70 63 61 73 65 | ffer.......(unless.(zerop.(pcase |
| 29a0 | 20 65 78 74 65 6e 73 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .extension...................... |
| 29c0 | 20 20 3b 3b 20 54 4f 44 4f 3a 20 49 66 2f 77 68 65 6e 20 77 65 20 77 61 6e 74 20 74 6f 20 73 75 | ..;;.TODO:.If/when.we.want.to.su |
| 29e0 | 70 70 6f 72 74 20 6f 6e 6c 79 20 45 6d 61 63 73 20 32 36 2b 2c 20 77 65 0a 20 20 20 20 20 20 20 | pport.only.Emacs.26+,.we........ |
| 2a00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 63 61 6e 20 75 73 65 20 74 68 65 20 60 | ................;;.can.use.the.` |
| 2a20 | 72 78 27 20 6d 61 74 63 68 65 72 20 69 6e 73 74 65 61 64 20 6f 66 20 60 66 69 6c 65 2d 6e 61 6d | rx'.matcher.instead.of.`file-nam |
| 2a40 | 65 2d 65 78 74 65 6e 73 69 6f 6e 27 2c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | e-extension',................... |
| 2a60 | 20 20 20 20 20 3b 3b 20 61 6e 64 20 65 61 73 69 6c 79 20 74 65 73 74 20 66 6f 72 20 65 2e 67 2e | .....;;.and.easily.test.for.e.g. |
| 2a80 | 20 22 2e 74 61 72 2e 78 7a 22 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .".tar.xz"...................... |
| 2aa0 | 20 20 20 28 22 7a 69 70 22 20 28 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 28 65 78 65 63 75 74 61 | ...("zip".(call-process.(executa |
| 2ac0 | 62 6c 65 2d 66 69 6e 64 20 22 75 6e 7a 69 70 22 29 20 6e 69 6c 20 74 20 6e 69 6c 0a 20 20 20 20 | ble-find."unzip").nil.t.nil..... |
| 2ae0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 2b00 | 20 20 20 20 20 20 20 20 61 72 63 68 69 76 65 2d 70 61 74 68 20 22 2d 64 22 20 74 65 6d 70 2d 64 | ........archive-path."-d".temp-d |
| 2b20 | 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 41 | ir))........................;;.A |
| 2b40 | 73 73 75 6d 65 20 74 68 61 74 20 69 66 20 69 74 27 73 20 6e 6f 74 20 61 20 7a 69 70 20 66 69 6c | ssume.that.if.it's.not.a.zip.fil |
| 2b60 | 65 2c 20 69 74 27 73 20 61 20 74 61 72 20 61 72 63 68 69 76 65 0a 20 20 20 20 20 20 20 20 20 20 | e,.it's.a.tar.archive........... |
| 2b80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 28 60 65 78 74 65 6e 73 69 6f 6e 27 20 77 69 6c | .............;;.(`extension'.wil |
| 2ba0 | 6c 20 62 65 20 6a 75 73 74 2c 20 65 2e 67 2e 20 22 78 7a 22 29 2e 0a 20 20 20 20 20 20 20 20 20 | l.be.just,.e.g.."xz")........... |
| 2bc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 5f 20 28 63 61 6c 6c 2d 70 72 6f 63 65 73 73 20 28 | ..............(_.(call-process.( |
| 2be0 | 65 78 65 63 75 74 61 62 6c 65 2d 66 69 6e 64 20 22 74 61 72 22 29 20 6e 69 6c 20 74 20 6e 69 6c | executable-find."tar").nil.t.nil |
| 2c00 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 2c20 | 20 20 20 20 20 20 20 20 20 22 2d 2d 61 75 74 6f 2d 63 6f 6d 70 72 65 73 73 22 0a 20 20 20 20 20 | ........."--auto-compress"...... |
| 2c40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 2c60 | 20 20 20 22 2d 2d 65 78 74 72 61 63 74 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ..."--extract".................. |
| 2c80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2d 2d 64 69 72 65 63 74 | ......................."--direct |
| 2ca0 | 6f 72 79 22 20 74 65 6d 70 2d 64 69 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ory".temp-dir................... |
| 2cc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2d 2d 66 69 6c 65 22 20 61 | ......................"--file".a |
| 2ce0 | 72 63 68 69 76 65 2d 70 61 74 68 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 | rchive-path)))).........(error." |
| 2d00 | 45 78 74 72 61 63 74 69 6f 6e 20 6f 66 20 66 69 6c 65 20 66 61 69 6c 65 64 3a 20 25 73 22 20 28 | Extraction.of.file.failed:.%s".( |
| 2d20 | 62 75 66 66 65 72 2d 73 74 72 69 6e 67 29 29 29 29 0a 20 20 20 20 28 2d 3e 3e 20 28 64 69 72 65 | buffer-string)))).....(->>.(dire |
| 2d40 | 63 74 6f 72 79 2d 66 69 6c 65 73 20 74 65 6d 70 2d 64 69 72 20 27 66 75 6c 6c 2d 70 61 74 68 20 | ctory-files.temp-dir.'full-path. |
| 2d60 | 28 72 78 20 22 2e 68 74 6d 6c 22 20 65 6f 73 29 29 0a 20 20 20 20 20 20 20 20 20 28 2d 6d 61 70 | (rx.".html".eos))..........(-map |
| 2d80 | 20 23 27 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 76 69 65 77 2d 2d 65 | .#'org-web-tools-archive-view--e |
| 2da0 | 73 63 61 70 65 2d 66 69 6c 65 6e 61 6d 65 29 0a 20 20 20 20 20 20 20 20 20 28 2d 2d 6d 61 70 20 | scape-filename)..........(--map. |
| 2dc0 | 28 63 6f 6e 63 61 74 20 22 66 69 6c 65 3a 2f 2f 22 20 69 74 29 29 0a 20 20 20 20 20 20 20 20 20 | (concat."file://".it)).......... |
| 2de0 | 28 2d 6d 61 70 20 23 27 62 72 6f 77 73 65 2d 75 72 6c 2d 64 65 66 61 75 6c 74 2d 62 72 6f 77 73 | (-map.#'browse-url-default-brows |
| 2e00 | 65 72 29 29 0a 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 46 69 6c 65 73 20 65 78 74 72 61 63 74 | er)).....(message."Files.extract |
| 2e20 | 65 64 20 74 6f 3a 20 25 73 22 20 74 65 6d 70 2d 64 69 72 29 29 29 0a 0a 3b 3b 3b 3b 20 46 75 6e | ed.to:.%s".temp-dir)))..;;;;.Fun |
| 2e40 | 63 74 69 6f 6e 73 0a 0a 28 64 65 66 75 6e 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 | ctions..(defun.org-web-tools-arc |
| 2e60 | 68 69 76 65 2d 2d 63 68 6f 6f 73 65 2d 61 72 63 68 69 76 65 2d 66 6e 20 28 29 0a 20 20 22 52 65 | hive--choose-archive-fn.()..."Re |
| 2e80 | 74 75 72 6e 20 61 72 63 68 69 76 65 20 66 75 6e 63 74 69 6f 6e 2e 0a 53 65 6c 65 63 74 73 20 66 | turn.archive.function..Selects.f |
| 2ea0 | 72 6f 6d 20 60 63 75 73 74 6f 6d 2d 74 79 70 65 27 20 76 61 6c 75 65 73 20 6f 66 20 60 6f 72 67 | rom.`custom-type'.values.of.`org |
| 2ec0 | 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 66 6e 27 2e 22 0a 20 20 28 6c 65 74 20 | -web-tools-archive-fn'."...(let. |
| 2ee0 | 28 28 63 68 6f 69 63 65 73 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 63 68 6f 69 63 65 20 69 6e | ((choices.(cl-loop.for.choice.in |
| 2f00 | 20 28 63 64 72 20 28 70 6c 69 73 74 2d 67 65 74 20 28 73 79 6d 62 6f 6c 2d 70 6c 69 73 74 20 27 | .(cdr.(plist-get.(symbol-plist.' |
| 2f20 | 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 66 6e 29 0a 20 20 20 20 20 20 | org-web-tools-archive-fn)....... |
| 2f40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 2f60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 63 75 73 74 6f 6d 2d 74 79 70 65 29 29 | ..................'custom-type)) |
| 2f80 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 6f 72 20 66 | ...........................for.f |
| 2fa0 | 6e 20 3d 20 28 6e 74 68 20 33 20 63 68 6f 69 63 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | n.=.(nth.3.choice).............. |
| 2fc0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 77 68 65 6e 20 66 6e 0a 20 20 20 20 20 20 20 20 20 20 20 | .............when.fn............ |
| 2fe0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 6c 6c 65 63 74 20 28 63 6f 6e 73 20 28 70 6c | ...............collect.(cons.(pl |
| 3000 | 69 73 74 2d 67 65 74 20 28 63 64 72 20 63 68 6f 69 63 65 29 20 3a 74 61 67 29 0a 20 20 20 20 20 | ist-get.(cdr.choice).:tag)...... |
| 3020 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 3040 | 20 20 20 66 6e 29 29 29 29 0a 20 20 20 20 28 61 6c 69 73 74 2d 67 65 74 20 28 63 6f 6d 70 6c 65 | ...fn)))).....(alist-get.(comple |
| 3060 | 74 69 6e 67 2d 72 65 61 64 20 22 41 72 63 68 69 76 65 20 77 69 74 68 3a 20 22 20 63 68 6f 69 63 | ting-read."Archive.with:.".choic |
| 3080 | 65 73 29 20 63 68 6f 69 63 65 73 20 6e 69 6c 20 6e 69 6c 20 23 27 73 74 72 69 6e 67 3d 29 29 29 | es).choices.nil.nil.#'string=))) |
| 30a0 | 0a 0a 28 64 65 66 75 6e 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 76 | ..(defun.org-web-tools-archive-v |
| 30c0 | 69 65 77 2d 2d 65 73 63 61 70 65 2d 66 69 6c 65 6e 61 6d 65 20 28 70 61 74 68 29 0a 20 20 22 52 | iew--escape-filename.(path)..."R |
| 30e0 | 65 74 75 72 6e 20 50 41 54 48 20 77 69 74 68 20 66 69 6c 65 6e 61 6d 65 20 63 6f 6d 70 6f 6e 65 | eturn.PATH.with.filename.compone |
| 3100 | 6e 74 20 65 73 63 61 70 65 64 2e 0a 49 6e 20 63 61 73 65 20 69 74 20 63 6f 6e 74 61 69 6e 73 20 | nt.escaped..In.case.it.contains. |
| 3120 | 55 52 4c 2d 75 6e 66 72 69 65 6e 64 6c 79 20 63 68 61 72 61 63 74 65 72 73 2e 22 0a 20 20 28 6c | URL-unfriendly.characters."...(l |
| 3140 | 65 74 2a 20 28 28 64 69 72 65 63 74 6f 72 79 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 64 69 72 65 63 | et*.((directory.(file-name-direc |
| 3160 | 74 6f 72 79 20 70 61 74 68 29 29 0a 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 6e 61 6d 65 20 28 | tory.path))..........(filename.( |
| 3180 | 66 69 6c 65 2d 6e 61 6d 65 2d 6e 6f 6e 64 69 72 65 63 74 6f 72 79 20 70 61 74 68 29 29 29 0a 20 | file-name-nondirectory.path))).. |
| 31a0 | 20 20 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 28 75 72 6c 2d 68 65 78 69 66 79 | ...(expand-file-name.(url-hexify |
| 31c0 | 2d 73 74 72 69 6e 67 20 66 69 6c 65 6e 61 6d 65 29 20 64 69 72 65 63 74 6f 72 79 29 29 29 0a 0a | -string.filename).directory))).. |
| 31e0 | 28 64 65 66 75 6e 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 74 74 61 63 68 2d 75 72 6c 2d | (defun.org-web-tools-attach-url- |
| 3200 | 61 72 63 68 69 76 65 2d 2d 31 20 28 75 72 6c 29 0a 20 20 22 52 65 74 75 72 6e 20 73 69 7a 65 20 | archive--1.(url)..."Return.size. |
| 3220 | 69 6e 20 62 79 74 65 73 20 69 66 20 61 72 63 68 69 76 65 20 6f 66 20 55 52 4c 20 69 73 20 61 74 | in.bytes.if.archive.of.URL.is.at |
| 3240 | 74 61 63 68 65 64 20 74 6f 20 65 6e 74 72 79 20 61 74 20 70 6f 69 6e 74 2e 0a 52 65 74 75 72 6e | tached.to.entry.at.point..Return |
| 3260 | 20 60 72 65 74 72 79 69 6e 67 27 20 69 66 20 61 74 74 65 6d 70 74 20 66 61 69 6c 65 64 20 61 6e | .`retrying'.if.attempt.failed.an |
| 3280 | 64 20 72 65 74 72 79 20 74 69 6d 65 72 20 77 61 73 20 73 74 61 72 74 65 64 2e 0a 52 65 74 75 72 | d.retry.timer.was.started..Retur |
| 32a0 | 6e 20 6e 69 6c 20 69 66 20 75 6e 73 75 63 63 65 73 73 66 75 6c 2e 22 0a 20 20 3b 3b 20 52 61 74 | n.nil.if.unsuccessful."...;;.Rat |
| 32c0 | 68 65 72 20 74 68 61 6e 20 66 6f 72 63 69 6e 67 20 60 6f 72 67 2d 61 74 74 61 63 68 27 20 74 6f | her.than.forcing.`org-attach'.to |
| 32e0 | 20 6c 6f 61 64 20 77 68 65 6e 20 74 68 69 73 20 70 61 63 6b 61 67 65 20 69 73 20 6c 6f 61 64 65 | .load.when.this.package.is.loade |
| 3300 | 64 2c 20 77 65 27 6c 6c 20 6a 75 73 74 20 6c 6f 61 64 20 69 74 20 68 65 72 65 2c 0a 20 20 3b 3b | d,.we'll.just.load.it.here,...;; |
| 3320 | 20 62 65 63 61 75 73 65 20 60 6f 72 67 2d 61 74 74 61 63 68 2d 61 74 74 61 63 68 27 20 69 73 20 | .because.`org-attach-attach'.is. |
| 3340 | 6e 6f 74 20 61 75 74 6f 6c 6f 61 64 65 64 2e 0a 20 20 28 72 65 71 75 69 72 65 20 27 6f 72 67 2d | not.autoloaded....(require.'org- |
| 3360 | 61 74 74 61 63 68 29 0a 20 20 28 70 63 61 73 65 20 28 66 75 6e 63 61 6c 6c 20 6f 72 67 2d 77 65 | attach)...(pcase.(funcall.org-we |
| 3380 | 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 66 6e 20 75 72 6c 29 0a 20 20 20 20 28 28 61 6e | b-tools-archive-fn.url).....((an |
| 33a0 | 64 20 28 70 72 65 64 20 73 74 72 69 6e 67 70 29 20 6c 6f 63 61 6c 2d 70 61 74 68 29 0a 20 20 20 | d.(pred.stringp).local-path).... |
| 33c0 | 20 20 3b 3b 20 41 72 63 68 69 76 65 20 72 65 74 75 72 6e 65 64 3a 20 61 74 74 61 63 68 20 61 6e | ..;;.Archive.returned:.attach.an |
| 33e0 | 64 20 72 65 74 75 72 6e 20 73 69 7a 65 0a 20 20 20 20 20 28 70 72 6f 67 31 20 28 66 69 6c 65 2d | d.return.size......(prog1.(file- |
| 3400 | 73 69 7a 65 2d 68 75 6d 61 6e 2d 72 65 61 64 61 62 6c 65 20 28 6e 74 68 20 37 20 28 66 69 6c 65 | size-human-readable.(nth.7.(file |
| 3420 | 2d 61 74 74 72 69 62 75 74 65 73 20 6c 6f 63 61 6c 2d 70 61 74 68 29 29 29 0a 20 20 20 20 20 20 | -attributes.local-path)))....... |
| 3440 | 20 28 6f 72 67 2d 61 74 74 61 63 68 2d 61 74 74 61 63 68 20 6c 6f 63 61 6c 2d 70 61 74 68 20 6e | .(org-attach-attach.local-path.n |
| 3460 | 69 6c 20 27 6d 76 29 29 29 0a 20 20 20 20 28 27 6e 69 6c 0a 20 20 20 20 20 3b 3b 20 41 72 63 68 | il.'mv))).....('nil......;;.Arch |
| 3480 | 69 76 65 20 66 61 69 6c 65 64 0a 20 20 20 20 20 28 70 63 61 73 65 2d 65 78 68 61 75 73 74 69 76 | ive.failed......(pcase-exhaustiv |
| 34a0 | 65 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 74 74 61 63 68 2d 61 72 63 68 69 76 65 2d 72 | e.org-web-tools-attach-archive-r |
| 34c0 | 65 74 72 79 0a 20 20 20 20 20 20 20 28 27 6e 69 6c 20 6e 69 6c 29 20 20 20 20 20 20 20 3b 3b 20 | etry........('nil.nil).......;;. |
| 34e0 | 4e 6f 20 72 65 74 72 79 0a 20 20 20 20 20 20 20 28 28 70 72 65 64 20 69 6e 74 65 67 65 72 70 29 | No.retry........((pred.integerp) |
| 3500 | 20 3b 3b 20 52 65 74 72 79 0a 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 61 74 74 65 6d 70 74 | .;;.Retry.........(let.((attempt |
| 3520 | 73 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 74 74 61 63 68 2d 75 72 6c 2d 61 72 63 68 69 | s.org-web-tools-attach-url-archi |
| 3540 | 76 65 2d 61 74 74 65 6d 70 74 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 64 20 28 | ve-attempts)...............(id.( |
| 3560 | 6f 72 67 2d 69 64 2d 67 65 74 20 6e 69 6c 20 27 63 72 65 61 74 65 29 29 29 0a 20 20 20 20 20 20 | org-id-get.nil.'create)))....... |
| 3580 | 20 20 20 20 28 69 66 20 28 3e 3d 20 28 63 6c 2d 69 6e 63 66 20 61 74 74 65 6d 70 74 73 29 20 6f | ....(if.(>=.(cl-incf.attempts).o |
| 35a0 | 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 74 74 61 63 68 2d 61 72 63 68 69 76 65 2d 6d 61 78 2d | rg-web-tools-attach-archive-max- |
| 35c0 | 61 74 74 65 6d 70 74 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 72 65 74 72 69 65 73 | attempts)...............'retries |
| 35e0 | 2d 65 78 63 65 65 64 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 6f 72 67 | -exceeded.............(when.(org |
| 3600 | 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 2d 72 65 74 72 79 20 3a 69 64 20 69 64 | -web-tools-archive--retry.:id.id |
| 3620 | 20 3a 75 72 6c 20 75 72 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 64 | .:url.url.....................:d |
| 3640 | 65 6c 61 79 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 74 74 61 63 68 2d 61 72 63 68 69 76 | elay.org-web-tools-attach-archiv |
| 3660 | 65 2d 72 65 74 72 79 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 61 74 74 | e-retry.....................:att |
| 3680 | 65 6d 70 74 73 20 61 74 74 65 6d 70 74 73 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 27 72 | empts.attempts)...............'r |
| 36a0 | 65 74 72 79 69 6e 67 29 29 29 29 29 29 29 29 0a 0a 28 63 6c 2d 64 65 66 75 6e 20 6f 72 67 2d 77 | etrying))))))))..(cl-defun.org-w |
| 36c0 | 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 2d 72 65 74 72 79 20 28 26 6b 65 79 20 69 64 | eb-tools-archive--retry.(&key.id |
| 36e0 | 20 75 72 6c 20 64 65 6c 61 79 20 61 74 74 65 6d 70 74 73 29 0a 20 20 22 53 74 61 72 74 20 61 6e | .url.delay.attempts)..."Start.an |
| 3700 | 64 20 72 65 74 75 72 6e 20 61 20 74 69 6d 65 72 20 66 6f 72 20 61 72 67 75 6d 65 6e 74 73 2e 0a | d.return.a.timer.for.arguments.. |
| 3720 | 54 69 6d 65 72 20 63 61 6c 6c 73 20 46 4e 20 74 6f 20 61 74 74 61 63 68 20 61 72 63 68 69 76 65 | Timer.calls.FN.to.attach.archive |
| 3740 | 20 6f 66 20 55 52 4c 20 74 6f 20 65 6e 74 72 79 20 77 69 74 68 20 49 44 20 61 66 74 65 72 0a 44 | .of.URL.to.entry.with.ID.after.D |
| 3760 | 45 4c 41 59 20 73 65 63 6f 6e 64 73 2e 22 0a 20 20 28 64 65 63 6c 61 72 65 20 28 69 6e 64 65 6e | ELAY.seconds."...(declare.(inden |
| 3780 | 74 20 64 65 66 75 6e 29 29 0a 20 20 28 6c 65 74 20 28 28 66 6e 20 28 6c 61 6d 62 64 61 20 28 29 | t.defun))...(let.((fn.(lambda.() |
| 37a0 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 65 74 20 28 28 6f 72 67 2d 77 65 62 2d 74 6f | ...............(let.((org-web-to |
| 37c0 | 6f 6c 73 2d 61 74 74 61 63 68 2d 75 72 6c 2d 61 72 63 68 69 76 65 2d 61 74 74 65 6d 70 74 73 20 | ols-attach-url-archive-attempts. |
| 37e0 | 61 74 74 65 6d 70 74 73 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 67 2d | attempts)).................(org- |
| 3800 | 77 69 74 68 2d 70 6f 69 6e 74 2d 61 74 20 28 6f 72 20 28 6f 72 67 2d 69 64 2d 66 69 6e 64 20 69 | with-point-at.(or.(org-id-find.i |
| 3820 | 64 20 27 6d 61 72 6b 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | d.'marker)...................... |
| 3840 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 43 61 6e 27 74 20 | ..................(error."Can't. |
| 3860 | 66 69 6e 64 20 65 6e 74 72 79 20 25 73 20 74 6f 20 61 74 74 61 63 68 20 61 72 63 68 69 76 65 20 | find.entry.%s.to.attach.archive. |
| 3880 | 6f 66 20 25 73 20 61 74 22 20 69 64 20 75 72 6c 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | of.%s.at".id.url)).............. |
| 38a0 | 20 20 20 20 20 28 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 61 74 74 61 | .....(org-web-tools-archive-atta |
| 38c0 | 63 68 20 75 72 6c 29 29 29 29 29 29 0a 20 20 20 20 28 72 75 6e 2d 61 74 2d 74 69 6d 65 20 64 65 | ch.url)))))).....(run-at-time.de |
| 38e0 | 6c 61 79 20 6e 69 6c 20 66 6e 29 29 29 0a 0a 3b 3b 3b 3b 3b 20 77 67 65 74 0a 0a 28 63 6c 2d 64 | lay.nil.fn)))..;;;;;.wget..(cl-d |
| 3900 | 65 66 75 6e 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 2d 77 67 65 74 | efun.org-web-tools-archive--wget |
| 3920 | 2d 74 61 72 20 28 75 72 6c 29 0a 20 20 22 52 65 74 75 72 6e 20 70 61 74 68 20 74 6f 20 6c 6f 63 | -tar.(url)..."Return.path.to.loc |
| 3940 | 61 6c 20 61 72 63 68 69 76 65 20 6f 66 20 55 52 4c 20 72 65 74 72 69 65 76 65 64 20 77 69 74 68 | al.archive.of.URL.retrieved.with |
| 3960 | 20 77 67 65 74 20 61 6e 64 20 61 72 63 68 69 76 65 64 20 77 69 74 68 20 74 61 72 2e 0a 0a 54 65 | .wget.and.archived.with.tar...Te |
| 3980 | 6d 70 6f 72 61 72 79 20 66 69 6c 65 73 20 64 6f 77 6e 6c 6f 61 64 65 64 20 77 69 74 68 20 77 67 | mporary.files.downloaded.with.wg |
| 39a0 | 65 74 20 61 72 65 20 64 65 6c 65 74 65 64 2c 20 62 75 74 20 74 68 65 0a 74 65 6d 70 6f 72 61 72 | et.are.deleted,.but.the.temporar |
| 39c0 | 79 20 64 69 72 65 63 74 6f 72 79 20 69 73 20 6e 6f 74 2c 20 62 65 63 61 75 73 65 20 74 68 65 20 | y.directory.is.not,.because.the. |
| 39e0 | 61 72 63 68 69 76 65 20 69 73 20 69 6e 73 69 64 65 20 69 74 2e 22 0a 20 20 28 63 6c 2d 6d 61 63 | archive.is.inside.it."...(cl-mac |
| 3a00 | 72 6f 6c 65 74 20 28 28 63 61 6c 6c 2d 74 61 72 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | rolet.((call-tar.()............. |
| 3a20 | 20 20 20 20 20 20 60 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ......`(progn................... |
| 3a40 | 20 20 20 28 63 64 20 22 66 69 6c 65 73 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ...(cd."files")................. |
| 3a60 | 20 20 20 20 20 28 69 66 20 28 7a 65 72 6f 70 20 28 61 70 70 6c 79 20 23 27 63 61 6c 6c 2d 70 72 | .....(if.(zerop.(apply.#'call-pr |
| 3a80 | 6f 63 65 73 73 20 22 74 61 72 22 20 6e 69 6c 20 74 20 6e 69 6c 20 74 61 72 2d 61 72 67 73 29 29 | ocess."tar".nil.t.nil.tar-args)) |
| 3aa0 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 61 72 63 68 69 76 | ..........................archiv |
| 3ac0 | 65 2d 70 61 74 68 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 | e-path........................(w |
| 3ae0 | 61 72 6e 20 22 74 61 72 20 66 61 69 6c 65 64 3a 20 25 73 22 20 28 62 75 66 66 65 72 2d 73 74 72 | arn."tar.failed:.%s".(buffer-str |
| 3b00 | 69 6e 67 29 29 29 29 29 29 0a 20 20 20 20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 28 74 65 6d 70 2d | ing)))))).....(when-let*.((temp- |
| 3b20 | 64 69 72 20 28 6d 61 6b 65 2d 74 65 6d 70 2d 66 69 6c 65 20 22 6f 72 67 2d 77 65 62 2d 74 6f 6f | dir.(make-temp-file."org-web-too |
| 3b40 | 6c 73 2d 61 72 63 68 69 76 65 2d 22 20 27 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | ls-archive-".'dir))............. |
| 3b60 | 20 20 20 20 3b 3b 20 54 4f 44 4f 3a 20 4d 61 6b 65 20 61 72 63 68 69 76 65 72 20 63 6f 6e 66 69 | ....;;.TODO:.Make.archiver.confi |
| 3b80 | 67 75 72 61 62 6c 65 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 72 63 68 69 76 | gurable..................(archiv |
| 3ba0 | 65 2d 6e 61 6d 65 20 28 63 6f 6e 63 61 74 20 28 75 72 6c 2d 68 65 78 69 66 79 2d 73 74 72 69 6e | e-name.(concat.(url-hexify-strin |
| 3bc0 | 67 20 75 72 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | g.url).......................... |
| 3be0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2d 2d 22 20 28 73 2d 63 68 6f 70 2d 70 72 65 66 69 78 | ............."--".(s-chop-prefix |
| 3c00 | 20 22 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 22 0a 20 20 20 20 20 20 | ."org-web-tools-archive-"....... |
| 3c20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 3c40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 6e 61 6d 65 2d 6e | ....................(file-name-n |
| 3c60 | 6f 6e 64 69 72 65 63 74 6f 72 79 20 28 64 69 72 65 63 74 6f 72 79 2d 66 69 6c 65 2d 6e 61 6d 65 | ondirectory.(directory-file-name |
| 3c80 | 20 74 65 6d 70 2d 64 69 72 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .temp-dir))).................... |
| 3ca0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2e 74 61 72 2e 22 20 6f 72 67 2d 77 | ...................".tar.".org-w |
| 3cc0 | 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 63 6f 6d 70 72 65 73 73 6f 72 29 29 0a 20 20 | eb-tools-archive-compressor))... |
| 3ce0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 72 63 68 69 76 65 2d 70 61 74 68 20 28 65 78 70 | ..............(archive-path.(exp |
| 3d00 | 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 61 72 63 68 69 76 65 2d 6e 61 6d 65 20 74 65 6d 70 2d | and-file-name.archive-name.temp- |
| 3d20 | 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 67 65 74 2d 61 72 67 73 | dir)).................(wget-args |
| 3d40 | 20 28 61 70 70 65 6e 64 20 28 6c 69 73 74 20 22 2d 2d 6e 6f 2d 64 69 72 65 63 74 6f 72 69 65 73 | .(append.(list."--no-directories |
| 3d60 | 22 20 22 2d 2d 64 69 72 65 63 74 6f 72 79 2d 70 72 65 66 69 78 22 20 22 66 69 6c 65 73 22 29 0a | "."--directory-prefix"."files"). |
| 3d80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 3da0 | 20 20 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 77 67 65 74 2d 6f 70 | ...org-web-tools-archive-wget-op |
| 3dc0 | 74 69 6f 6e 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | tions........................... |
| 3de0 | 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 75 72 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 | .........(list.url)))........... |
| 3e00 | 20 20 20 20 20 20 28 74 61 72 2d 61 72 67 73 20 28 6c 69 73 74 20 22 2d 2d 63 72 65 61 74 65 22 | ......(tar-args.(list."--create" |
| 3e20 | 20 22 2d 2d 61 75 74 6f 2d 63 6f 6d 70 72 65 73 73 22 20 22 2d 2d 66 69 6c 65 22 20 61 72 63 68 | ."--auto-compress"."--file".arch |
| 3e40 | 69 76 65 2d 70 61 74 68 20 22 2e 2f 22 29 29 29 0a 20 20 20 20 20 20 28 75 6e 77 69 6e 64 2d 70 | ive-path."./"))).......(unwind-p |
| 3e60 | 72 6f 74 65 63 74 0a 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 | rotect...........(with-temp-buff |
| 3e80 | 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 63 64 20 74 65 6d 70 2d 64 69 72 29 0a 20 20 20 | er.............(cd.temp-dir).... |
| 3ea0 | 20 20 20 20 20 20 20 20 20 28 70 63 61 73 65 20 28 61 70 70 6c 79 20 23 27 63 61 6c 6c 2d 70 72 | .........(pcase.(apply.#'call-pr |
| 3ec0 | 6f 63 65 73 73 20 22 77 67 65 74 22 20 6e 69 6c 20 74 20 6e 69 6c 20 77 67 65 74 2d 61 72 67 73 | ocess."wget".nil.t.nil.wget-args |
| 3ee0 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 30 20 28 63 61 6c 6c 2d 74 61 72 29 29 0a 20 | )...............(0.(call-tar)).. |
| 3f00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 64 65 20 28 6d 65 73 73 61 67 65 20 22 25 73 22 | .............(code.(message."%s" |
| 3f20 | 20 28 70 72 69 6e 31 20 28 63 6f 6e 63 61 74 20 22 77 67 65 74 20 6f 75 74 70 75 74 3a 5c 6e 5c | .(prin1.(concat."wget.output:\n\ |
| 3f40 | 6e 22 20 28 62 75 66 66 65 72 2d 73 74 72 69 6e 67 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 | n".(buffer-string))))........... |
| 3f60 | 20 20 20 20 20 20 20 20 20 20 28 77 61 72 6e 20 22 77 67 65 74 20 65 78 69 74 65 64 20 77 69 74 | ..........(warn."wget.exited.wit |
| 3f80 | 68 20 63 6f 64 65 20 25 73 2c 20 6d 65 61 6e 69 6e 67 20 74 68 61 74 20 73 6f 6d 65 20 65 72 72 | h.code.%s,.meaning.that.some.err |
| 3fa0 | 6f 72 73 20 77 65 72 65 20 65 6e 63 6f 75 6e 74 65 72 65 64 2e 20 20 54 68 65 79 20 6d 69 67 68 | ors.were.encountered...They.migh |
| 3fc0 | 74 20 62 65 20 6a 75 73 74 20 34 30 34 73 20 66 6f 72 20 73 6f 6d 65 20 69 6d 61 67 65 73 2e 20 | t.be.just.404s.for.some.images.. |
| 3fe0 | 20 43 68 65 63 6b 20 74 68 65 20 73 61 76 65 64 20 61 72 63 68 69 76 65 64 20 74 6f 20 62 65 20 | .Check.the.saved.archived.to.be. |
| 4000 | 73 75 72 65 20 69 74 20 77 61 73 20 61 72 63 68 69 76 65 64 20 74 6f 20 79 6f 75 72 20 73 61 74 | sure.it.was.archived.to.your.sat |
| 4020 | 69 73 66 61 63 74 69 6f 6e 2e 20 20 54 68 65 20 66 75 6c 6c 20 6f 75 74 70 75 74 20 66 72 6f 6d | isfaction...The.full.output.from |
| 4040 | 20 77 67 65 74 20 69 73 20 69 6e 20 74 68 65 20 5c 22 2a 4d 65 73 73 61 67 65 73 2a 5c 22 20 62 | .wget.is.in.the.\"*Messages*\".b |
| 4060 | 75 66 66 65 72 2e 22 20 63 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | uffer.".code)................... |
| 4080 | 20 20 28 63 61 6c 6c 2d 74 61 72 29 29 29 29 0a 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d | ..(call-tar)))).........(delete- |
| 40a0 | 64 69 72 65 63 74 6f 72 79 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 22 66 69 6c | directory.(expand-file-name."fil |
| 40c0 | 65 73 22 20 74 65 6d 70 2d 64 69 72 29 20 27 72 65 63 75 72 73 69 76 65 29 29 29 29 29 0a 0a 28 | es".temp-dir).'recursive)))))..( |
| 40e0 | 64 65 66 75 6e 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 2d 77 67 65 | defun.org-web-tools-archive--wge |
| 4100 | 74 2d 74 61 72 2d 68 74 6d 6c 2d 6f 6e 6c 79 20 28 75 72 6c 29 0a 20 20 22 52 65 74 75 72 6e 20 | t-tar-html-only.(url)..."Return. |
| 4120 | 70 61 74 68 20 74 6f 20 6c 6f 63 61 6c 20 61 72 63 68 69 76 65 20 6f 66 20 55 52 4c 20 72 65 74 | path.to.local.archive.of.URL.ret |
| 4140 | 72 69 65 76 65 64 20 77 69 74 68 20 77 67 65 74 20 61 6e 64 20 61 72 63 68 69 76 65 64 20 77 69 | rieved.with.wget.and.archived.wi |
| 4160 | 74 68 20 74 61 72 2e 0a 43 61 6c 6c 73 20 60 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 | th.tar..Calls.`org-web-tools-arc |
| 4180 | 68 69 76 65 2d 2d 77 67 65 74 2d 74 61 72 27 2c 20 62 75 74 20 61 64 6a 75 73 74 73 0a 60 6f 72 | hive--wget-tar',.but.adjusts.`or |
| 41a0 | 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 77 67 65 74 2d 6f 70 74 69 6f 6e 73 | g-web-tools-archive-wget-options |
| 41c0 | 27 20 74 6f 20 6f 6e 6c 79 20 64 6f 77 6e 6c 6f 61 64 20 48 54 4d 4c 2c 20 6e 6f 74 0a 70 61 67 | '.to.only.download.HTML,.not.pag |
| 41e0 | 65 20 72 65 71 75 69 73 69 74 65 73 2e 22 0a 20 20 28 6c 65 74 20 28 28 6f 72 67 2d 77 65 62 2d | e.requisites."...(let.((org-web- |
| 4200 | 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 77 67 65 74 2d 6f 70 74 69 6f 6e 73 20 6f 72 67 2d 77 | tools-archive-wget-options.org-w |
| 4220 | 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 77 67 65 74 2d 68 74 6d 6c 2d 6f 6e 6c 79 2d | eb-tools-archive-wget-html-only- |
| 4240 | 6f 70 74 69 6f 6e 73 29 29 0a 20 20 20 20 28 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 | options)).....(org-web-tools-arc |
| 4260 | 68 69 76 65 2d 2d 77 67 65 74 2d 74 61 72 20 75 72 6c 29 29 29 0a 0a 3b 3b 3b 3b 3b 20 61 72 63 | hive--wget-tar.url)))..;;;;;.arc |
| 4280 | 68 69 76 65 2e 69 73 0a 0a 28 64 65 66 75 6e 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 | hive.is..(defun.org-web-tools-ar |
| 42a0 | 63 68 69 76 65 2d 2d 61 72 63 68 69 76 65 2e 69 73 20 28 75 72 6c 29 0a 20 20 22 52 65 74 75 72 | chive--archive.is.(url)..."Retur |
| 42c0 | 6e 20 70 61 74 68 20 74 6f 20 6c 6f 63 61 6c 20 61 72 63 68 69 76 65 20 6f 66 20 55 52 4c 20 72 | n.path.to.local.archive.of.URL.r |
| 42e0 | 65 74 72 69 65 76 65 64 20 66 72 6f 6d 20 61 72 63 68 69 76 65 2e 69 73 2e 0a 0a 43 61 6c 6c 65 | etrieved.from.archive.is...Calle |
| 4300 | 72 20 69 73 20 72 65 73 70 6f 6e 73 69 62 6c 65 20 66 6f 72 20 64 65 6c 65 74 69 6e 67 20 61 72 | r.is.responsible.for.deleting.ar |
| 4320 | 63 68 69 76 65 27 73 20 64 69 72 65 63 74 6f 72 79 20 61 66 74 65 72 0a 6d 6f 76 69 6e 67 20 69 | chive's.directory.after.moving.i |
| 4340 | 74 2e 22 0a 20 20 3b 3b 20 52 65 71 75 69 72 65 20 60 61 72 63 2d 6d 6f 64 65 27 20 68 65 72 65 | t."...;;.Require.`arc-mode'.here |
| 4360 | 20 66 6f 72 20 60 61 72 63 68 69 76 65 2d 66 69 6e 64 2d 74 79 70 65 27 2e 20 20 54 68 69 73 20 | .for.`archive-find-type'...This. |
| 4380 | 61 76 6f 69 64 73 20 6c 6f 61 64 69 6e 67 20 74 68 6f 73 65 20 70 61 63 6b 61 67 65 73 20 75 6e | avoids.loading.those.packages.un |
| 43a0 | 74 69 6c 20 74 68 65 79 20 61 72 65 20 61 63 74 75 61 6c 6c 79 20 75 73 65 64 2e 0a 20 20 28 72 | til.they.are.actually.used....(r |
| 43c0 | 65 71 75 69 72 65 20 27 61 72 63 2d 6d 6f 64 65 29 0a 20 20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 | equire.'arc-mode)...(when-let*.( |
| 43e0 | 28 61 72 63 68 69 76 65 2d 75 72 6c 20 28 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 | (archive-url.(org-web-tools-arch |
| 4400 | 69 76 65 2d 2d 61 72 63 68 69 76 65 2e 69 73 2d 61 72 63 68 69 76 65 2d 75 72 6c 20 75 72 6c 29 | ive--archive.is-archive-url.url) |
| 4420 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 74 65 6d 70 2d 64 69 72 20 28 6d 61 6b 65 2d | )...............(temp-dir.(make- |
| 4440 | 74 65 6d 70 2d 66 69 6c 65 20 22 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 | temp-file."org-web-tools-archive |
| 4460 | 2d 22 20 27 64 69 72 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 6e 63 6f 64 65 64 | -".'dir))...............(encoded |
| 4480 | 2d 75 72 6c 20 28 75 72 6c 2d 68 65 78 69 66 79 2d 73 74 72 69 6e 67 20 75 72 6c 29 29 0a 20 20 | -url.(url-hexify-string.url))... |
| 44a0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 62 61 73 65 6e 61 6d 65 20 28 63 6f 6e 63 61 74 20 65 6e | ............(basename.(concat.en |
| 44c0 | 63 6f 64 65 64 2d 75 72 6c 20 22 2d 2d 22 20 28 73 2d 63 68 6f 70 2d 70 72 65 66 69 78 20 22 6f | coded-url."--".(s-chop-prefix."o |
| 44e0 | 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 22 0a 20 20 20 20 20 20 20 20 20 | rg-web-tools-archive-".......... |
| 4500 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 4520 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 69 6c 65 2d 6e 61 6d | .......................(file-nam |
| 4540 | 65 2d 6e 6f 6e 64 69 72 65 63 74 6f 72 79 20 28 64 69 72 65 63 74 6f 72 79 2d 66 69 6c 65 2d 6e | e-nondirectory.(directory-file-n |
| 4560 | 61 6d 65 20 61 72 63 68 69 76 65 2d 75 72 6c 29 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | ame.archive-url)))))............ |
| 4580 | 20 20 20 28 6c 6f 63 61 6c 2d 70 61 74 68 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 | ...(local-path.(expand-file-name |
| 45a0 | 20 62 61 73 65 6e 61 6d 65 20 74 65 6d 70 2d 64 69 72 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 | .basename.temp-dir))).....(when. |
| 45c0 | 28 75 72 6c 2d 63 6f 70 79 2d 66 69 6c 65 20 61 72 63 68 69 76 65 2d 75 72 6c 20 6c 6f 63 61 6c | (url-copy-file.archive-url.local |
| 45e0 | 2d 70 61 74 68 20 27 6f 6b 2d 69 66 2d 65 78 69 73 74 73 20 27 6b 65 65 70 2d 74 69 6d 65 29 0a | -path.'ok-if-exists.'keep-time). |
| 4600 | 20 20 20 20 20 20 28 70 63 61 73 65 20 28 69 67 6e 6f 72 65 2d 65 72 72 6f 72 73 0a 20 20 20 20 | ......(pcase.(ignore-errors..... |
| 4620 | 20 20 20 20 20 20 20 20 20 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 | ...........(with-temp-buffer.... |
| 4640 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 2d 66 69 6c 65 2d 63 6f 6e 74 65 | ..............(insert-file-conte |
| 4660 | 6e 74 73 2d 6c 69 74 65 72 61 6c 6c 79 20 6c 6f 63 61 6c 2d 70 61 74 68 29 0a 20 20 20 20 20 20 | nts-literally.local-path)....... |
| 4680 | 20 20 20 20 20 20 20 20 20 20 20 28 61 72 63 68 69 76 65 2d 66 69 6e 64 2d 74 79 70 65 29 29 29 | ...........(archive-find-type))) |
| 46a0 | 0a 20 20 20 20 20 20 20 20 28 27 7a 69 70 20 6c 6f 63 61 6c 2d 70 61 74 68 29 0a 20 20 20 20 20 | .........('zip.local-path)...... |
| 46c0 | 20 20 20 28 5f 20 6e 69 6c 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 6f 72 67 2d 77 65 62 2d 74 | ...(_.nil)))))..(defun.org-web-t |
| 46e0 | 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 2d 61 72 63 68 69 76 65 2e 69 73 2d 61 72 63 68 69 76 65 | ools-archive--archive.is-archive |
| 4700 | 2d 75 72 6c 20 28 75 72 6c 29 0a 20 20 22 52 65 74 75 72 6e 20 55 52 4c 20 74 6f 20 5a 69 70 20 | -url.(url)..."Return.URL.to.Zip. |
| 4720 | 61 72 63 68 69 76 65 20 6f 66 20 55 52 4c 2e 22 0a 20 20 28 77 68 65 6e 2d 6c 65 74 2a 20 28 28 | archive.of.URL."...(when-let*.(( |
| 4740 | 69 64 20 28 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 2d 61 72 63 68 69 | id.(org-web-tools-archive--archi |
| 4760 | 76 65 2e 69 73 2d 75 72 6c 2d 69 64 20 75 72 6c 29 29 29 0a 20 20 20 20 28 63 6f 6e 63 61 74 20 | ve.is-url-id.url))).....(concat. |
| 4780 | 22 68 74 74 70 3a 2f 2f 22 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d | "http://".org-web-tools-archive- |
| 47a0 | 68 6f 73 74 6e 61 6d 65 20 22 2f 64 6f 77 6e 6c 6f 61 64 2f 22 20 69 64 20 22 2e 7a 69 70 22 29 | hostname."/download/".id.".zip") |
| 47c0 | 29 29 0a 0a 28 64 65 66 75 6e 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 | ))..(defun.org-web-tools-archive |
| 47e0 | 2d 2d 61 72 63 68 69 76 65 2e 69 73 2d 75 72 6c 2d 69 64 20 28 75 72 6c 29 0a 20 20 22 52 65 74 | --archive.is-url-id.(url)..."Ret |
| 4800 | 75 72 6e 20 49 44 20 6f 66 20 6d 6f 73 74 20 72 65 63 65 6e 74 20 61 72 63 68 69 76 65 20 6f 66 | urn.ID.of.most.recent.archive.of |
| 4820 | 20 55 52 4c 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 73 75 62 6d 69 74 69 64 20 28 6f 72 67 2d 77 | .URL."...(let*.((submitid.(org-w |
| 4840 | 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 2d 61 72 63 68 69 76 65 2e 69 73 2d 73 75 62 | eb-tools-archive--archive.is-sub |
| 4860 | 6d 69 74 69 64 29 29 0a 20 20 20 20 20 20 20 20 20 28 73 75 62 6d 69 74 2d 75 72 6c 20 28 63 6f | mitid))..........(submit-url.(co |
| 4880 | 6e 63 61 74 20 22 68 74 74 70 73 3a 2f 2f 22 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 | ncat."https://".org-web-tools-ar |
| 48a0 | 63 68 69 76 65 2d 68 6f 73 74 6e 61 6d 65 20 22 2f 73 75 62 6d 69 74 2f 22 29 29 0a 20 20 20 20 | chive-hostname."/submit/"))..... |
| 48c0 | 20 20 20 20 20 28 64 61 74 61 20 28 6c 69 73 74 20 28 63 6f 6e 73 20 22 61 6e 79 77 61 79 22 20 | .....(data.(list.(cons."anyway". |
| 48e0 | 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 22 73 | 1)......................(cons."s |
| 4900 | 75 62 6d 69 74 69 64 22 20 73 75 62 6d 69 74 69 64 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | ubmitid".submitid).............. |
| 4920 | 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 22 75 72 6c 22 20 75 72 6c 29 29 29 0a 20 20 20 20 20 | ........(cons."url".url)))...... |
| 4940 | 20 20 20 20 28 72 65 73 70 6f 6e 73 65 20 28 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 | ....(response.(org-web-tools-arc |
| 4960 | 68 69 76 65 2d 2d 72 65 71 75 65 73 74 20 73 75 62 6d 69 74 2d 75 72 6c 0a 20 20 20 20 20 20 20 | hive--request.submit-url........ |
| 4980 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 79 70 65 20 22 50 4f 53 54 22 0a 20 20 20 20 20 | ..............:type."POST"...... |
| 49a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 64 61 74 61 20 64 61 74 61 0a 20 20 20 20 20 | ................:data.data...... |
| 49c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 74 69 6d 65 6f 75 74 20 31 30 0a 20 20 20 20 | ................:timeout.10..... |
| 49e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 73 79 6e 63 20 74 29 29 0a 20 20 20 20 20 | .................:sync.t))...... |
| 4a00 | 20 20 20 20 28 72 65 66 72 65 73 68 20 28 72 65 71 75 65 73 74 2d 72 65 73 70 6f 6e 73 65 2d 68 | ....(refresh.(request-response-h |
| 4a20 | 65 61 64 65 72 20 72 65 73 70 6f 6e 73 65 20 22 52 65 66 72 65 73 68 22 29 29 29 0a 20 20 20 20 | eader.response."Refresh")))..... |
| 4a40 | 28 77 68 65 6e 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 28 72 78 20 22 75 72 6c 3d 68 74 74 | (when.(string-match.(rx."url=htt |
| 4a60 | 70 22 20 28 6f 70 74 69 6f 6e 61 6c 20 22 73 22 29 20 22 3a 2f 2f 22 0a 20 20 20 20 20 20 20 20 | p".(optional."s")."://"......... |
| 4a80 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 31 2b 20 28 6e 6f 74 20 28 61 6e | ....................(1+.(not.(an |
| 4aa0 | 79 20 22 2f 22 29 29 29 20 22 2f 22 20 20 20 3b 20 68 6f 73 74 6e 61 6d 65 0a 20 20 20 20 20 20 | y."/")))."/"...;.hostname....... |
| 4ac0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 72 6f 75 70 20 28 31 2b | ......................(group.(1+ |
| 4ae0 | 20 61 6e 79 74 68 69 6e 67 29 29 29 20 20 20 20 20 3b 20 49 44 0a 20 20 20 20 20 20 20 20 20 20 | .anything))).....;.ID........... |
| 4b00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 72 65 66 72 65 73 68 29 0a 20 20 20 20 20 20 28 6d 61 | ..............refresh).......(ma |
| 4b20 | 74 63 68 2d 73 74 72 69 6e 67 20 31 20 72 65 66 72 65 73 68 29 29 29 29 0a 0a 28 64 65 66 75 6e | tch-string.1.refresh))))..(defun |
| 4b40 | 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 2d 61 72 63 68 69 76 65 2e | .org-web-tools-archive--archive. |
| 4b60 | 69 73 2d 73 75 62 6d 69 74 69 64 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 6e 65 77 20 73 75 62 | is-submitid.()..."Return.new.sub |
| 4b80 | 6d 69 73 73 69 6f 6e 20 49 44 20 73 74 72 69 6e 67 2e 0a 53 69 67 6e 61 6c 20 65 72 72 6f 72 20 | mission.ID.string..Signal.error. |
| 4ba0 | 69 66 20 75 6e 61 62 6c 65 20 74 6f 20 67 65 74 20 69 74 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 | if.unable.to.get.it."...(let*.(( |
| 4bc0 | 75 72 6c 20 28 63 6f 6e 63 61 74 20 22 68 74 74 70 73 3a 2f 2f 22 20 6f 72 67 2d 77 65 62 2d 74 | url.(concat."https://".org-web-t |
| 4be0 | 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 68 6f 73 74 6e 61 6d 65 20 22 2f 22 29 29 0a 20 20 20 20 | ools-archive-hostname."/"))..... |
| 4c00 | 20 20 20 20 20 28 70 61 72 73 65 72 20 28 6c 61 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 | .....(parser.(lambda.()......... |
| 4c20 | 20 20 20 20 20 20 20 20 20 20 20 28 2d 6c 65 74 2a 20 28 28 74 72 65 65 20 28 6c 69 62 78 6d 6c | ...........(-let*.((tree.(libxml |
| 4c40 | 2d 70 61 72 73 65 2d 68 74 6d 6c 2d 72 65 67 69 6f 6e 20 28 70 6f 69 6e 74 29 20 28 70 6f 69 6e | -parse-html-region.(point).(poin |
| 4c60 | 74 2d 6d 61 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | t-max)))........................ |
| 4c80 | 20 20 20 20 28 28 5f 65 6c 65 6d 65 6e 74 20 2e 20 28 61 74 74 72 73 29 29 20 28 65 73 78 6d 6c | ....((_element...(attrs)).(esxml |
| 4ca0 | 2d 71 75 65 72 79 20 22 69 6e 70 75 74 5b 6e 61 6d 65 3d 73 75 62 6d 69 74 69 64 5d 22 20 74 72 | -query."input[name=submitid]".tr |
| 4cc0 | 65 65 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 6c 69 73 | ee)))......................(alis |
| 4ce0 | 74 2d 67 65 74 20 27 76 61 6c 75 65 20 61 74 74 72 73 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 | t-get.'value.attrs)))).......... |
| 4d00 | 28 72 65 73 70 6f 6e 73 65 20 28 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 | (response.(org-web-tools-archive |
| 4d20 | 2d 2d 72 65 71 75 65 73 74 20 75 72 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | --request.url................... |
| 4d40 | 20 20 20 3a 73 79 6e 63 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ...:sync.t...................... |
| 4d60 | 3a 70 61 72 73 65 72 20 70 61 72 73 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | :parser.parser.................. |
| 4d80 | 20 20 20 20 3a 73 75 63 63 65 73 73 20 28 63 6c 2d 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 | ....:success.(cl-function....... |
| 4da0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6c 61 6d 62 64 61 | .........................(lambda |
| 4dc0 | 20 28 26 6b 65 79 20 64 61 74 61 20 26 61 6c 6c 6f 77 2d 6f 74 68 65 72 2d 6b 65 79 73 29 0a 20 | .(&key.data.&allow-other-keys).. |
| 4de0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 4e00 | 64 61 74 61 29 29 29 29 29 0a 20 20 20 20 28 6f 72 20 28 72 65 71 75 65 73 74 2d 72 65 73 70 6f | data))))).....(or.(request-respo |
| 4e20 | 6e 73 65 2d 64 61 74 61 20 72 65 73 70 6f 6e 73 65 29 0a 20 20 20 20 20 20 20 20 28 65 72 72 6f | nse-data.response).........(erro |
| 4e40 | 72 20 22 55 6e 61 62 6c 65 20 74 6f 20 67 65 74 20 73 75 62 6d 69 74 69 64 22 29 29 29 29 0a 0a | r."Unable.to.get.submitid")))).. |
| 4e60 | 28 64 65 66 75 6e 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 65 2d 2d 72 65 | (defun.org-web-tools-archive--re |
| 4e80 | 71 75 65 73 74 20 28 26 72 65 73 74 20 61 72 67 73 29 0a 20 20 22 57 72 61 70 70 65 72 20 66 6f | quest.(&rest.args)..."Wrapper.fo |
| 4ea0 | 72 20 60 72 65 71 75 65 73 74 27 2e 0a 50 61 73 73 65 73 20 41 52 47 53 2e 22 0a 20 20 28 64 65 | r.`request'..Passes.ARGS."...(de |
| 4ec0 | 63 6c 61 72 65 20 28 69 6e 64 65 6e 74 20 64 65 66 75 6e 29 29 0a 20 20 3b 3b 20 57 68 65 6e 20 | clare.(indent.defun))...;;.When. |
| 4ee0 | 75 73 69 6e 67 20 74 68 65 20 63 75 72 6c 20 62 61 63 6b 65 6e 64 20 77 69 74 68 20 22 50 4f 53 | using.the.curl.backend.with."POS |
| 4f00 | 54 22 2c 20 60 72 65 71 75 65 73 74 27 20 61 6c 77 61 79 73 20 72 65 74 75 72 6e 73 20 62 65 66 | T",.`request'.always.returns.bef |
| 4f20 | 6f 72 65 0a 20 20 3b 3b 20 74 68 65 20 72 65 71 75 65 73 74 20 61 63 74 75 61 6c 6c 79 20 63 6f | ore...;;.the.request.actually.co |
| 4f40 | 6d 70 6c 65 74 65 73 2e 20 20 53 6f 20 77 65 20 75 73 65 20 74 68 65 20 60 75 72 6c 2d 72 65 74 | mpletes...So.we.use.the.`url-ret |
| 4f60 | 72 69 65 76 65 27 20 62 61 63 6b 65 6e 64 2c 0a 20 20 3b 3b 20 77 68 69 63 68 20 73 65 65 6d 73 | rieve'.backend,...;;.which.seems |
| 4f80 | 20 74 6f 20 77 6f 72 6b 20 63 6f 72 72 65 63 74 6c 79 2e 0a 20 20 28 6c 65 74 20 28 28 72 65 71 | .to.work.correctly....(let.((req |
| 4fa0 | 75 65 73 74 2d 6c 6f 67 2d 6c 65 76 65 6c 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 | uest-log-level.org-web-tools-arc |
| 4fc0 | 68 69 76 65 2d 64 65 62 75 67 2d 6c 65 76 65 6c 29 0a 20 20 20 20 20 20 20 20 28 72 65 71 75 65 | hive-debug-level).........(reque |
| 4fe0 | 73 74 2d 62 61 63 6b 65 6e 64 20 27 75 72 6c 2d 72 65 74 72 69 65 76 65 29 29 0a 20 20 20 20 28 | st-backend.'url-retrieve)).....( |
| 5000 | 61 70 70 6c 79 20 23 27 72 65 71 75 65 73 74 20 61 72 67 73 29 29 29 0a 0a 3b 3b 3b 3b 20 46 6f | apply.#'request.args)))..;;;;.Fo |
| 5020 | 6f 74 65 72 0a 0a 28 70 72 6f 76 69 64 65 20 27 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 | oter..(provide.'org-web-tools-ar |
| 5040 | 63 68 69 76 65 29 0a 0a 3b 3b 3b 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 61 72 63 68 69 76 | chive)..;;;.org-web-tools-archiv |
| 5060 | 65 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a 0a 3b 3b 20 4c 6f 63 61 6c 20 56 61 72 69 61 62 6c | e.el.ends.here..;;.Local.Variabl |
| 5080 | 65 73 3a 0a 3b 3b 20 66 69 6c 6c 2d 63 6f 6c 75 6d 6e 3a 20 38 30 0a 3b 3b 20 45 6e 64 3a 0a 00 | es:.;;.fill-column:.80.;;.End:.. |
| 50a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 50c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 50e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 5100 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 5120 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 5140 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 5160 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 5180 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 51a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 51c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 51e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 5200 | 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 32 30 32 33 31 32 32 30 2e 31 35 31 35 2f 6f 72 67 2d | org-web-tools-20231220.1515/org- |
| 5220 | 77 65 62 2d 74 6f 6f 6c 73 2d 70 6b 67 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | web-tools-pkg.el................ |
| 5240 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 5260 | 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 |
| 5280 | 30 30 30 31 31 35 34 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 37 33 30 32 00 20 30 00 00 00 | 0001154.00000000000.017302..0... |
| 52a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 52c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 52e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 5300 | 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................... |
| 5320 | 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................... |
| 5340 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 5360 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 5380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 53a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 53c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 53e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 5400 | 3b 3b 20 2d 2a 2d 20 6e 6f 2d 62 79 74 65 2d 63 6f 6d 70 69 6c 65 3a 20 74 3b 20 6c 65 78 69 63 | ;;.-*-.no-byte-compile:.t;.lexic |
| 5420 | 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 6e 69 6c 20 2d 2a 2d 0a 28 64 65 66 69 6e 65 2d 70 61 63 6b | al-binding:.nil.-*-.(define-pack |
| 5440 | 61 67 65 20 22 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 22 20 22 32 30 32 33 31 32 32 30 2e 31 35 | age."org-web-tools"."20231220.15 |
| 5460 | 31 35 22 0a 20 20 22 44 69 73 70 6c 61 79 20 61 6e 64 20 63 61 70 74 75 72 65 20 77 65 62 20 63 | 15"..."Display.and.capture.web.c |
| 5480 | 6f 6e 74 65 6e 74 20 77 69 74 68 20 4f 72 67 2d 6d 6f 64 65 2e 22 0a 20 20 27 28 28 65 6d 61 63 | ontent.with.Org-mode."...'((emac |
| 54a0 | 73 20 20 20 22 32 37 2e 31 22 29 0a 20 20 20 20 28 6f 72 67 20 20 20 20 20 22 39 2e 30 22 29 0a | s..."27.1").....(org....."9.0"). |
| 54c0 | 20 20 20 20 28 63 6f 6d 70 61 74 20 20 22 32 39 2e 31 2e 34 2e 32 22 29 0a 20 20 20 20 28 64 61 | ....(compat.."29.1.4.2").....(da |
| 54e0 | 73 68 20 20 20 20 22 32 2e 31 32 22 29 0a 20 20 20 20 28 65 73 78 6d 6c 20 20 20 22 30 2e 33 2e | sh...."2.12").....(esxml..."0.3. |
| 5500 | 34 22 29 0a 20 20 20 20 28 73 20 20 20 20 20 20 20 22 31 2e 31 30 2e 30 22 29 0a 20 20 20 20 28 | 4").....(s......."1.10.0").....( |
| 5520 | 70 6c 7a 20 20 20 20 20 22 30 2e 37 2e 31 22 29 0a 20 20 20 20 28 72 65 71 75 65 73 74 20 22 30 | plz....."0.7.1").....(request."0 |
| 5540 | 2e 33 2e 30 22 29 29 0a 20 20 3a 75 72 6c 20 22 68 74 74 70 3a 2f 2f 67 69 74 68 75 62 2e 63 6f | .3.0"))...:url."http://github.co |
| 5560 | 6d 2f 61 6c 70 68 61 70 61 70 61 2f 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 22 0a 20 20 3a 63 6f | m/alphapapa/org-web-tools"...:co |
| 5580 | 6d 6d 69 74 20 22 37 61 36 34 39 38 66 34 34 32 66 63 37 66 32 39 35 30 34 37 34 35 36 34 39 39 | mmit."7a6498f442fc7f295047456499 |
| 55a0 | 34 38 36 33 35 63 37 31 36 35 64 38 34 37 22 0a 20 20 3a 72 65 76 64 65 73 63 20 22 37 61 36 34 | 48635c7165d847"...:revdesc."7a64 |
| 55c0 | 39 38 66 34 34 32 66 63 22 0a 20 20 3a 6b 65 79 77 6f 72 64 73 20 27 28 22 68 79 70 65 72 6d 65 | 98f442fc"...:keywords.'("hyperme |
| 55e0 | 64 69 61 22 20 22 6f 75 74 6c 69 6e 65 73 22 20 22 6f 72 67 22 20 22 77 65 62 22 29 0a 20 20 3a | dia"."outlines"."org"."web")...: |
| 5600 | 61 75 74 68 6f 72 73 20 27 28 28 22 41 64 61 6d 20 50 6f 72 74 65 72 22 20 2e 20 22 61 64 61 6d | authors.'(("Adam.Porter"..."adam |
| 5620 | 40 61 6c 70 68 61 70 61 70 61 2e 6e 65 74 22 29 29 0a 20 20 3a 6d 61 69 6e 74 61 69 6e 65 72 73 | @alphapapa.net"))...:maintainers |
| 5640 | 20 27 28 28 22 41 64 61 6d 20 50 6f 72 74 65 72 22 20 2e 20 22 61 64 61 6d 40 61 6c 70 68 61 70 | .'(("Adam.Porter"..."adam@alphap |
| 5660 | 61 70 61 2e 6e 65 74 22 29 29 29 0a 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | apa.net")))..................... |
| 5680 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 56a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 56c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 56e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 5700 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 5720 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 5740 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 5760 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 5780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 57a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 57c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 57e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 5800 | 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 32 30 32 33 31 32 32 30 2e 31 35 31 35 2f 6f 72 67 2d | org-web-tools-20231220.1515/org- |
| 5820 | 77 65 62 2d 74 6f 6f 6c 73 2e 65 6c 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | web-tools.el.................... |
| 5840 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 5860 | 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 |
| 5880 | 30 30 35 31 37 34 30 00 30 30 30 30 30 30 30 30 30 30 30 00 30 31 36 35 33 31 00 20 30 00 00 00 | 0051740.00000000000.016531..0... |
| 58a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 58c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 58e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 5900 | 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................... |
| 5920 | 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................... |
| 5940 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 5960 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 5980 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 59a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 59c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 59e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| 5a00 | 3b 3b 3b 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2e 65 6c 20 2d 2d 2d 20 44 69 73 70 6c 61 79 | ;;;.org-web-tools.el.---.Display |
| 5a20 | 20 61 6e 64 20 63 61 70 74 75 72 65 20 77 65 62 20 63 6f 6e 74 65 6e 74 20 77 69 74 68 20 4f 72 | .and.capture.web.content.with.Or |
| 5a40 | 67 2d 6d 6f 64 65 20 20 2d 2a 2d 20 6c 65 78 69 63 61 6c 2d 62 69 6e 64 69 6e 67 3a 20 74 20 2d | g-mode..-*-.lexical-binding:.t.- |
| 5a60 | 2a 2d 0a 0a 3b 3b 20 43 6f 70 79 72 69 67 68 74 20 28 43 29 20 32 30 31 37 2d 32 30 32 33 20 20 | *-..;;.Copyright.(C).2017-2023.. |
| 5a80 | 41 64 61 6d 20 50 6f 72 74 65 72 0a 0a 3b 3b 20 41 75 74 68 6f 72 3a 20 41 64 61 6d 20 50 6f 72 | Adam.Porter..;;.Author:.Adam.Por |
| 5aa0 | 74 65 72 20 3c 61 64 61 6d 40 61 6c 70 68 61 70 61 70 61 2e 6e 65 74 3e 0a 3b 3b 20 55 72 6c 3a | ter.<adam@alphapapa.net>.;;.Url: |
| 5ac0 | 20 68 74 74 70 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 6c 70 68 61 70 61 70 61 2f 6f 72 67 | .http://github.com/alphapapa/org |
| 5ae0 | 2d 77 65 62 2d 74 6f 6f 6c 73 0a 3b 3b 20 50 61 63 6b 61 67 65 2d 56 65 72 73 69 6f 6e 3a 20 32 | -web-tools.;;.Package-Version:.2 |
| 5b00 | 30 32 33 31 32 32 30 2e 31 35 31 35 0a 3b 3b 20 50 61 63 6b 61 67 65 2d 52 65 76 69 73 69 6f 6e | 0231220.1515.;;.Package-Revision |
| 5b20 | 3a 20 37 61 36 34 39 38 66 34 34 32 66 63 0a 3b 3b 20 50 61 63 6b 61 67 65 2d 52 65 71 75 69 72 | :.7a6498f442fc.;;.Package-Requir |
| 5b40 | 65 73 3a 20 28 28 65 6d 61 63 73 20 22 32 37 2e 31 22 29 20 28 6f 72 67 20 22 39 2e 30 22 29 20 | es:.((emacs."27.1").(org."9.0"). |
| 5b60 | 28 63 6f 6d 70 61 74 20 22 32 39 2e 31 2e 34 2e 32 22 29 20 28 64 61 73 68 20 22 32 2e 31 32 22 | (compat."29.1.4.2").(dash."2.12" |
| 5b80 | 29 20 28 65 73 78 6d 6c 20 22 30 2e 33 2e 34 22 29 20 28 73 20 22 31 2e 31 30 2e 30 22 29 20 28 | ).(esxml."0.3.4").(s."1.10.0").( |
| 5ba0 | 70 6c 7a 20 22 30 2e 37 2e 31 22 29 20 28 72 65 71 75 65 73 74 20 22 30 2e 33 2e 30 22 29 29 0a | plz."0.7.1").(request."0.3.0")). |
| 5bc0 | 3b 3b 20 4b 65 79 77 6f 72 64 73 3a 20 68 79 70 65 72 6d 65 64 69 61 2c 20 6f 75 74 6c 69 6e 65 | ;;.Keywords:.hypermedia,.outline |
| 5be0 | 73 2c 20 4f 72 67 2c 20 57 65 62 0a 0a 3b 3b 3b 20 43 6f 6d 6d 65 6e 74 61 72 79 3a 0a 0a 3b 3b | s,.Org,.Web..;;;.Commentary:..;; |
| 5c00 | 20 54 68 69 73 20 66 69 6c 65 20 63 6f 6e 74 61 69 6e 73 20 6c 69 62 72 61 72 79 20 66 75 6e 63 | .This.file.contains.library.func |
| 5c20 | 74 69 6f 6e 73 20 61 6e 64 20 63 6f 6d 6d 61 6e 64 73 20 75 73 65 66 75 6c 20 66 6f 72 0a 3b 3b | tions.and.commands.useful.for.;; |
| 5c40 | 20 72 65 74 72 69 65 76 69 6e 67 20 77 65 62 20 70 61 67 65 20 63 6f 6e 74 65 6e 74 20 61 6e 64 | .retrieving.web.page.content.and |
| 5c60 | 20 70 72 6f 63 65 73 73 69 6e 67 20 69 74 20 69 6e 74 6f 20 4f 72 67 2d 6d 6f 64 65 0a 3b 3b 20 | .processing.it.into.Org-mode.;;. |
| 5c80 | 63 6f 6e 74 65 6e 74 2e 0a 0a 3b 3b 20 46 6f 72 20 65 78 61 6d 70 6c 65 2c 20 79 6f 75 20 63 61 | content...;;.For.example,.you.ca |
| 5ca0 | 6e 20 63 6f 70 79 20 61 20 55 52 4c 20 74 6f 20 74 68 65 20 63 6c 69 70 62 6f 61 72 64 20 6f 72 | n.copy.a.URL.to.the.clipboard.or |
| 5cc0 | 20 6b 69 6c 6c 2d 72 69 6e 67 2c 20 74 68 65 6e 0a 3b 3b 20 72 75 6e 20 61 20 63 6f 6d 6d 61 6e | .kill-ring,.then.;;.run.a.comman |
| 5ce0 | 64 20 74 68 61 74 20 64 6f 77 6e 6c 6f 61 64 73 20 74 68 65 20 70 61 67 65 2c 20 69 73 6f 6c 61 | d.that.downloads.the.page,.isola |
| 5d00 | 74 65 73 20 74 68 65 20 22 72 65 61 64 61 62 6c 65 22 0a 3b 3b 20 63 6f 6e 74 65 6e 74 20 77 69 | tes.the."readable".;;.content.wi |
| 5d20 | 74 68 20 60 65 77 77 2d 72 65 61 64 61 62 6c 65 27 2c 20 63 6f 6e 76 65 72 74 73 20 69 74 20 74 | th.`eww-readable',.converts.it.t |
| 5d40 | 6f 20 4f 72 67 2d 6d 6f 64 65 20 63 6f 6e 74 65 6e 74 20 77 69 74 68 0a 3b 3b 20 50 61 6e 64 6f | o.Org-mode.content.with.;;.Pando |
| 5d60 | 63 2c 20 61 6e 64 20 64 69 73 70 6c 61 79 73 20 69 74 20 69 6e 20 61 6e 20 4f 72 67 2d 6d 6f 64 | c,.and.displays.it.in.an.Org-mod |
| 5d80 | 65 20 62 75 66 66 65 72 2e 20 20 41 6e 6f 74 68 65 72 20 63 6f 6d 6d 61 6e 64 0a 3b 3b 20 64 6f | e.buffer...Another.command.;;.do |
| 5da0 | 65 73 20 61 6c 6c 20 6f 66 20 74 68 61 74 20 62 75 74 20 69 6e 73 65 72 74 73 20 69 74 20 61 73 | es.all.of.that.but.inserts.it.as |
| 5dc0 | 20 61 6e 20 4f 72 67 20 65 6e 74 72 79 20 69 6e 73 74 65 61 64 20 6f 66 0a 3b 3b 20 64 69 73 70 | .an.Org.entry.instead.of.;;.disp |
| 5de0 | 6c 61 79 69 6e 67 20 69 74 20 69 6e 20 61 20 6e 65 77 20 62 75 66 66 65 72 2e 0a 0a 3b 3b 3b 3b | laying.it.in.a.new.buffer...;;;; |
| 5e00 | 20 43 6f 6d 6d 61 6e 64 73 3a 0a 0a 3b 3b 20 60 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 69 6e | .Commands:..;;.`org-web-tools-in |
| 5e20 | 73 65 72 74 2d 6c 69 6e 6b 2d 66 6f 72 2d 75 72 6c 27 3a 20 49 6e 73 65 72 74 20 61 6e 20 4f 72 | sert-link-for-url':.Insert.an.Or |
| 5e40 | 67 2d 6d 6f 64 65 20 6c 69 6e 6b 20 74 6f 20 74 68 65 0a 3b 3b 20 55 52 4c 20 69 6e 20 74 68 65 | g-mode.link.to.the.;;.URL.in.the |
| 5e60 | 20 63 6c 69 70 62 6f 61 72 64 20 6f 72 20 6b 69 6c 6c 2d 72 69 6e 67 2e 20 20 44 6f 77 6e 6c 6f | .clipboard.or.kill-ring...Downlo |
| 5e80 | 61 64 73 20 74 68 65 20 70 61 67 65 20 74 6f 20 67 65 74 20 74 68 65 0a 3b 3b 20 48 54 4d 4c 20 | ads.the.page.to.get.the.;;.HTML. |
| 5ea0 | 74 69 74 6c 65 2e 0a 0a 3b 3b 20 60 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 69 6e 73 65 72 74 | title...;;.`org-web-tools-insert |
| 5ec0 | 2d 77 65 62 2d 70 61 67 65 2d 61 73 2d 65 6e 74 72 79 27 3a 20 49 6e 73 65 72 74 20 74 68 65 20 | -web-page-as-entry':.Insert.the. |
| 5ee0 | 77 65 62 20 70 61 67 65 20 66 6f 72 0a 3b 3b 20 74 68 65 20 55 52 4c 20 69 6e 20 74 68 65 20 63 | web.page.for.;;.the.URL.in.the.c |
| 5f00 | 6c 69 70 62 6f 61 72 64 20 6f 72 20 6b 69 6c 6c 2d 72 69 6e 67 20 61 73 20 61 6e 20 4f 72 67 2d | lipboard.or.kill-ring.as.an.Org- |
| 5f20 | 6d 6f 64 65 20 65 6e 74 72 79 2c 20 61 73 20 61 0a 3b 3b 20 73 69 62 6c 69 6e 67 20 68 65 61 64 | mode.entry,.as.a.;;.sibling.head |
| 5f40 | 69 6e 67 20 6f 66 20 74 68 65 20 63 75 72 72 65 6e 74 20 65 6e 74 72 79 2e 0a 0a 3b 3b 20 60 6f | ing.of.the.current.entry...;;.`o |
| 5f60 | 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 72 65 61 64 2d 75 72 6c 2d 61 73 2d 6f 72 67 27 3a 20 44 | rg-web-tools-read-url-as-org':.D |
| 5f80 | 69 73 70 6c 61 79 20 74 68 65 20 77 65 62 20 70 61 67 65 20 66 6f 72 20 74 68 65 20 55 52 4c 0a | isplay.the.web.page.for.the.URL. |
| 5fa0 | 3b 3b 20 69 6e 20 74 68 65 20 63 6c 69 70 62 6f 61 72 64 20 6f 72 20 6b 69 6c 6c 2d 72 69 6e 67 | ;;.in.the.clipboard.or.kill-ring |
| 5fc0 | 20 61 73 20 4f 72 67 2d 6d 6f 64 65 20 74 65 78 74 20 69 6e 20 61 20 6e 65 77 20 62 75 66 66 65 | .as.Org-mode.text.in.a.new.buffe |
| 5fe0 | 72 2c 0a 3b 3b 20 70 72 6f 63 65 73 73 65 64 20 77 69 74 68 20 60 65 77 77 2d 72 65 61 64 61 62 | r,.;;.processed.with.`eww-readab |
| 6000 | 6c 65 27 2e 0a 0a 3b 3b 20 60 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 63 6f 6e 76 65 72 74 2d | le'...;;.`org-web-tools-convert- |
| 6020 | 6c 69 6e 6b 73 2d 74 6f 2d 70 61 67 65 2d 65 6e 74 72 69 65 73 27 3a 20 57 69 74 68 20 70 6f 69 | links-to-page-entries':.With.poi |
| 6040 | 6e 74 20 6f 6e 20 61 0a 3b 3b 20 6c 69 73 74 20 6f 66 20 55 52 4c 73 20 69 6e 20 61 6e 20 4f 72 | nt.on.a.;;.list.of.URLs.in.an.Or |
| 6060 | 67 2d 6d 6f 64 65 20 62 75 66 66 65 72 2c 20 72 65 70 6c 61 63 65 20 74 68 65 20 6c 69 73 74 20 | g-mode.buffer,.replace.the.list. |
| 6080 | 6f 66 20 55 52 4c 73 20 77 69 74 68 20 61 0a 3b 3b 20 6c 69 73 74 20 6f 66 20 4f 72 67 20 68 65 | of.URLs.with.a.;;.list.of.Org.he |
| 60a0 | 61 64 69 6e 67 73 2c 20 65 61 63 68 20 63 6f 6e 74 61 69 6e 69 6e 67 20 74 68 65 20 77 65 62 20 | adings,.each.containing.the.web. |
| 60c0 | 70 61 67 65 20 63 6f 6e 74 65 6e 74 20 6f 66 20 74 68 61 74 0a 3b 3b 20 55 52 4c 2c 20 63 6f 6e | page.content.of.that.;;.URL,.con |
| 60e0 | 76 65 72 74 65 64 20 74 6f 20 4f 72 67 2d 6d 6f 64 65 20 74 65 78 74 20 61 6e 64 20 70 72 6f 63 | verted.to.Org-mode.text.and.proc |
| 6100 | 65 73 73 65 64 20 77 69 74 68 20 60 65 77 77 2d 72 65 61 64 61 62 6c 65 27 2e 0a 0a 3b 3b 3b 3b | essed.with.`eww-readable'...;;;; |
| 6120 | 20 46 75 6e 63 74 69 6f 6e 73 3a 0a 0a 3b 3b 20 54 68 65 73 65 20 61 72 65 20 75 73 65 64 20 69 | .Functions:..;;.These.are.used.i |
| 6140 | 6e 20 74 68 65 20 63 6f 6d 6d 61 6e 64 73 20 61 62 6f 76 65 20 61 6e 64 20 6d 61 79 20 62 65 20 | n.the.commands.above.and.may.be. |
| 6160 | 75 73 65 66 75 6c 20 69 6e 20 62 75 69 6c 64 69 6e 67 0a 3b 3b 20 79 6f 75 72 20 6f 77 6e 20 63 | useful.in.building.;;.your.own.c |
| 6180 | 6f 6d 6d 61 6e 64 73 2e 0a 0a 3b 3b 20 60 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 64 6f 6d | ommands...;;.`org-web-tools--dom |
| 61a0 | 2d 74 6f 2d 68 74 6d 6c 27 3a 20 52 65 74 75 72 6e 20 70 61 72 73 65 64 20 48 54 4d 4c 20 44 4f | -to-html':.Return.parsed.HTML.DO |
| 61c0 | 4d 20 61 73 20 61 6e 20 48 54 4d 4c 0a 3b 3b 20 73 74 72 69 6e 67 2e 20 20 4e 6f 74 65 3a 20 54 | M.as.an.HTML.;;.string...Note:.T |
| 61e0 | 68 69 73 20 69 73 20 61 6e 20 61 70 70 72 6f 78 69 6d 61 74 69 6f 6e 20 61 6e 64 20 69 73 20 6e | his.is.an.approximation.and.is.n |
| 6200 | 6f 74 20 6e 65 63 65 73 73 61 72 69 6c 79 0a 3b 3b 20 63 6f 72 72 65 63 74 20 48 54 4d 4c 20 28 | ot.necessarily.;;.correct.HTML.( |
| 6220 | 65 2e 67 2e 20 49 4d 47 20 74 61 67 73 20 6d 61 79 20 62 65 20 72 65 6e 64 65 72 65 64 20 77 69 | e.g..IMG.tags.may.be.rendered.wi |
| 6240 | 74 68 20 61 20 63 6c 6f 73 69 6e 67 20 22 3c 2f 69 6d 67 3e 22 0a 3b 3b 20 74 61 67 29 2e 0a 0a | th.a.closing."</img>".;;.tag)... |
| 6260 | 3b 3b 20 60 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 65 77 77 2d 72 65 61 64 61 62 6c 65 27 | ;;.`org-web-tools--eww-readable' |
| 6280 | 3a 20 52 65 74 75 72 6e 20 22 72 65 61 64 61 62 6c 65 22 20 70 61 72 74 20 6f 66 20 48 54 4d 4c | :.Return."readable".part.of.HTML |
| 62a0 | 20 77 69 74 68 0a 3b 3b 20 74 69 74 6c 65 2e 0a 0a 3b 3b 20 60 6f 72 67 2d 77 65 62 2d 74 6f 6f | .with.;;.title...;;.`org-web-too |
| 62c0 | 6c 73 2d 2d 67 65 74 2d 75 72 6c 27 3a 20 52 65 74 75 72 6e 20 63 6f 6e 74 65 6e 74 20 66 6f 72 | ls--get-url':.Return.content.for |
| 62e0 | 20 55 52 4c 20 61 73 20 73 74 72 69 6e 67 2e 0a 0a 3b 3b 20 60 6f 72 67 2d 77 65 62 2d 74 6f 6f | .URL.as.string...;;.`org-web-too |
| 6300 | 6c 73 2d 2d 68 74 6d 6c 2d 74 6f 2d 6f 72 67 2d 77 69 74 68 2d 70 61 6e 64 6f 63 27 3a 20 52 65 | ls--html-to-org-with-pandoc':.Re |
| 6320 | 74 75 72 6e 20 73 74 72 69 6e 67 20 6f 66 20 48 54 4d 4c 0a 3b 3b 20 63 6f 6e 76 65 72 74 65 64 | turn.string.of.HTML.;;.converted |
| 6340 | 20 74 6f 20 4f 72 67 20 77 69 74 68 20 50 61 6e 64 6f 63 2e 0a 0a 3b 3b 20 60 6f 72 67 2d 77 65 | .to.Org.with.Pandoc...;;.`org-we |
| 6360 | 62 2d 74 6f 6f 6c 73 2d 2d 75 72 6c 2d 61 73 2d 72 65 61 64 61 62 6c 65 2d 6f 72 67 27 3a 20 52 | b-tools--url-as-readable-org':.R |
| 6380 | 65 74 75 72 6e 20 73 74 72 69 6e 67 20 63 6f 6e 74 61 69 6e 69 6e 67 20 4f 72 67 0a 3b 3b 20 65 | eturn.string.containing.Org.;;.e |
| 63a0 | 6e 74 72 79 20 6f 66 20 55 52 4c 27 73 20 77 65 62 20 70 61 67 65 20 63 6f 6e 74 65 6e 74 2e 20 | ntry.of.URL's.web.page.content.. |
| 63c0 | 20 43 6f 6e 74 65 6e 74 20 69 73 20 70 72 6f 63 65 73 73 65 64 20 77 69 74 68 0a 3b 3b 20 60 65 | .Content.is.processed.with.;;.`e |
| 63e0 | 77 77 2d 72 65 61 64 61 62 6c 65 27 20 61 6e 64 20 50 61 6e 64 6f 63 2e 20 20 45 6e 74 72 79 20 | ww-readable'.and.Pandoc...Entry. |
| 6400 | 77 69 6c 6c 20 62 65 20 61 20 74 6f 70 2d 6c 65 76 65 6c 20 68 65 61 64 69 6e 67 2c 20 77 69 74 | will.be.a.top-level.heading,.wit |
| 6420 | 68 0a 3b 3b 20 61 72 74 69 63 6c 65 20 63 6f 6e 74 65 6e 74 73 20 62 65 6c 6f 77 20 61 20 73 65 | h.;;.article.contents.below.a.se |
| 6440 | 63 6f 6e 64 2d 6c 65 76 65 6c 20 22 41 72 74 69 63 6c 65 22 20 68 65 61 64 69 6e 67 2c 20 61 6e | cond-level."Article".heading,.an |
| 6460 | 64 20 61 0a 3b 3b 20 74 69 6d 65 73 74 61 6d 70 20 69 6e 20 74 68 65 20 66 69 72 73 74 2d 6c 65 | d.a.;;.timestamp.in.the.first-le |
| 6480 | 76 65 6c 20 65 6e 74 72 79 20 66 6f 72 20 77 72 69 74 69 6e 67 20 63 6f 6d 6d 65 6e 74 73 2e 0a | vel.entry.for.writing.comments.. |
| 64a0 | 0a 3b 3b 20 60 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 64 65 6d 6f 74 65 2d 68 65 61 64 69 | .;;.`org-web-tools--demote-headi |
| 64c0 | 6e 67 73 2d 62 65 6c 6f 77 27 3a 20 44 65 6d 6f 74 65 20 61 6c 6c 20 68 65 61 64 69 6e 67 73 20 | ngs-below':.Demote.all.headings. |
| 64e0 | 69 6e 0a 3b 3b 20 62 75 66 66 65 72 20 73 6f 20 74 68 65 20 68 69 67 68 65 73 74 20 6c 65 76 65 | in.;;.buffer.so.the.highest.leve |
| 6500 | 6c 20 69 73 20 62 65 6c 6f 77 20 4c 45 56 45 4c 2e 0a 0a 3b 3b 20 60 6f 72 67 2d 77 65 62 2d 74 | l.is.below.LEVEL...;;.`org-web-t |
| 6520 | 6f 6f 6c 73 2d 2d 67 65 74 2d 66 69 72 73 74 2d 75 72 6c 27 3a 20 52 65 74 75 72 6e 20 55 52 4c | ools--get-first-url':.Return.URL |
| 6540 | 20 69 6e 20 63 6c 69 70 62 6f 61 72 64 2c 20 6f 72 20 66 69 72 73 74 0a 3b 3b 20 55 52 4c 20 69 | .in.clipboard,.or.first.;;.URL.i |
| 6560 | 6e 20 74 68 65 20 6b 69 6c 6c 2d 72 69 6e 67 2c 20 6f 72 20 6e 69 6c 20 69 66 20 6e 6f 6e 65 2e | n.the.kill-ring,.or.nil.if.none. |
| 6580 | 0a 0a 3b 3b 20 60 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 72 65 61 64 2d 6f 72 67 2d 62 72 | ..;;.`org-web-tools--read-org-br |
| 65a0 | 61 63 6b 65 74 2d 6c 69 6e 6b 27 3a 20 52 65 74 75 72 6e 20 28 54 41 52 47 45 54 20 2e 20 44 45 | acket-link':.Return.(TARGET...DE |
| 65c0 | 53 43 52 49 50 54 49 4f 4e 29 0a 3b 3b 20 66 6f 72 20 4f 72 67 20 62 72 61 63 6b 65 74 20 4c 49 | SCRIPTION).;;.for.Org.bracket.LI |
| 65e0 | 4e 4b 20 6f 72 20 6e 65 78 74 20 6c 69 6e 6b 20 6f 6e 20 63 75 72 72 65 6e 74 20 6c 69 6e 65 2e | NK.or.next.link.on.current.line. |
| 6600 | 0a 0a 3b 3b 20 60 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 72 65 6d 6f 76 65 2d 64 6f 73 2d | ..;;.`org-web-tools--remove-dos- |
| 6620 | 63 72 6c 66 27 3a 20 52 65 6d 6f 76 65 20 61 6c 6c 20 44 4f 53 20 43 52 4c 46 20 28 5e 4d 29 20 | crlf':.Remove.all.DOS.CRLF.(^M). |
| 6640 | 69 6e 20 62 75 66 66 65 72 2e 0a 0a 3b 3b 3b 20 4c 69 63 65 6e 73 65 3a 0a 0a 3b 3b 20 54 68 69 | in.buffer...;;;.License:..;;.Thi |
| 6660 | 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 79 6f 75 20 | s.program.is.free.software;.you. |
| 6680 | 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 20 6d 6f 64 69 66 | can.redistribute.it.and/or.modif |
| 66a0 | 79 0a 3b 3b 20 69 74 20 75 6e 64 65 72 20 74 68 65 20 74 65 72 6d 73 20 6f 66 20 74 68 65 20 47 | y.;;.it.under.the.terms.of.the.G |
| 66c0 | 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 20 70 75 62 | NU.General.Public.License.as.pub |
| 66e0 | 6c 69 73 68 65 64 20 62 79 0a 3b 3b 20 74 68 65 20 46 72 65 65 20 53 6f 66 74 77 61 72 65 20 46 | lished.by.;;.the.Free.Software.F |
| 6700 | 6f 75 6e 64 61 74 69 6f 6e 2c 20 65 69 74 68 65 72 20 76 65 72 73 69 6f 6e 20 33 20 6f 66 20 74 | oundation,.either.version.3.of.t |
| 6720 | 68 65 20 4c 69 63 65 6e 73 65 2c 20 6f 72 0a 3b 3b 20 28 61 74 20 79 6f 75 72 20 6f 70 74 69 6f | he.License,.or.;;.(at.your.optio |
| 6740 | 6e 29 20 61 6e 79 20 6c 61 74 65 72 20 76 65 72 73 69 6f 6e 2e 0a 0a 3b 3b 20 54 68 69 73 20 70 | n).any.later.version...;;.This.p |
| 6760 | 72 6f 67 72 61 6d 20 69 73 20 64 69 73 74 72 69 62 75 74 65 64 20 69 6e 20 74 68 65 20 68 6f 70 | rogram.is.distributed.in.the.hop |
| 6780 | 65 20 74 68 61 74 20 69 74 20 77 69 6c 6c 20 62 65 20 75 73 65 66 75 6c 2c 0a 3b 3b 20 62 75 74 | e.that.it.will.be.useful,.;;.but |
| 67a0 | 20 57 49 54 48 4f 55 54 20 41 4e 59 20 57 41 52 52 41 4e 54 59 3b 20 77 69 74 68 6f 75 74 20 65 | .WITHOUT.ANY.WARRANTY;.without.e |
| 67c0 | 76 65 6e 20 74 68 65 20 69 6d 70 6c 69 65 64 20 77 61 72 72 61 6e 74 79 20 6f 66 0a 3b 3b 20 4d | ven.the.implied.warranty.of.;;.M |
| 67e0 | 45 52 43 48 41 4e 54 41 42 49 4c 49 54 59 20 6f 72 20 46 49 54 4e 45 53 53 20 46 4f 52 20 41 20 | ERCHANTABILITY.or.FITNESS.FOR.A. |
| 6800 | 50 41 52 54 49 43 55 4c 41 52 20 50 55 52 50 4f 53 45 2e 20 20 53 65 65 20 74 68 65 0a 3b 3b 20 | PARTICULAR.PURPOSE...See.the.;;. |
| 6820 | 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 66 6f 72 20 6d | GNU.General.Public.License.for.m |
| 6840 | 6f 72 65 20 64 65 74 61 69 6c 73 2e 0a 0a 3b 3b 20 59 6f 75 20 73 68 6f 75 6c 64 20 68 61 76 65 | ore.details...;;.You.should.have |
| 6860 | 20 72 65 63 65 69 76 65 64 20 61 20 63 6f 70 79 20 6f 66 20 74 68 65 20 47 4e 55 20 47 65 6e 65 | .received.a.copy.of.the.GNU.Gene |
| 6880 | 72 61 6c 20 50 75 62 6c 69 63 20 4c 69 63 65 6e 73 65 0a 3b 3b 20 61 6c 6f 6e 67 20 77 69 74 68 | ral.Public.License.;;.along.with |
| 68a0 | 20 74 68 69 73 20 70 72 6f 67 72 61 6d 2e 20 20 49 66 20 6e 6f 74 2c 20 73 65 65 20 3c 68 74 74 | .this.program...If.not,.see.<htt |
| 68c0 | 70 3a 2f 2f 77 77 77 2e 67 6e 75 2e 6f 72 67 2f 6c 69 63 65 6e 73 65 73 2f 3e 2e 0a 0a 3b 3b 3b | p://www.gnu.org/licenses/>...;;; |
| 68e0 | 20 43 6f 64 65 3a 0a 0a 3b 3b 3b 3b 20 52 65 71 75 69 72 65 6d 65 6e 74 73 0a 0a 28 72 65 71 75 | .Code:..;;;;.Requirements..(requ |
| 6900 | 69 72 65 20 27 63 6c 2d 6c 69 62 29 0a 28 72 65 71 75 69 72 65 20 27 63 6f 6d 70 61 74 29 0a 28 | ire.'cl-lib).(require.'compat).( |
| 6920 | 72 65 71 75 69 72 65 20 27 64 61 73 68 29 0a 28 72 65 71 75 69 72 65 20 27 64 6f 6d 29 0a 28 72 | require.'dash).(require.'dom).(r |
| 6940 | 65 71 75 69 72 65 20 27 65 73 78 6d 6c 2d 71 75 65 72 79 29 0a 28 72 65 71 75 69 72 65 20 27 65 | equire.'esxml-query).(require.'e |
| 6960 | 77 77 29 0a 28 72 65 71 75 69 72 65 20 27 6f 72 67 29 0a 28 72 65 71 75 69 72 65 20 27 73 29 0a | ww).(require.'org).(require.'s). |
| 6980 | 28 72 65 71 75 69 72 65 20 27 73 68 72 29 0a 28 72 65 71 75 69 72 65 20 27 73 75 62 72 2d 78 29 | (require.'shr).(require.'subr-x) |
| 69a0 | 0a 28 72 65 71 75 69 72 65 20 27 74 68 69 6e 67 61 74 70 74 29 0a 0a 28 72 65 71 75 69 72 65 20 | .(require.'thingatpt)..(require. |
| 69c0 | 27 70 6c 7a 29 0a 0a 3b 3b 3b 3b 20 56 61 72 69 61 62 6c 65 73 0a 0a 3b 3b 3b 3b 20 43 75 73 74 | 'plz)..;;;;.Variables..;;;;.Cust |
| 69e0 | 6f 6d 69 7a 61 74 69 6f 6e 0a 0a 28 64 65 66 67 72 6f 75 70 20 6f 72 67 2d 77 65 62 2d 74 6f 6f | omization..(defgroup.org-web-too |
| 6a00 | 6c 73 20 6e 69 6c 0a 20 20 22 4f 70 74 69 6f 6e 73 20 66 6f 72 20 60 6f 72 67 2d 77 65 62 2d 74 | ls.nil..."Options.for.`org-web-t |
| 6a20 | 6f 6f 6c 73 27 2e 22 0a 20 20 3a 67 72 6f 75 70 20 27 6f 72 67 0a 20 20 3a 6c 69 6e 6b 20 27 28 | ools'."...:group.'org...:link.'( |
| 6a40 | 75 72 6c 2d 6c 69 6e 6b 20 22 68 74 74 70 3a 2f 2f 67 69 74 68 75 62 2e 63 6f 6d 2f 61 6c 70 68 | url-link."http://github.com/alph |
| 6a60 | 61 70 61 70 61 2f 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 22 29 29 0a 0a 3b 3b 3b 3b 20 50 61 6e | apapa/org-web-tools"))..;;;;.Pan |
| 6a80 | 64 6f 63 20 73 75 70 70 6f 72 74 0a 0a 28 64 65 66 63 6f 6e 73 74 20 6f 72 67 2d 77 65 62 2d 74 | doc.support..(defconst.org-web-t |
| 6aa0 | 6f 6f 6c 73 2d 2d 70 61 6e 64 6f 63 2d 6e 6f 2d 77 72 61 70 2d 6f 70 74 69 6f 6e 20 6e 69 6c 0a | ools--pandoc-no-wrap-option.nil. |
| 6ac0 | 20 20 22 4f 70 74 69 6f 6e 20 74 6f 20 70 61 73 73 20 74 6f 20 50 61 6e 64 6f 63 20 74 6f 20 64 | .."Option.to.pass.to.Pandoc.to.d |
| 6ae0 | 69 73 61 62 6c 65 20 77 72 61 70 70 69 6e 67 2e 0a 50 61 6e 64 6f 63 20 3e 3d 20 31 2e 31 36 20 | isable.wrapping..Pandoc.>=.1.16. |
| 6b00 | 64 65 70 72 65 63 61 74 65 73 20 60 2d 2d 6e 6f 2d 77 72 61 70 27 20 69 6e 20 66 61 76 6f 72 20 | deprecates.`--no-wrap'.in.favor. |
| 6b20 | 6f 66 0a 60 2d 2d 77 72 61 70 3d 6e 6f 6e 65 27 2e 22 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 | of.`--wrap=none'.")..(defcustom. |
| 6b40 | 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 70 61 6e 64 6f 63 2d 72 65 70 6c 61 63 65 6d 65 6e 74 | org-web-tools-pandoc-replacement |
| 6b60 | 73 0a 20 20 28 6c 69 73 74 20 28 63 6f 6e 73 20 28 72 78 20 22 0d 22 29 20 22 22 29 29 0a 20 20 | s...(list.(cons.(rx.".").""))... |
| 6b80 | 22 55 73 65 64 20 74 6f 20 63 6c 65 61 6e 20 6f 75 74 70 75 74 20 66 72 6f 6d 20 50 61 6e 64 6f | "Used.to.clean.output.from.Pando |
| 6ba0 | 63 2e 22 0a 20 20 3a 74 79 70 65 20 27 28 61 6c 69 73 74 20 3a 6b 65 79 2d 74 79 70 65 20 73 74 | c."...:type.'(alist.:key-type.st |
| 6bc0 | 72 69 6e 67 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3a 76 61 6c 75 65 2d 74 79 70 65 | ring.................:value-type |
| 6be0 | 20 73 74 72 69 6e 67 29 29 0a 0a 28 64 65 66 63 75 73 74 6f 6d 20 6f 72 67 2d 77 65 62 2d 74 6f | .string))..(defcustom.org-web-to |
| 6c00 | 6f 6c 73 2d 70 61 6e 64 6f 63 2d 73 6c 65 65 70 2d 74 69 6d 65 20 30 2e 32 0a 20 20 22 57 61 69 | ols-pandoc-sleep-time.0.2..."Wai |
| 6c20 | 74 20 74 68 69 73 20 6c 6f 6e 67 20 66 6f 72 20 50 61 6e 64 6f 63 20 74 6f 20 73 74 61 72 74 20 | t.this.long.for.Pandoc.to.start. |
| 6c40 | 74 68 65 20 66 69 72 73 74 20 74 69 6d 65 20 69 6e 20 61 20 73 65 73 73 69 6f 6e 2e 2e 0a 4e 6f | the.first.time.in.a.session...No |
| 6c60 | 72 6d 61 6c 6c 79 20 74 68 69 73 20 73 68 6f 75 6c 64 20 6e 6f 74 20 6e 65 65 64 20 74 6f 20 62 | rmally.this.should.not.need.to.b |
| 6c80 | 65 20 63 68 61 6e 67 65 64 2c 20 62 75 74 20 69 66 20 50 61 6e 64 6f 63 20 74 61 6b 65 73 0a 75 | e.changed,.but.if.Pandoc.takes.u |
| 6ca0 | 6e 75 73 75 61 6c 6c 79 20 6c 6f 6e 67 20 74 6f 20 73 74 61 72 74 20 6f 6e 20 79 6f 75 72 20 73 | nusually.long.to.start.on.your.s |
| 6cc0 | 79 73 74 65 6d 20 28 77 68 69 63 68 20 69 74 20 73 65 65 6d 73 20 74 6f 20 6f 6e 0a 46 72 65 65 | ystem.(which.it.seems.to.on.Free |
| 6ce0 | 42 53 44 2c 20 66 6f 72 20 73 6f 6d 65 20 72 65 61 73 6f 6e 29 2c 20 79 6f 75 20 6d 61 79 20 6e | BSD,.for.some.reason),.you.may.n |
| 6d00 | 65 65 64 20 74 6f 20 69 6e 63 72 65 61 73 65 20 74 68 69 73 2e 22 0a 20 20 3a 74 79 70 65 20 27 | eed.to.increase.this."...:type.' |
| 6d20 | 66 6c 6f 61 74 29 0a 0a 28 64 65 66 75 6e 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 68 74 | float)..(defun.org-web-tools--ht |
| 6d40 | 6d 6c 2d 74 6f 2d 6f 72 67 2d 77 69 74 68 2d 70 61 6e 64 6f 63 20 28 68 74 6d 6c 20 26 6f 70 74 | ml-to-org-with-pandoc.(html.&opt |
| 6d60 | 69 6f 6e 61 6c 20 73 65 6c 65 63 74 6f 72 29 0a 20 20 22 52 65 74 75 72 6e 20 73 74 72 69 6e 67 | ional.selector)..."Return.string |
| 6d80 | 20 6f 66 20 48 54 4d 4c 20 63 6f 6e 76 65 72 74 65 64 20 74 6f 20 4f 72 67 20 77 69 74 68 20 50 | .of.HTML.converted.to.Org.with.P |
| 6da0 | 61 6e 64 6f 63 2e 0a 57 68 65 6e 20 53 45 4c 45 43 54 4f 52 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c | andoc..When.SELECTOR.is.non-nil, |
| 6dc0 | 20 74 68 65 20 48 54 4d 4c 20 69 73 20 66 69 6c 74 65 72 65 64 20 75 73 69 6e 67 0a 60 65 73 78 | .the.HTML.is.filtered.using.`esx |
| 6de0 | 6d 6c 2d 71 75 65 72 79 27 20 53 45 4c 45 43 54 4f 52 20 61 6e 64 20 72 65 2d 72 65 6e 64 65 72 | ml-query'.SELECTOR.and.re-render |
| 6e00 | 65 64 20 74 6f 20 48 54 4d 4c 20 77 69 74 68 0a 60 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d | ed.to.HTML.with.`org-web-tools-- |
| 6e20 | 64 6f 6d 2d 74 6f 2d 68 74 6d 6c 27 2c 20 77 68 69 63 68 20 73 65 65 2e 22 0a 20 20 28 77 68 65 | dom-to-html',.which.see."...(whe |
| 6e40 | 6e 20 73 65 6c 65 63 74 6f 72 0a 20 20 20 20 28 73 65 74 71 20 68 74 6d 6c 20 28 2d 3e 3e 20 28 | n.selector.....(setq.html.(->>.( |
| 6e60 | 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | with-temp-buffer................ |
| 6e80 | 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 68 74 6d 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 | .......(insert.html)............ |
| 6ea0 | 20 20 20 20 20 20 20 20 20 20 20 28 6c 69 62 78 6d 6c 2d 70 61 72 73 65 2d 68 74 6d 6c 2d 72 65 | ...........(libxml-parse-html-re |
| 6ec0 | 67 69 6f 6e 20 31 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 | gion.1.(point-max)))............ |
| 6ee0 | 20 20 20 20 20 20 20 20 20 28 65 73 78 6d 6c 2d 71 75 65 72 79 20 73 65 6c 65 63 74 6f 72 29 0a | .........(esxml-query.selector). |
| 6f00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 4d 41 59 42 45 3a 20 53 68 | ....................;;.MAYBE:.Sh |
| 6f20 | 6f 75 6c 64 20 70 72 6f 62 61 62 6c 79 20 75 73 65 20 60 73 68 72 2d 64 6f 6d 2d 70 72 69 6e 74 | ould.probably.use.`shr-dom-print |
| 6f40 | 27 20 69 6e 73 74 65 61 64 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | '.instead......................( |
| 6f60 | 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 64 6f 6d 2d 74 6f 2d 68 74 6d 6c 29 29 29 29 0a 20 | org-web-tools--dom-to-html)))).. |
| 6f80 | 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 28 69 6e 73 65 72 74 20 68 | .(with-temp-buffer.....(insert.h |
| 6fa0 | 74 6d 6c 29 0a 20 20 20 20 28 6c 65 74 20 28 28 73 74 64 65 72 72 2d 66 69 6c 65 20 28 6d 61 6b | tml).....(let.((stderr-file.(mak |
| 6fc0 | 65 2d 74 65 6d 70 2d 66 69 6c 65 20 22 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 70 61 6e 64 6f | e-temp-file."org-web-tools-pando |
| 6fe0 | 63 2d 73 74 64 65 72 72 22 29 29 29 0a 20 20 20 20 20 20 28 75 6e 77 69 6e 64 2d 70 72 6f 74 65 | c-stderr"))).......(unwind-prote |
| 7000 | 63 74 0a 20 20 20 20 20 20 20 20 20 20 28 69 66 20 28 6e 6f 74 20 28 7a 65 72 6f 70 20 28 63 61 | ct...........(if.(not.(zerop.(ca |
| 7020 | 6c 6c 2d 70 72 6f 63 65 73 73 2d 72 65 67 69 6f 6e 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 28 70 | ll-process-region.(point-min).(p |
| 7040 | 6f 69 6e 74 2d 6d 61 78 29 20 22 70 61 6e 64 6f 63 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | oint-max)."pandoc".............. |
| 7060 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 7080 | 20 20 74 20 28 6c 69 73 74 20 74 20 73 74 64 65 72 72 2d 66 69 6c 65 29 20 6e 69 6c 0a 20 20 20 | ..t.(list.t.stderr-file).nil.... |
| 70a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 70c0 | 20 20 20 20 20 20 20 20 20 20 20 20 22 2d 2d 76 65 72 62 6f 73 65 22 0a 20 20 20 20 20 20 20 20 | ............"--verbose"......... |
| 70e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 7100 | 20 20 20 20 20 20 20 28 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 70 61 6e 64 6f 63 2d 6e 6f | .......(org-web-tools--pandoc-no |
| 7120 | 2d 77 72 61 70 2d 6f 70 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -wrap-option)................... |
| 7140 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 2d 66 | ............................."-f |
| 7160 | 22 20 22 68 74 6d 6c 2d 72 61 77 5f 68 74 6d 6c 2d 6e 61 74 69 76 65 5f 64 69 76 73 22 20 22 2d | "."html-raw_html-native_divs"."- |
| 7180 | 74 22 20 22 6f 72 67 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 67 6e | t"."org")))...............(progn |
| 71a0 | 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 72 65 67 69 6f 6e 20 | .................(delete-region. |
| 71c0 | 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 28 70 6f 69 6e 74 2d 6d 61 78 29 29 0a 20 20 20 20 20 20 20 | (point-min).(point-max))........ |
| 71e0 | 20 20 20 20 20 20 20 20 20 28 69 6e 73 65 72 74 2d 66 69 6c 65 2d 63 6f 6e 74 65 6e 74 73 20 73 | .........(insert-file-contents.s |
| 7200 | 74 64 65 72 72 2d 66 69 6c 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72 72 | tderr-file).................(err |
| 7220 | 6f 72 20 22 50 61 6e 64 6f 63 20 66 61 69 6c 65 64 3a 20 25 73 22 20 28 62 75 66 66 65 72 2d 73 | or."Pandoc.failed:.%s".(buffer-s |
| 7240 | 74 72 69 6e 67 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 67 2d 6d 6f 64 65 29 0a | tring))).............(org-mode). |
| 7260 | 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 63 6c 65 61 | ............(org-web-tools--clea |
| 7280 | 6e 2d 70 61 6e 64 6f 63 2d 6f 75 74 70 75 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 | n-pandoc-output).............(bu |
| 72a0 | 66 66 65 72 2d 73 74 72 69 6e 67 29 29 0a 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 66 69 | ffer-string)).........(delete-fi |
| 72c0 | 6c 65 20 73 74 64 65 72 72 2d 66 69 6c 65 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 6f 72 67 2d | le.stderr-file)))))..(defun.org- |
| 72e0 | 77 65 62 2d 74 6f 6f 6c 73 2d 2d 70 61 6e 64 6f 63 2d 6e 6f 2d 77 72 61 70 2d 6f 70 74 69 6f 6e | web-tools--pandoc-no-wrap-option |
| 7300 | 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 6f 70 74 69 6f 6e 20 60 6f 72 67 2d 77 65 62 2d 74 6f | .()..."Return.option.`org-web-to |
| 7320 | 6f 6c 73 2d 2d 70 61 6e 64 6f 63 2d 6e 6f 2d 77 72 61 70 2d 6f 70 74 69 6f 6e 27 2c 20 73 65 74 | ols--pandoc-no-wrap-option',.set |
| 7340 | 74 69 6e 67 20 69 66 20 75 6e 73 65 74 2e 22 0a 20 20 28 6f 72 20 6f 72 67 2d 77 65 62 2d 74 6f | ting.if.unset."...(or.org-web-to |
| 7360 | 6f 6c 73 2d 2d 70 61 6e 64 6f 63 2d 6e 6f 2d 77 72 61 70 2d 6f 70 74 69 6f 6e 0a 20 20 20 20 20 | ols--pandoc-no-wrap-option...... |
| 7380 | 20 28 73 65 74 71 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 70 61 6e 64 6f 63 2d 6e 6f 2d | .(setq.org-web-tools--pandoc-no- |
| 73a0 | 77 72 61 70 2d 6f 70 74 69 6f 6e 20 28 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 63 68 65 63 | wrap-option.(org-web-tools--chec |
| 73c0 | 6b 2d 70 61 6e 64 6f 63 2d 6e 6f 2d 77 72 61 70 2d 6f 70 74 69 6f 6e 29 29 29 29 0a 0a 28 64 65 | k-pandoc-no-wrap-option))))..(de |
| 73e0 | 66 75 6e 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 63 68 65 63 6b 2d 70 61 6e 64 6f 63 2d | fun.org-web-tools--check-pandoc- |
| 7400 | 6e 6f 2d 77 72 61 70 2d 6f 70 74 69 6f 6e 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 61 70 70 72 | no-wrap-option.()..."Return.appr |
| 7420 | 6f 70 72 69 61 74 65 20 6e 6f 2d 77 72 61 70 20 6f 70 74 69 6f 6e 20 73 74 72 69 6e 67 20 64 65 | opriate.no-wrap.option.string.de |
| 7440 | 70 65 6e 64 69 6e 67 20 6f 6e 20 50 61 6e 64 6f 63 20 76 65 72 73 69 6f 6e 2e 22 0a 20 20 3b 3b | pending.on.Pandoc.version."...;; |
| 7460 | 20 50 61 6e 64 6f 63 20 3e 3d 20 31 2e 31 36 20 64 65 70 72 65 63 61 74 65 73 20 74 68 65 20 2d | .Pandoc.>=.1.16.deprecates.the.- |
| 7480 | 2d 6e 6f 2d 77 72 61 70 20 6f 70 74 69 6f 6e 2c 20 72 65 70 6c 61 63 69 6e 67 20 69 74 20 77 69 | -no-wrap.option,.replacing.it.wi |
| 74a0 | 74 68 0a 20 20 3b 3b 20 2d 2d 77 72 61 70 3d 6e 6f 6e 65 2e 20 20 53 65 6e 64 69 6e 67 20 74 68 | th...;;.--wrap=none...Sending.th |
| 74c0 | 65 20 77 72 6f 6e 67 20 6f 70 74 69 6f 6e 20 63 61 75 73 65 73 20 6f 75 74 70 75 74 20 74 6f 20 | e.wrong.option.causes.output.to. |
| 74e0 | 53 54 44 45 52 52 2c 0a 20 20 3b 3b 20 77 68 69 63 68 20 60 63 61 6c 6c 2d 70 72 6f 63 65 73 73 | STDERR,...;;.which.`call-process |
| 7500 | 2d 72 65 67 69 6f 6e 27 20 64 6f 65 73 6e 27 74 20 6c 69 6b 65 2e 20 20 53 6f 20 77 65 20 74 65 | -region'.doesn't.like...So.we.te |
| 7520 | 73 74 20 50 61 6e 64 6f 63 20 74 6f 20 73 65 65 0a 20 20 3b 3b 20 77 68 69 63 68 20 6f 70 74 69 | st.Pandoc.to.see...;;.which.opti |
| 7540 | 6f 6e 20 74 6f 20 75 73 65 2e 0a 20 20 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 | on.to.use....(with-temp-buffer.. |
| 7560 | 20 20 20 28 6c 65 74 2a 20 28 28 6c 69 6d 69 74 20 33 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 | ...(let*.((limit.3)............( |
| 7580 | 63 68 65 63 6b 65 64 20 30 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 70 72 6f 63 65 73 73 20 28 | checked.0)............(process.( |
| 75a0 | 73 74 61 72 74 2d 70 72 6f 63 65 73 73 20 22 74 65 73 74 2d 70 61 6e 64 6f 63 22 20 28 63 75 72 | start-process."test-pandoc".(cur |
| 75c0 | 72 65 6e 74 2d 62 75 66 66 65 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | rent-buffer).................... |
| 75e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 70 61 6e 64 6f 63 22 20 22 2d 2d 64 75 6d 70 | ................"pandoc"."--dump |
| 7600 | 2d 61 72 67 73 22 20 22 2d 2d 6e 6f 2d 77 72 61 70 22 29 29 29 0a 20 20 20 20 20 20 28 77 68 69 | -args"."--no-wrap"))).......(whi |
| 7620 | 6c 65 20 28 70 72 6f 63 65 73 73 2d 6c 69 76 65 2d 70 20 70 72 6f 63 65 73 73 29 0a 20 20 20 20 | le.(process-live-p.process)..... |
| 7640 | 20 20 20 20 28 69 66 20 28 3d 20 63 68 65 63 6b 65 64 20 6c 69 6d 69 74 29 0a 20 20 20 20 20 20 | ....(if.(=.checked.limit)....... |
| 7660 | 20 20 20 20 20 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 50 61 | ......(progn...............;;.Pa |
| 7680 | 6e 64 6f 63 20 64 69 64 6e 27 74 20 65 78 69 74 20 69 6e 20 74 69 6d 65 2e 20 20 4b 69 6c 6c 20 | ndoc.didn't.exit.in.time...Kill. |
| 76a0 | 69 74 20 61 6e 64 20 72 61 69 73 65 20 61 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b | it.and.raise.an...............;; |
| 76c0 | 20 65 72 72 6f 72 2e 20 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 77 69 6c 6c 20 72 65 74 75 | .error...This.function.will.retu |
| 76e0 | 72 6e 20 60 6e 69 6c 27 20 61 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 60 6f | rn.`nil'.and...............;;.`o |
| 7700 | 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 70 61 6e 64 6f 63 2d 6e 6f 2d 77 72 61 70 2d 6f 70 74 | rg-web-tools--pandoc-no-wrap-opt |
| 7720 | 69 6f 6e 27 20 77 69 6c 6c 20 72 65 6d 61 69 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b | ion'.will.remain...............; |
| 7740 | 3b 20 60 6e 69 6c 27 2c 20 77 68 69 63 68 20 77 69 6c 6c 20 63 61 75 73 65 20 74 68 69 73 20 66 | ;.`nil',.which.will.cause.this.f |
| 7760 | 75 6e 63 74 69 6f 6e 20 74 6f 20 72 75 6e 20 61 67 61 69 6e 20 61 6e 64 0a 20 20 20 20 20 20 20 | unction.to.run.again.and........ |
| 7780 | 20 20 20 20 20 20 20 3b 3b 20 73 65 74 20 74 68 65 20 63 6f 6e 73 74 20 77 68 65 6e 20 61 20 63 | .......;;.set.the.const.when.a.c |
| 77a0 | 61 70 74 75 72 65 20 69 73 20 72 75 6e 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 65 | apture.is.run................(se |
| 77c0 | 74 2d 70 72 6f 63 65 73 73 2d 71 75 65 72 79 2d 6f 6e 2d 65 78 69 74 2d 66 6c 61 67 20 70 72 6f | t-process-query-on-exit-flag.pro |
| 77e0 | 63 65 73 73 20 6e 69 6c 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 65 72 72 6f 72 20 22 | cess.nil)...............(error." |
| 7800 | 55 6e 61 62 6c 65 20 74 6f 20 74 65 73 74 20 50 61 6e 64 6f 63 2e 20 20 54 72 79 20 69 6e 63 72 | Unable.to.test.Pandoc...Try.incr |
| 7820 | 65 61 73 69 6e 67 20 60 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 70 61 6e 64 6f 63 2d 73 6c 65 | easing.`org-web-tools-pandoc-sle |
| 7840 | 65 70 2d 74 69 6d 65 27 2e 20 20 49 66 20 69 74 20 73 74 69 6c 6c 20 64 6f 65 73 6e 27 74 20 77 | ep-time'...If.it.still.doesn't.w |
| 7860 | 6f 72 6b 2c 20 70 6c 65 61 73 65 20 72 65 70 6f 72 74 20 74 68 69 73 20 62 75 67 21 20 28 49 6e | ork,.please.report.this.bug!.(In |
| 7880 | 63 6c 75 64 65 20 74 68 65 20 6f 75 74 70 75 74 20 6f 66 20 5c 22 70 61 6e 64 6f 63 20 2d 2d 64 | clude.the.output.of.\"pandoc.--d |
| 78a0 | 75 6d 70 2d 61 72 67 73 20 2d 2d 6e 6f 2d 77 72 61 70 5c 22 29 22 29 29 0a 20 20 20 20 20 20 20 | ump-args.--no-wrap\")"))........ |
| 78c0 | 20 20 20 28 73 6c 65 65 70 2d 66 6f 72 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 70 61 6e 64 | ...(sleep-for.org-web-tools-pand |
| 78e0 | 6f 63 2d 73 6c 65 65 70 2d 74 69 6d 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 69 6e 63 | oc-sleep-time)...........(cl-inc |
| 7900 | 66 20 63 68 65 63 6b 65 64 29 29 29 0a 20 20 20 20 20 20 28 69 66 20 28 61 6e 64 20 28 7a 65 72 | f.checked))).......(if.(and.(zer |
| 7920 | 6f 70 20 28 70 72 6f 63 65 73 73 2d 65 78 69 74 2d 73 74 61 74 75 73 20 70 72 6f 63 65 73 73 29 | op.(process-exit-status.process) |
| 7940 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 6f 74 20 28 73 74 72 69 6e 67 2d 6d 61 | )................(not.(string-ma |
| 7960 | 74 63 68 20 22 2d 2d 6e 6f 2d 77 72 61 70 20 69 73 20 64 65 70 72 65 63 61 74 65 64 22 20 28 62 | tch."--no-wrap.is.deprecated".(b |
| 7980 | 75 66 66 65 72 2d 73 74 72 69 6e 67 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 22 2d 2d 6e 6f | uffer-string))))..........."--no |
| 79a0 | 2d 77 72 61 70 22 0a 20 20 20 20 20 20 20 20 22 2d 2d 77 72 61 70 3d 6e 6f 6e 65 22 29 29 29 29 | -wrap"........."--wrap=none")))) |
| 79c0 | 0a 0a 28 64 65 66 75 6e 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 63 6c 65 61 6e 2d 70 61 | ..(defun.org-web-tools--clean-pa |
| 79e0 | 6e 64 6f 63 2d 6f 75 74 70 75 74 20 28 29 0a 20 20 22 52 65 6d 6f 76 65 20 75 6e 77 61 6e 74 65 | ndoc-output.()..."Remove.unwante |
| 7a00 | 64 20 74 68 69 6e 67 73 20 69 6e 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 20 6f 66 20 50 61 | d.things.in.current.buffer.of.Pa |
| 7a20 | 6e 64 6f 63 20 6f 75 74 70 75 74 2e 22 0a 20 20 28 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d | ndoc.output."...(org-web-tools-- |
| 7a40 | 72 65 6d 6f 76 65 2d 62 61 64 2d 63 68 61 72 61 63 74 65 72 73 29 0a 20 20 28 6f 72 67 2d 77 65 | remove-bad-characters)...(org-we |
| 7a60 | 62 2d 74 6f 6f 6c 73 2d 2d 72 65 6d 6f 76 65 2d 68 74 6d 6c 2d 62 6c 6f 63 6b 73 29 0a 20 20 28 | b-tools--remove-html-blocks)...( |
| 7a80 | 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 72 65 6d 6f 76 65 2d 63 75 73 74 6f 6d 5f 69 64 5f | org-web-tools--remove-custom_id_ |
| 7aa0 | 70 72 6f 70 65 72 74 69 65 73 29 29 0a 0a 28 64 65 66 75 6e 20 6f 72 67 2d 77 65 62 2d 74 6f 6f | properties))..(defun.org-web-too |
| 7ac0 | 6c 73 2d 2d 72 65 6d 6f 76 65 2d 62 61 64 2d 63 68 61 72 61 63 74 65 72 73 20 28 29 0a 20 20 22 | ls--remove-bad-characters.()..." |
| 7ae0 | 52 65 6d 6f 76 65 20 75 6e 77 61 6e 74 65 64 20 63 68 61 72 61 63 74 65 72 73 20 66 72 6f 6d 20 | Remove.unwanted.characters.from. |
| 7b00 | 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2e 0a 42 61 64 20 63 68 61 72 61 63 74 65 72 73 20 61 | current.buffer..Bad.characters.a |
| 7b20 | 72 65 20 6d 61 74 63 68 65 64 20 62 79 20 60 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 70 61 6e | re.matched.by.`org-web-tools-pan |
| 7b40 | 64 6f 63 2d 72 65 70 6c 61 63 65 6d 65 6e 74 73 27 2e 22 0a 20 20 28 73 61 76 65 2d 65 78 63 75 | doc-replacements'."...(save-excu |
| 7b60 | 72 73 69 6f 6e 0a 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 28 72 65 20 2e 20 72 65 70 | rsion.....(cl-loop.for.(re...rep |
| 7b80 | 6c 61 63 65 6d 65 6e 74 29 20 69 6e 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 70 61 6e 64 6f | lacement).in.org-web-tools-pando |
| 7ba0 | 63 2d 72 65 70 6c 61 63 65 6d 65 6e 74 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 64 6f 20 28 | c-replacements..............do.( |
| 7bc0 | 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 | progn...................(goto-ch |
| 7be0 | 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ar.(point-min))................. |
| 7c00 | 20 20 28 77 68 69 6c 65 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 72 65 20 6e | ..(while.(re-search-forward.re.n |
| 7c20 | 69 6c 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 70 6c 61 | il.t).....................(repla |
| 7c40 | 63 65 2d 6d 61 74 63 68 20 72 65 70 6c 61 63 65 6d 65 6e 74 29 29 29 29 29 29 0a 0a 28 64 65 66 | ce-match.replacement))))))..(def |
| 7c60 | 75 6e 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 72 65 6d 6f 76 65 2d 68 74 6d 6c 2d 62 6c | un.org-web-tools--remove-html-bl |
| 7c80 | 6f 63 6b 73 20 28 29 0a 20 20 22 52 65 6d 6f 76 65 20 5c 22 23 2b 42 45 47 49 4e 5f 48 54 4d 4c | ocks.()..."Remove.\"#+BEGIN_HTML |
| 7ca0 | 2e 2e 2e 23 2b 45 4e 44 5f 48 54 4d 4c 5c 22 20 62 6c 6f 63 6b 73 20 66 72 6f 6d 20 63 75 72 72 | ...#+END_HTML\".blocks.from.curr |
| 7cc0 | 65 6e 74 20 62 75 66 66 65 72 2e 22 0a 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 | ent.buffer."...(save-excursion.. |
| 7ce0 | 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 28 | ...(goto-char.(point-min)).....( |
| 7d00 | 77 68 69 6c 65 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 28 72 78 20 28 6f 70 | while.(re-search-forward.(rx.(op |
| 7d20 | 74 69 6f 6e 61 6c 20 22 5c 6e 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | tional."\n").................... |
| 7d40 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 23 2b 42 45 47 49 4e 5f 48 54 4d 4c 22 0a 20 20 | ..............."#+BEGIN_HTML"... |
| 7d60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 7d80 | 28 6d 69 6e 69 6d 61 6c 2d 6d 61 74 63 68 20 28 31 2b 20 61 6e 79 74 68 69 6e 67 29 29 0a 20 20 | (minimal-match.(1+.anything))... |
| 7da0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 7dc0 | 22 23 2b 45 4e 44 5f 48 54 4d 4c 22 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | "#+END_HTML".................... |
| 7de0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 70 74 69 6f 6e 61 6c 20 22 5c 6e 22 29 29 0a | ...............(optional."\n")). |
| 7e00 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 6e 69 | ..............................ni |
| 7e20 | 6c 20 74 29 0a 20 20 20 20 20 20 28 72 65 70 6c 61 63 65 2d 6d 61 74 63 68 20 22 22 29 29 29 29 | l.t).......(replace-match."")))) |
| 7e40 | 0a 0a 28 64 65 66 75 6e 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 72 65 6d 6f 76 65 2d 63 | ..(defun.org-web-tools--remove-c |
| 7e60 | 75 73 74 6f 6d 5f 69 64 5f 70 72 6f 70 65 72 74 69 65 73 20 28 29 0a 20 20 22 52 65 6d 6f 76 65 | ustom_id_properties.()..."Remove |
| 7e80 | 20 70 72 6f 70 65 72 74 79 20 64 72 61 77 65 72 73 20 63 6f 6e 74 61 69 6e 69 6e 67 20 43 55 53 | .property.drawers.containing.CUS |
| 7ea0 | 54 4f 4d 5f 49 44 20 70 72 6f 70 65 72 74 69 65 73 2e 0a 54 68 69 73 20 69 73 20 61 20 62 6c 75 | TOM_ID.properties..This.is.a.blu |
| 7ec0 | 6e 74 20 69 6e 73 74 72 75 6d 65 6e 74 3a 20 61 6e 79 20 64 72 61 77 65 72 20 63 6f 6e 74 61 69 | nt.instrument:.any.drawer.contai |
| 7ee0 | 6e 69 6e 67 20 74 68 65 20 43 55 53 54 4f 4d 5f 49 44 0a 70 72 6f 70 65 72 74 79 20 69 73 20 72 | ning.the.CUSTOM_ID.property.is.r |
| 7f00 | 65 6d 6f 76 65 64 2c 20 72 65 67 61 72 64 6c 65 73 73 20 6f 66 20 6f 74 68 65 72 20 70 72 6f 70 | emoved,.regardless.of.other.prop |
| 7f20 | 65 72 74 69 65 73 20 69 74 20 6d 61 79 0a 63 6f 6e 74 61 69 6e 2e 20 20 54 68 69 73 20 73 65 65 | erties.it.may.contain...This.see |
| 7f40 | 6d 73 20 74 6f 20 62 65 20 74 68 65 20 62 65 73 74 20 63 6f 75 72 73 65 20 6f 66 20 61 63 74 69 | ms.to.be.the.best.course.of.acti |
| 7f60 | 6f 6e 20 69 6e 20 63 75 72 72 65 6e 74 0a 50 61 6e 64 6f 63 20 6f 75 74 70 75 74 2e 22 0a 20 20 | on.in.current.Pandoc.output."... |
| 7f80 | 28 6c 65 74 20 28 28 72 65 67 65 78 70 20 28 6f 72 67 2d 72 65 2d 70 72 6f 70 65 72 74 79 20 22 | (let.((regexp.(org-re-property." |
| 7fa0 | 43 55 53 54 4f 4d 5f 49 44 22 20 6e 69 6c 20 6e 69 6c 29 29 29 0a 20 20 20 20 28 73 61 76 65 2d | CUSTOM_ID".nil.nil))).....(save- |
| 7fc0 | 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e | excursion.......(goto-char.(poin |
| 7fe0 | 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 72 65 2d 73 65 61 72 63 68 2d | t-min)).......(while.(re-search- |
| 8000 | 66 6f 72 77 61 72 64 20 72 65 67 65 78 70 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 20 20 28 77 | forward.regexp.nil.t).........(w |
| 8020 | 68 65 6e 20 28 6f 72 67 2d 61 74 2d 70 72 6f 70 65 72 74 79 2d 70 29 0a 20 20 20 20 20 20 20 20 | hen.(org-at-property-p)......... |
| 8040 | 20 20 28 6f 72 67 2d 62 61 63 6b 2d 74 6f 2d 68 65 61 64 69 6e 67 29 0a 20 20 20 20 20 20 20 20 | ..(org-back-to-heading)......... |
| 8060 | 20 20 3b 3b 20 41 73 20 61 20 6d 69 6e 6f 72 20 6f 70 74 69 6d 69 7a 61 74 69 6f 6e 2c 20 77 65 | ..;;.As.a.minor.optimization,.we |
| 8080 | 20 64 6f 6e 27 74 20 62 6f 75 6e 64 20 74 68 65 20 73 65 61 72 63 68 20 74 6f 20 74 68 65 20 63 | .don't.bound.the.search.to.the.c |
| 80a0 | 75 72 72 65 6e 74 20 65 6e 74 72 79 2e 20 20 55 6e 6c 65 73 73 20 74 68 65 0a 20 20 20 20 20 20 | urrent.entry...Unless.the....... |
| 80c0 | 20 20 20 20 3b 3b 20 63 75 72 72 65 6e 74 20 70 72 6f 70 65 72 74 79 20 64 72 61 77 65 72 20 69 | ....;;.current.property.drawer.i |
| 80e0 | 73 20 6d 61 6c 66 6f 72 6d 65 64 2c 20 77 68 69 63 68 20 73 68 6f 75 6c 64 6e 27 74 20 68 61 70 | s.malformed,.which.shouldn't.hap |
| 8100 | 70 65 6e 20 69 6e 20 50 61 6e 64 6f 63 20 6f 75 74 70 75 74 2c 20 69 74 0a 20 20 20 20 20 20 20 | pen.in.Pandoc.output,.it........ |
| 8120 | 20 20 20 3b 3b 20 73 68 6f 75 6c 64 20 77 6f 72 6b 2e 0a 20 20 20 20 20 20 20 20 20 20 28 72 65 | ...;;.should.work............(re |
| 8140 | 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 6f 72 67 2d 70 72 6f 70 65 72 74 79 2d 64 72 61 | -search-forward.org-property-dra |
| 8160 | 77 65 72 2d 72 65 29 0a 20 20 20 20 20 20 20 20 20 20 28 73 65 74 66 20 28 62 75 66 66 65 72 2d | wer-re)...........(setf.(buffer- |
| 8180 | 73 75 62 73 74 72 69 6e 67 20 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 30 29 20 28 6d | substring.(match-beginning.0).(m |
| 81a0 | 61 74 63 68 2d 65 6e 64 20 30 29 29 20 22 22 29 29 29 29 29 29 0a 0a 3b 3b 3b 3b 20 43 6f 6d 6d | atch-end.0)).""))))))..;;;;.Comm |
| 81c0 | 61 6e 64 73 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 65 66 75 6e 20 6f 72 67 2d | ands..;;;###autoload.(defun.org- |
| 81e0 | 77 65 62 2d 74 6f 6f 6c 73 2d 69 6e 73 65 72 74 2d 6c 69 6e 6b 2d 66 6f 72 2d 75 72 6c 20 28 75 | web-tools-insert-link-for-url.(u |
| 8200 | 72 6c 29 0a 20 20 22 49 6e 73 65 72 74 20 4f 72 67 20 6c 69 6e 6b 20 74 6f 20 55 52 4c 20 75 73 | rl)..."Insert.Org.link.to.URL.us |
| 8220 | 69 6e 67 20 74 69 74 6c 65 20 6f 66 20 48 54 4d 4c 20 70 61 67 65 20 61 74 20 55 52 4c 2e 0a 49 | ing.title.of.HTML.page.at.URL..I |
| 8240 | 66 20 55 52 4c 20 69 73 20 6e 6f 74 20 67 69 76 65 6e 2c 20 6c 6f 6f 6b 20 66 6f 72 20 66 69 72 | f.URL.is.not.given,.look.for.fir |
| 8260 | 73 74 20 55 52 4c 20 69 6e 20 60 6b 69 6c 6c 2d 72 69 6e 67 27 2e 22 0a 20 20 28 69 6e 74 65 72 | st.URL.in.`kill-ring'."...(inter |
| 8280 | 61 63 74 69 76 65 20 28 6c 69 73 74 20 28 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 67 65 74 | active.(list.(org-web-tools--get |
| 82a0 | 2d 66 69 72 73 74 2d 75 72 6c 29 29 29 0a 20 20 28 69 6e 73 65 72 74 20 28 6f 72 67 2d 77 65 62 | -first-url)))...(insert.(org-web |
| 82c0 | 2d 74 6f 6f 6c 73 2d 2d 6f 72 67 2d 6c 69 6e 6b 2d 66 6f 72 2d 75 72 6c 20 75 72 6c 29 29 29 0a | -tools--org-link-for-url.url))). |
| 82e0 | 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 63 6c 2d 64 65 66 75 6e 20 6f 72 67 2d 77 65 | .;;;###autoload.(cl-defun.org-we |
| 8300 | 62 2d 74 6f 6f 6c 73 2d 69 6e 73 65 72 74 2d 77 65 62 2d 70 61 67 65 2d 61 73 2d 65 6e 74 72 79 | b-tools-insert-web-page-as-entry |
| 8320 | 20 28 75 72 6c 20 26 6b 65 79 20 28 63 61 70 74 75 72 65 2d 66 75 6e 63 74 69 6f 6e 20 23 27 6f | .(url.&key.(capture-function.#'o |
| 8340 | 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 75 72 6c 2d 61 73 2d 72 65 61 64 61 62 6c 65 2d 6f 72 | rg-web-tools--url-as-readable-or |
| 8360 | 67 29 29 0a 20 20 22 49 6e 73 65 72 74 20 77 65 62 20 70 61 67 65 20 63 6f 6e 74 65 6e 74 73 20 | g))..."Insert.web.page.contents. |
| 8380 | 6f 66 20 55 52 4c 20 61 73 20 4f 72 67 20 73 69 62 6c 69 6e 67 20 65 6e 74 72 79 2e 0a 43 41 50 | of.URL.as.Org.sibling.entry..CAP |
| 83a0 | 54 55 52 45 2d 46 55 4e 43 54 49 4f 4e 20 69 73 20 63 61 6c 6c 65 64 20 77 69 74 68 20 55 52 4c | TURE-FUNCTION.is.called.with.URL |
| 83c0 | 20 74 6f 20 67 65 74 20 74 68 65 20 63 6f 6e 74 65 6e 74 73 2e 20 20 50 61 67 65 20 69 73 0a 70 | .to.get.the.contents...Page.is.p |
| 83e0 | 72 6f 63 65 73 73 65 64 20 77 69 74 68 20 60 65 77 77 2d 72 65 61 64 61 62 6c 65 27 2e 22 0a 20 | rocessed.with.`eww-readable'.".. |
| 8400 | 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 28 6c 69 73 74 20 28 6f 72 67 2d 77 65 62 2d 74 6f 6f | .(interactive.(list.(org-web-too |
| 8420 | 6c 73 2d 2d 67 65 74 2d 66 69 72 73 74 2d 75 72 6c 29 29 29 0a 20 20 28 6c 65 74 20 28 28 63 6f | ls--get-first-url)))...(let.((co |
| 8440 | 6e 74 65 6e 74 20 28 73 2d 74 72 69 6d 20 28 66 75 6e 63 61 6c 6c 20 63 61 70 74 75 72 65 2d 66 | ntent.(s-trim.(funcall.capture-f |
| 8460 | 75 6e 63 74 69 6f 6e 20 75 72 6c 29 29 29 29 0a 20 20 20 20 28 75 6e 6c 65 73 73 20 28 73 74 72 | unction.url)))).....(unless.(str |
| 8480 | 69 6e 67 2d 65 6d 70 74 79 2d 70 20 63 6f 6e 74 65 6e 74 29 0a 20 20 20 20 20 20 28 75 6e 6c 65 | ing-empty-p.content).......(unle |
| 84a0 | 73 73 20 28 65 71 20 6d 61 6a 6f 72 2d 6d 6f 64 65 20 27 6f 72 67 2d 6d 6f 64 65 29 0a 20 20 20 | ss.(eq.major-mode.'org-mode).... |
| 84c0 | 20 20 20 20 20 28 64 69 73 70 6c 61 79 2d 77 61 72 6e 69 6e 67 20 27 6f 72 67 2d 77 65 62 2d 74 | .....(display-warning.'org-web-t |
| 84e0 | 6f 6f 6c 73 20 22 50 61 73 74 69 6e 67 20 4f 72 67 20 73 75 62 74 72 65 65 20 69 6e 74 6f 20 6e | ools."Pasting.Org.subtree.into.n |
| 8500 | 6f 6e 2d 6f 72 67 2d 6d 6f 64 65 20 62 75 66 66 65 72 3b 20 74 68 69 73 20 6d 61 79 20 63 61 75 | on-org-mode.buffer;.this.may.cau |
| 8520 | 73 65 20 70 72 6f 62 6c 65 6d 73 22 29 29 0a 20 20 20 20 20 20 28 62 65 67 69 6e 6e 69 6e 67 2d | se.problems")).......(beginning- |
| 8540 | 6f 66 2d 6c 69 6e 65 29 20 3b 20 4e 65 63 65 73 73 61 72 79 20 66 6f 72 20 6f 72 67 2d 70 61 73 | of-line).;.Necessary.for.org-pas |
| 8560 | 74 65 2d 73 75 62 74 72 65 65 20 74 6f 20 63 68 6f 6f 73 65 20 74 68 65 20 72 69 67 68 74 20 68 | te-subtree.to.choose.the.right.h |
| 8580 | 65 61 64 69 6e 67 20 6c 65 76 65 6c 0a 20 20 20 20 20 20 28 6f 72 67 2d 70 61 73 74 65 2d 73 75 | eading.level.......(org-paste-su |
| 85a0 | 62 74 72 65 65 20 6e 69 6c 20 63 6f 6e 74 65 6e 74 29 0a 20 20 20 20 20 20 3b 3b 20 52 65 74 75 | btree.nil.content).......;;.Retu |
| 85c0 | 72 6e 20 74 20 62 65 63 61 75 73 65 20 6f 72 67 2d 70 61 73 74 65 2d 73 75 62 74 72 65 65 20 64 | rn.t.because.org-paste-subtree.d |
| 85e0 | 6f 65 73 6e 27 74 0a 20 20 20 20 20 20 74 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 | oesn't.......t)))..;;;###autoloa |
| 8600 | 64 0a 28 63 6c 2d 64 65 66 75 6e 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 72 65 61 64 2d 75 | d.(cl-defun.org-web-tools-read-u |
| 8620 | 72 6c 2d 61 73 2d 6f 72 67 20 28 75 72 6c 20 26 6b 65 79 20 28 73 68 6f 77 2d 62 75 66 66 65 72 | rl-as-org.(url.&key.(show-buffer |
| 8640 | 2d 66 75 6e 63 74 69 6f 6e 20 23 27 73 77 69 74 63 68 2d 74 6f 2d 62 75 66 66 65 72 29 29 0a 20 | -function.#'switch-to-buffer)).. |
| 8660 | 20 22 52 65 61 64 20 55 52 4c 27 73 20 72 65 61 64 61 62 6c 65 20 63 6f 6e 74 65 6e 74 20 69 6e | ."Read.URL's.readable.content.in |
| 8680 | 20 61 6e 20 4f 72 67 20 62 75 66 66 65 72 2e 0a 42 75 66 66 65 72 20 69 73 20 64 69 73 70 6c 61 | .an.Org.buffer..Buffer.is.displa |
| 86a0 | 79 65 64 20 75 73 69 6e 67 20 53 48 4f 57 2d 42 55 46 46 45 52 2d 46 55 4e 43 54 49 4f 4e 2e 22 | yed.using.SHOW-BUFFER-FUNCTION." |
| 86c0 | 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 20 28 6c 69 73 74 20 28 6f 72 67 2d 77 65 62 2d 74 | ...(interactive.(list.(org-web-t |
| 86e0 | 6f 6f 6c 73 2d 2d 67 65 74 2d 66 69 72 73 74 2d 75 72 6c 29 29 29 0a 20 20 28 6c 65 74 20 28 28 | ools--get-first-url)))...(let.(( |
| 8700 | 65 6e 74 72 79 20 28 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 75 72 6c 2d 61 73 2d 72 65 61 | entry.(org-web-tools--url-as-rea |
| 8720 | 64 61 62 6c 65 2d 6f 72 67 20 75 72 6c 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 65 6e 74 72 79 | dable-org.url))).....(when.entry |
| 8740 | 0a 20 20 20 20 20 20 28 66 75 6e 63 61 6c 6c 20 73 68 6f 77 2d 62 75 66 66 65 72 2d 66 75 6e 63 | .......(funcall.show-buffer-func |
| 8760 | 74 69 6f 6e 20 75 72 6c 29 0a 20 20 20 20 20 20 28 6f 72 67 2d 6d 6f 64 65 29 0a 20 20 20 20 20 | tion.url).......(org-mode)...... |
| 8780 | 20 28 69 6e 73 65 72 74 20 65 6e 74 72 79 29 0a 20 20 20 20 20 20 3b 3b 20 53 65 74 20 62 75 66 | .(insert.entry).......;;.Set.buf |
| 87a0 | 66 65 72 20 74 69 74 6c 65 0a 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 70 6f 69 6e | fer.title.......(goto-char.(poin |
| 87c0 | 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 28 72 65 6e 61 6d 65 2d 62 75 66 66 65 72 20 28 63 64 | t-min)).......(rename-buffer.(cd |
| 87e0 | 72 20 28 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 72 65 61 64 2d 6f 72 67 2d 62 72 61 63 6b | r.(org-web-tools--read-org-brack |
| 8800 | 65 74 2d 6c 69 6e 6b 29 29 29 29 29 29 0a 0a 3b 3b 3b 23 23 23 61 75 74 6f 6c 6f 61 64 0a 28 64 | et-link))))))..;;;###autoload.(d |
| 8820 | 65 66 75 6e 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 63 6f 6e 76 65 72 74 2d 6c 69 6e 6b 73 | efun.org-web-tools-convert-links |
| 8840 | 2d 74 6f 2d 70 61 67 65 2d 65 6e 74 72 69 65 73 20 28 29 0a 20 20 22 43 6f 6e 76 65 72 74 20 6c | -to-page-entries.()..."Convert.l |
| 8860 | 69 6e 6b 73 20 69 6e 20 63 75 72 72 65 6e 74 20 65 6e 74 72 79 20 69 6e 74 6f 20 65 6e 74 72 69 | inks.in.current.entry.into.entri |
| 8880 | 65 73 20 63 6f 6e 74 61 69 6e 69 6e 67 20 6c 69 6e 6b 65 64 20 70 61 67 65 73 27 20 63 6f 6e 74 | es.containing.linked.pages'.cont |
| 88a0 | 65 6e 74 2e 0a 42 6f 74 68 20 70 6c 61 69 6e 20 6c 69 6e 6b 73 20 61 6e 64 20 4f 72 67 20 62 72 | ent..Both.plain.links.and.Org.br |
| 88c0 | 61 63 6b 65 74 20 6c 69 6e 6b 73 20 61 72 65 20 70 72 6f 63 65 73 73 65 64 2e 20 20 50 61 67 65 | acket.links.are.processed...Page |
| 88e0 | 0a 63 6f 6e 74 65 6e 74 20 69 73 20 70 72 6f 63 65 73 73 65 64 20 77 69 74 68 20 60 65 77 77 2d | .content.is.processed.with.`eww- |
| 8900 | 72 65 61 64 61 62 6c 65 27 2e 20 20 41 6c 6c 20 6c 69 6e 6b 73 20 69 6e 20 74 68 65 0a 63 75 72 | readable'...All.links.in.the.cur |
| 8920 | 72 65 6e 74 20 65 6e 74 72 79 20 28 69 2e 65 2e 20 74 68 69 73 20 64 6f 65 73 20 6e 6f 74 20 6c | rent.entry.(i.e..this.does.not.l |
| 8940 | 6f 6f 6b 20 64 65 65 70 65 72 20 69 6e 20 74 68 65 20 73 75 62 74 72 65 65 2c 20 6e 6f 72 0a 6f | ook.deeper.in.the.subtree,.nor.o |
| 8960 | 75 74 73 69 64 65 20 6f 66 20 69 74 29 20 77 69 6c 6c 20 62 65 20 63 6f 6e 76 65 72 74 65 64 2e | utside.of.it).will.be.converted. |
| 8980 | 22 0a 20 20 28 69 6e 74 65 72 61 63 74 69 76 65 29 0a 20 20 28 63 6c 2d 66 6c 65 74 20 28 28 70 | "...(interactive)...(cl-flet.((p |
| 89a0 | 72 65 76 2d 75 72 6c 20 28 65 6e 74 72 79 2d 62 65 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | rev-url.(entry-beg)............. |
| 89c0 | 20 20 3b 3b 20 57 6f 72 6b 20 66 72 6f 6d 20 74 68 65 20 62 6f 74 74 6f 6d 20 6f 66 20 74 68 65 | ..;;.Work.from.the.bottom.of.the |
| 89e0 | 20 6c 69 73 74 20 74 6f 20 74 68 65 20 74 6f 70 2c 20 6d 61 6b 65 73 20 69 74 20 73 69 6d 70 6c | .list.to.the.top,.makes.it.simpl |
| 8a00 | 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 72 65 2d 73 65 61 72 63 | er...............(when.(re-searc |
| 8a20 | 68 2d 62 61 63 6b 77 61 72 64 20 28 72 78 20 22 68 74 74 70 22 20 28 6f 70 74 69 6f 6e 61 6c 20 | h-backward.(rx."http".(optional. |
| 8a40 | 22 73 22 29 20 22 3a 2f 2f 22 20 28 31 2b 20 28 6e 6f 74 20 28 61 6e 79 20 73 70 61 63 65 29 29 | "s")."://".(1+.(not.(any.space)) |
| 8a60 | 29 29 20 65 6e 74 72 79 2d 62 65 67 20 27 6e 6f 2d 65 72 72 6f 72 29 0a 20 20 20 20 20 20 20 20 | )).entry-beg.'no-error)......... |
| 8a80 | 20 20 20 20 20 20 20 20 3b 3b 20 46 6f 75 6e 64 20 6c 69 6e 6b 3b 20 73 65 65 20 69 66 20 69 74 | ........;;.Found.link;.see.if.it |
| 8aa0 | 27 73 20 61 6e 20 4f 72 67 20 6c 69 6e 6b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 | 's.an.Org.link.................( |
| 8ac0 | 62 65 67 69 6e 6e 69 6e 67 2d 6f 66 2d 6c 69 6e 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | beginning-of-line).............. |
| 8ae0 | 20 20 20 28 69 66 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 6f 72 67 2d 6c 69 | ...(if.(re-search-forward.org-li |
| 8b00 | 6e 6b 2d 62 72 61 63 6b 65 74 2d 72 65 20 28 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e | nk-bracket-re.(line-end-position |
| 8b20 | 29 20 27 6e 6f 65 72 72 6f 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ).'noerror)..................... |
| 8b40 | 3b 3b 20 4f 72 67 20 6c 69 6e 6b 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ;;.Org.link..................... |
| 8b60 | 28 6c 69 73 74 20 3b 3b 20 52 65 63 6f 6e 73 74 72 75 63 74 20 6c 69 6e 6b 20 66 72 6f 6d 20 72 | (list.;;.Reconstruct.link.from.r |
| 8b80 | 65 67 65 78 70 20 67 72 6f 75 70 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | egexp.groups.................... |
| 8ba0 | 20 20 28 63 6f 6e 63 61 74 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 31 29 20 28 6d 61 74 63 | ..(concat.(match-string.1).(matc |
| 8bc0 | 68 2d 73 74 72 69 6e 67 20 33 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | h-string.3)).................... |
| 8be0 | 20 20 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 30 29 29 0a 20 20 20 20 20 20 20 20 20 | ..(match-beginning.0)).......... |
| 8c00 | 20 20 20 20 20 20 20 20 20 3b 3b 20 50 6c 61 69 6e 20 6c 69 6e 6b 0a 20 20 20 20 20 20 20 20 20 | .........;;.Plain.link.......... |
| 8c20 | 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 30 29 20 | .........(list.(match-string.0). |
| 8c40 | 28 6d 61 74 63 68 2d 62 65 67 69 6e 6e 69 6e 67 20 30 29 29 29 29 29 29 0a 20 20 20 20 28 6c 65 | (match-beginning.0)))))).....(le |
| 8c60 | 74 20 28 28 6c 65 76 65 6c 20 28 31 2b 20 28 6f 72 67 2d 6f 75 74 6c 69 6e 65 2d 6c 65 76 65 6c | t.((level.(1+.(org-outline-level |
| 8c80 | 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 65 6e 74 72 79 2d 62 65 67 20 28 6f 72 67 2d 65 6e | )))...........(entry-beg.(org-en |
| 8ca0 | 74 72 79 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 29 29 29 0a 20 20 20 20 20 20 | try-beginning-position)))....... |
| 8cc0 | 28 67 6f 74 6f 2d 63 68 61 72 20 28 6f 72 67 2d 65 6e 74 72 79 2d 65 6e 64 2d 70 6f 73 69 74 69 | (goto-char.(org-entry-end-positi |
| 8ce0 | 6f 6e 29 29 0a 20 20 20 20 20 20 28 77 68 69 6c 65 20 28 2d 77 68 65 6e 2d 6c 65 74 2a 20 28 28 | on)).......(while.(-when-let*.(( |
| 8d00 | 28 75 72 6c 20 6c 69 6e 6b 2d 62 65 67 29 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 | (url.link-beg).(save-excursion.. |
| 8d20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| 8d40 | 20 20 20 20 20 20 20 20 20 20 20 28 70 72 65 76 2d 75 72 6c 20 65 6e 74 72 79 2d 62 65 67 29 29 | ...........(prev-url.entry-beg)) |
| 8d60 | 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6e 65 77 | )...........................(new |
| 8d80 | 2d 65 6e 74 72 79 20 28 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 75 72 6c 2d 61 73 2d 72 65 | -entry.(org-web-tools--url-as-re |
| 8da0 | 61 64 61 62 6c 65 2d 6f 72 67 20 75 72 6c 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | adable-org.url)))............... |
| 8dc0 | 20 3b 3b 20 54 4f 44 4f 3a 20 4e 65 65 64 73 20 65 72 72 6f 72 20 68 61 6e 64 6c 69 6e 67 0a 20 | .;;.TODO:.Needs.error.handling.. |
| 8de0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 46 49 58 4d 45 3a 20 49 66 20 61 20 55 52 4c | ..............;;.FIXME:.If.a.URL |
| 8e00 | 20 66 61 69 6c 73 20 74 6f 20 66 65 74 63 68 2c 20 74 68 69 73 20 73 68 6f 75 6c 64 20 73 6b 69 | .fails.to.fetch,.this.should.ski |
| 8e20 | 70 20 69 74 2c 20 62 75 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 74 68 61 74 | p.it,.but................;;.that |
| 8e40 | 20 6d 65 61 6e 73 20 74 68 65 20 66 61 69 6c 65 64 20 55 52 4c 20 77 69 6c 6c 20 62 65 63 6f 6d | .means.the.failed.URL.will.becom |
| 8e60 | 65 20 70 61 72 74 20 6f 66 20 74 68 65 20 6e 65 78 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | e.part.of.the.next.............. |
| 8e80 | 20 20 3b 3b 20 65 6e 74 72 79 27 73 20 63 6f 6e 74 65 6e 74 73 2e 20 20 4d 69 67 68 74 20 6e 65 | ..;;.entry's.contents...Might.ne |
| 8ea0 | 65 64 20 74 6f 20 72 65 61 64 20 74 68 65 20 77 68 6f 6c 65 20 6c 69 73 74 20 61 74 0a 20 20 20 | ed.to.read.the.whole.list.at.... |
| 8ec0 | 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6f 6e 63 65 2c 20 75 73 65 20 6d 61 72 6b 65 72 73 | ............;;.once,.use.markers |
| 8ee0 | 20 74 6f 20 74 72 61 63 6b 20 74 68 65 20 6c 69 73 74 27 73 20 70 6f 73 69 74 69 6f 6e 2c 20 74 | .to.track.the.list's.position,.t |
| 8f00 | 68 65 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 72 65 70 6c 61 63 65 20 74 68 | hen................;;.replace.th |
| 8f20 | 65 20 77 68 6f 6c 65 20 6c 69 73 74 20 77 69 74 68 20 61 6e 79 20 65 72 72 6f 72 65 64 20 55 52 | e.whole.list.with.any.errored.UR |
| 8f40 | 4c 73 20 61 66 74 65 72 20 69 74 27 73 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 | Ls.after.it's................;;. |
| 8f60 | 64 6f 6e 65 2e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 | done.................(goto-char. |
| 8f80 | 6c 69 6e 6b 2d 62 65 67 29 20 3b 20 54 68 69 73 20 73 68 6f 75 6c 64 20 4e 4f 54 20 62 65 20 6e | link-beg).;.This.should.NOT.be.n |
| 8fa0 | 65 63 65 73 73 61 72 79 21 20 20 42 75 74 20 69 74 20 69 73 2c 20 62 65 63 61 75 73 65 20 74 68 | ecessary!..But.it.is,.because.th |
| 8fc0 | 65 20 70 6f 69 6e 74 20 6d 6f 76 65 73 20 62 61 63 6b 20 64 6f 77 6e 20 61 20 6c 69 6e 65 21 20 | e.point.moves.back.down.a.line!. |
| 8fe0 | 20 57 68 79 3f 21 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 64 65 6c 65 74 65 2d 72 65 | .Why?!................(delete-re |
| 9000 | 67 69 6f 6e 20 28 6c 69 6e 65 2d 62 65 67 69 6e 6e 69 6e 67 2d 70 6f 73 69 74 69 6f 6e 29 20 28 | gion.(line-beginning-position).( |
| 9020 | 6c 69 6e 65 2d 65 6e 64 2d 70 6f 73 69 74 69 6f 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | line-end-position))............. |
| 9040 | 20 20 20 28 6f 72 67 2d 70 61 73 74 65 2d 73 75 62 74 72 65 65 20 6c 65 76 65 6c 20 6e 65 77 2d | ...(org-paste-subtree.level.new- |
| 9060 | 65 6e 74 72 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 3b 3b 20 6f 72 67 2d 70 61 73 | entry)................;;.org-pas |
| 9080 | 74 65 2d 73 75 62 74 72 65 65 20 72 65 74 75 72 6e 73 20 6e 69 6c 2c 20 73 6f 20 77 65 20 68 61 | te-subtree.returns.nil,.so.we.ha |
| 90a0 | 76 65 20 74 6f 20 72 65 74 75 72 6e 20 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 74 29 | ve.to.return.t................t) |
| 90c0 | 0a 20 20 20 20 20 20 20 20 74 29 29 29 29 0a 0a 3b 3b 3b 3b 20 46 75 6e 63 74 69 6f 6e 73 0a 0a | .........t))))..;;;;.Functions.. |
| 90e0 | 28 63 6c 2d 64 65 66 75 6e 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 6f 72 67 2d 6c 69 6e | (cl-defun.org-web-tools--org-lin |
| 9100 | 6b 2d 66 6f 72 2d 75 72 6c 20 28 26 6f 70 74 69 6f 6e 61 6c 20 28 75 72 6c 20 28 6f 72 67 2d 77 | k-for-url.(&optional.(url.(org-w |
| 9120 | 65 62 2d 74 6f 6f 6c 73 2d 2d 67 65 74 2d 66 69 72 73 74 2d 75 72 6c 29 29 29 0a 20 20 22 52 65 | eb-tools--get-first-url)))..."Re |
| 9140 | 74 75 72 6e 20 4f 72 67 20 6c 69 6e 6b 20 74 6f 20 55 52 4c 20 75 73 69 6e 67 20 74 69 74 6c 65 | turn.Org.link.to.URL.using.title |
| 9160 | 20 6f 66 20 48 54 4d 4c 20 70 61 67 65 20 61 74 20 55 52 4c 2e 0a 49 66 20 55 52 4c 20 69 73 20 | .of.HTML.page.at.URL..If.URL.is. |
| 9180 | 6e 6f 74 20 67 69 76 65 6e 2c 20 6c 6f 6f 6b 20 66 6f 72 20 66 69 72 73 74 20 55 52 4c 20 69 6e | not.given,.look.for.first.URL.in |
| 91a0 | 20 60 6b 69 6c 6c 2d 72 69 6e 67 27 2e 20 20 49 66 20 70 61 67 65 0a 61 74 20 55 52 4c 20 68 61 | .`kill-ring'...If.page.at.URL.ha |
| 91c0 | 73 20 6e 6f 20 74 69 74 6c 65 2c 20 72 65 74 75 72 6e 20 55 52 4c 2e 22 0a 20 20 28 69 66 2d 6c | s.no.title,.return.URL."...(if-l |
| 91e0 | 65 74 20 28 28 64 6f 6d 20 28 70 6c 7a 20 27 67 65 74 20 75 72 6c 20 3a 61 73 20 28 6c 61 6d 62 | et.((dom.(plz.'get.url.:as.(lamb |
| 9200 | 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | da.()........................... |
| 9220 | 20 20 20 20 20 20 20 20 20 20 28 6c 69 62 78 6d 6c 2d 70 61 72 73 65 2d 68 74 6d 6c 2d 72 65 67 | ..........(libxml-parse-html-reg |
| 9240 | 69 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 29 29 29 29 0a | ion.(point-min).(point-max))))). |
| 9260 | 20 20 20 20 20 20 20 20 20 20 20 28 74 69 74 6c 65 20 28 63 6c 2d 63 61 64 64 72 20 28 63 61 72 | ...........(title.(cl-caddr.(car |
| 9280 | 20 28 64 6f 6d 2d 62 79 2d 74 61 67 20 64 6f 6d 20 27 74 69 74 6c 65 29 29 29 29 29 0a 20 20 20 | .(dom-by-tag.dom.'title))))).... |
| 92a0 | 20 20 20 28 6f 72 67 2d 6c 69 6e 6b 2d 6d 61 6b 65 2d 73 74 72 69 6e 67 20 75 72 6c 20 28 6f 72 | ...(org-link-make-string.url.(or |
| 92c0 | 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 63 6c 65 61 6e 75 70 2d 74 69 74 6c 65 20 74 69 74 6c 65 | g-web-tools--cleanup-title.title |
| 92e0 | 29 29 0a 20 20 20 20 28 6d 65 73 73 61 67 65 20 22 48 54 4d 4c 20 70 61 67 65 20 61 74 20 55 52 | )).....(message."HTML.page.at.UR |
| 9300 | 4c 20 68 61 73 20 6e 6f 20 74 69 74 6c 65 22 29 0a 20 20 20 20 75 72 6c 29 29 0a 0a 28 64 65 66 | L.has.no.title").....url))..(def |
| 9320 | 75 6e 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 65 77 77 2d 72 65 61 64 61 62 6c 65 20 28 | un.org-web-tools--eww-readable.( |
| 9340 | 64 6f 6d 29 0a 20 20 22 52 65 74 75 72 6e 20 5c 22 72 65 61 64 61 62 6c 65 5c 22 20 70 61 72 74 | dom)..."Return.\"readable\".part |
| 9360 | 20 6f 66 20 44 4f 4d 20 77 69 74 68 20 74 69 74 6c 65 2e 0a 52 65 74 75 72 6e 73 20 6c 69 73 74 | .of.DOM.with.title..Returns.list |
| 9380 | 20 28 54 49 54 4c 45 20 2e 20 48 54 4d 4c 29 2e 20 20 42 61 73 65 64 20 6f 6e 20 60 65 77 77 2d | .(TITLE...HTML)...Based.on.`eww- |
| 93a0 | 72 65 61 64 61 62 6c 65 27 2e 22 0a 20 20 28 6c 65 74 20 28 28 74 69 74 6c 65 20 28 63 6c 2d 63 | readable'."...(let.((title.(cl-c |
| 93c0 | 61 64 64 72 20 28 63 61 72 20 28 64 6f 6d 2d 62 79 2d 74 61 67 20 64 6f 6d 20 27 74 69 74 6c 65 | addr.(car.(dom-by-tag.dom.'title |
| 93e0 | 29 29 29 29 29 0a 20 20 20 20 28 65 77 77 2d 73 63 6f 72 65 2d 72 65 61 64 61 62 69 6c 69 74 79 | ))))).....(eww-score-readability |
| 9400 | 20 64 6f 6d 29 0a 20 20 20 20 28 63 6f 6e 73 20 74 69 74 6c 65 0a 20 20 20 20 20 20 20 20 20 20 | .dom).....(cons.title........... |
| 9420 | 28 77 69 74 68 2d 74 65 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 73 | (with-temp-buffer.............(s |
| 9440 | 68 72 2d 64 6f 6d 2d 70 72 69 6e 74 20 28 65 77 77 2d 68 69 67 68 65 73 74 2d 72 65 61 64 61 62 | hr-dom-print.(eww-highest-readab |
| 9460 | 69 6c 69 74 79 20 64 6f 6d 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 28 62 75 66 66 65 72 2d | ility.dom)).............(buffer- |
| 9480 | 73 74 72 69 6e 67 29 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c | string)))))..(defun.org-web-tool |
| 94a0 | 73 2d 2d 75 72 6c 2d 61 73 2d 72 65 61 64 61 62 6c 65 2d 6f 72 67 20 28 26 6f 70 74 69 6f 6e 61 | s--url-as-readable-org.(&optiona |
| 94c0 | 6c 20 75 72 6c 29 0a 20 20 22 52 65 74 75 72 6e 20 73 74 72 69 6e 67 20 63 6f 6e 74 61 69 6e 69 | l.url)..."Return.string.containi |
| 94e0 | 6e 67 20 4f 72 67 20 65 6e 74 72 79 20 6f 66 20 55 52 4c 27 73 20 77 65 62 20 70 61 67 65 20 63 | ng.Org.entry.of.URL's.web.page.c |
| 9500 | 6f 6e 74 65 6e 74 2e 0a 43 6f 6e 74 65 6e 74 20 69 73 20 70 72 6f 63 65 73 73 65 64 20 77 69 74 | ontent..Content.is.processed.wit |
| 9520 | 68 20 60 65 77 77 2d 72 65 61 64 61 62 6c 65 27 20 61 6e 64 20 50 61 6e 64 6f 63 2e 20 20 45 6e | h.`eww-readable'.and.Pandoc...En |
| 9540 | 74 72 79 20 77 69 6c 6c 0a 62 65 20 61 20 74 6f 70 2d 6c 65 76 65 6c 20 68 65 61 64 69 6e 67 2c | try.will.be.a.top-level.heading, |
| 9560 | 20 77 69 74 68 20 61 72 74 69 63 6c 65 20 63 6f 6e 74 65 6e 74 73 20 62 65 6c 6f 77 20 61 0a 73 | .with.article.contents.below.a.s |
| 9580 | 65 63 6f 6e 64 2d 6c 65 76 65 6c 20 5c 22 41 72 74 69 63 6c 65 5c 22 20 68 65 61 64 69 6e 67 2c | econd-level.\"Article\".heading, |
| 95a0 | 20 61 6e 64 20 61 20 74 69 6d 65 73 74 61 6d 70 20 69 6e 20 74 68 65 0a 66 69 72 73 74 2d 6c 65 | .and.a.timestamp.in.the.first-le |
| 95c0 | 76 65 6c 20 65 6e 74 72 79 20 66 6f 72 20 77 72 69 74 69 6e 67 20 63 6f 6d 6d 65 6e 74 73 2e 22 | vel.entry.for.writing.comments." |
| 95e0 | 0a 20 20 3b 3b 20 42 79 20 74 61 6b 69 6e 67 20 61 6e 20 6f 70 74 69 6f 6e 61 6c 20 55 52 4c 2c | ...;;.By.taking.an.optional.URL, |
| 9600 | 20 61 6e 64 20 67 65 74 74 69 6e 67 20 69 74 20 66 72 6f 6d 20 74 68 65 20 63 6c 69 70 62 6f 61 | .and.getting.it.from.the.clipboa |
| 9620 | 72 64 20 69 66 0a 20 20 3b 3b 20 6e 6f 6e 65 20 69 73 20 67 69 76 65 6e 2c 20 74 68 69 73 20 62 | rd.if...;;.none.is.given,.this.b |
| 9640 | 65 63 6f 6d 65 73 20 73 75 69 74 61 62 6c 65 20 66 6f 72 20 75 73 65 20 69 6e 20 61 6e 20 6f 72 | ecomes.suitable.for.use.in.an.or |
| 9660 | 67 2d 63 61 70 74 75 72 65 0a 20 20 3b 3b 20 74 65 6d 70 6c 61 74 65 2c 20 6c 69 6b 65 3a 0a 0a | g-capture...;;.template,.like:.. |
| 9680 | 20 20 3b 3b 20 28 22 77 72 22 20 22 43 61 70 74 75 72 65 20 57 65 62 20 73 69 74 65 20 77 69 74 | ..;;.("wr"."Capture.Web.site.wit |
| 96a0 | 68 20 65 77 77 2d 72 65 61 64 61 62 6c 65 22 20 65 6e 74 72 79 0a 20 20 3b 3b 20 20 28 66 69 6c | h.eww-readable".entry...;;..(fil |
| 96c0 | 65 20 22 7e 2f 6f 72 67 2f 61 72 74 69 63 6c 65 73 2e 6f 72 67 22 29 0a 20 20 3b 3b 20 20 22 25 | e."~/org/articles.org")...;;.."% |
| 96e0 | 28 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 75 72 6c 2d 61 73 2d 72 65 61 64 61 62 6c 65 2d | (org-web-tools--url-as-readable- |
| 9700 | 6f 72 67 29 22 29 0a 20 20 28 2d 6c 65 74 2a 20 28 28 75 72 6c 20 28 6f 72 20 75 72 6c 20 28 6f | org)")...(-let*.((url.(or.url.(o |
| 9720 | 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 67 65 74 2d 66 69 72 73 74 2d 75 72 6c 29 29 29 0a 20 | rg-web-tools--get-first-url))).. |
| 9740 | 20 20 20 20 20 20 20 20 20 28 64 6f 6d 20 28 70 6c 7a 20 27 67 65 74 20 75 72 6c 20 3a 61 73 20 | .........(dom.(plz.'get.url.:as. |
| 9760 | 23 27 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 73 61 6e 69 74 69 7a 65 64 2d 64 6f 6d 29 29 | #'org-web-tools--sanitized-dom)) |
| 9780 | 0a 20 20 20 20 20 20 20 20 20 20 28 28 74 69 74 6c 65 20 2e 20 72 65 61 64 61 62 6c 65 29 20 28 | ...........((title...readable).( |
| 97a0 | 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 65 77 77 2d 72 65 61 64 61 62 6c 65 20 64 6f 6d 29 | org-web-tools--eww-readable.dom) |
| 97c0 | 29 0a 20 20 20 20 20 20 20 20 20 20 28 74 69 74 6c 65 20 28 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c | )...........(title.(org-web-tool |
| 97e0 | 73 2d 2d 63 6c 65 61 6e 75 70 2d 74 69 74 6c 65 20 28 6f 72 20 74 69 74 6c 65 20 22 22 29 29 29 | s--cleanup-title.(or.title.""))) |
| 9800 | 0a 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 76 65 72 74 65 64 20 28 6f 72 67 2d 77 65 62 2d 74 | ...........(converted.(org-web-t |
| 9820 | 6f 6f 6c 73 2d 2d 68 74 6d 6c 2d 74 6f 2d 6f 72 67 2d 77 69 74 68 2d 70 61 6e 64 6f 63 20 72 65 | ools--html-to-org-with-pandoc.re |
| 9840 | 61 64 61 62 6c 65 29 29 0a 20 20 20 20 20 20 20 20 20 20 28 6c 69 6e 6b 20 28 6f 72 67 2d 6c 69 | adable))...........(link.(org-li |
| 9860 | 6e 6b 2d 6d 61 6b 65 2d 73 74 72 69 6e 67 20 75 72 6c 20 74 69 74 6c 65 29 29 0a 20 20 20 20 20 | nk-make-string.url.title))...... |
| 9880 | 20 20 20 20 20 28 74 69 6d 65 73 74 61 6d 70 20 28 66 6f 72 6d 61 74 2d 74 69 6d 65 2d 73 74 72 | .....(timestamp.(format-time-str |
| 98a0 | 69 6e 67 20 28 6f 72 67 2d 74 69 6d 65 2d 73 74 61 6d 70 2d 66 6f 72 6d 61 74 20 27 77 69 74 68 | ing.(org-time-stamp-format.'with |
| 98c0 | 2d 74 69 6d 65 20 27 69 6e 61 63 74 69 76 65 29 29 29 29 0a 20 20 20 20 28 77 69 74 68 2d 74 65 | -time.'inactive)))).....(with-te |
| 98e0 | 6d 70 2d 62 75 66 66 65 72 0a 20 20 20 20 20 20 28 6f 72 67 2d 6d 6f 64 65 29 0a 20 20 20 20 20 | mp-buffer.......(org-mode)...... |
| 9900 | 20 3b 3b 20 49 6e 73 65 72 74 20 61 72 74 69 63 6c 65 20 74 65 78 74 0a 20 20 20 20 20 20 28 69 | .;;.Insert.article.text.......(i |
| 9920 | 6e 73 65 72 74 20 63 6f 6e 76 65 72 74 65 64 29 0a 20 20 20 20 20 20 3b 3b 20 44 65 6d 6f 74 65 | nsert.converted).......;;.Demote |
| 9940 | 20 69 6e 2d 61 72 74 69 63 6c 65 20 68 65 61 64 69 6e 67 73 0a 20 20 20 20 20 20 3b 3b 20 4d 41 | .in-article.headings.......;;.MA |
| 9960 | 59 42 45 3a 20 55 73 65 20 60 6f 72 67 2d 70 61 73 74 65 2d 73 75 62 74 72 65 65 27 20 69 6e 73 | YBE:.Use.`org-paste-subtree'.ins |
| 9980 | 74 65 61 64 20 6f 66 20 64 65 6d 6f 74 69 6e 67 20 68 65 61 64 69 6e 67 73 20 6f 75 72 73 65 6c | tead.of.demoting.headings.oursel |
| 99a0 | 76 65 73 2e 0a 20 20 20 20 20 20 28 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 64 65 6d 6f 74 | ves........(org-web-tools--demot |
| 99c0 | 65 2d 68 65 61 64 69 6e 67 73 2d 62 65 6c 6f 77 20 32 29 0a 20 20 20 20 20 20 3b 3b 20 49 6e 73 | e-headings-below.2).......;;.Ins |
| 99e0 | 65 72 74 20 68 65 61 64 69 6e 67 73 20 61 74 20 74 6f 70 0a 20 20 20 20 20 20 28 67 6f 74 6f 2d | ert.headings.at.top.......(goto- |
| 9a00 | 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 28 69 6e 73 65 72 74 20 | char.(point-min)).......(insert. |
| 9a20 | 22 2a 20 22 20 6c 69 6e 6b 20 22 20 3a 77 65 62 73 69 74 65 3a 22 20 22 5c 6e 5c 6e 22 0a 20 20 | "*.".link.".:website:"."\n\n"... |
| 9a40 | 20 20 20 20 20 20 20 20 20 20 20 20 74 69 6d 65 73 74 61 6d 70 20 22 5c 6e 5c 6e 22 0a 20 20 20 | ............timestamp."\n\n".... |
| 9a60 | 20 20 20 20 20 20 20 20 20 20 20 22 2a 2a 20 41 72 74 69 63 6c 65 22 20 22 5c 6e 5c 6e 22 29 0a | ..........."**.Article"."\n\n"). |
| 9a80 | 20 20 20 20 20 20 28 62 75 66 66 65 72 2d 73 74 72 69 6e 67 29 29 29 29 0a 0a 28 64 65 66 75 6e | ......(buffer-string))))..(defun |
| 9aa0 | 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 73 61 6e 69 74 69 7a 65 64 2d 64 6f 6d 20 28 29 | .org-web-tools--sanitized-dom.() |
| 9ac0 | 0a 20 20 22 52 65 74 75 72 6e 20 73 61 6e 69 74 69 7a 65 64 20 44 4f 4d 20 66 6f 72 20 48 54 4d | ..."Return.sanitized.DOM.for.HTM |
| 9ae0 | 4c 20 69 6e 20 63 75 72 72 65 6e 74 20 62 75 66 66 65 72 2e 22 0a 20 20 3b 3b 20 6c 69 62 78 6d | L.in.current.buffer."...;;.libxm |
| 9b00 | 6c 2d 70 61 72 73 65 2d 68 74 6d 6c 2d 72 65 67 69 6f 6e 20 63 6f 6e 76 65 72 74 73 20 22 26 6e | l-parse-html-region.converts."&n |
| 9b20 | 62 73 70 3b 22 20 74 6f 20 22 c2 a0 22 2c 20 73 6f 20 77 65 20 68 61 76 65 20 74 6f 0a 20 20 3b | bsp;".to."..",.so.we.have.to...; |
| 9b40 | 3b 20 63 6c 65 61 6e 20 74 68 65 20 48 54 4d 4c 20 66 69 72 73 74 2e 0a 20 20 28 63 6c 2d 6c 6f | ;.clean.the.HTML.first....(cl-lo |
| 9b60 | 6f 70 20 66 6f 72 20 28 6d 61 74 63 68 20 2e 20 72 65 70 6c 61 63 65 29 20 69 6e 20 28 6c 69 73 | op.for.(match...replace).in.(lis |
| 9b80 | 74 20 28 63 6f 6e 73 20 22 26 6e 62 73 70 3b 22 20 22 20 22 29 29 0a 20 20 20 20 20 20 20 20 20 | t.(cons." ".".")).......... |
| 9ba0 | 20 20 64 6f 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 | ..do.(progn.................(got |
| 9bc0 | 6f 2d 63 68 61 72 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | o-char.(point-min))............. |
| 9be0 | 20 20 20 20 28 77 68 69 6c 65 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 6d 61 | ....(while.(re-search-forward.ma |
| 9c00 | 74 63 68 20 6e 69 6c 20 74 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 72 65 | tch.nil.t)...................(re |
| 9c20 | 70 6c 61 63 65 2d 6d 61 74 63 68 20 72 65 70 6c 61 63 65 29 29 29 29 0a 20 20 28 6c 69 62 78 6d | place-match.replace))))...(libxm |
| 9c40 | 6c 2d 70 61 72 73 65 2d 68 74 6d 6c 2d 72 65 67 69 6f 6e 20 28 70 6f 69 6e 74 2d 6d 69 6e 29 20 | l-parse-html-region.(point-min). |
| 9c60 | 28 70 6f 69 6e 74 2d 6d 61 78 29 29 29 0a 0a 3b 3b 3b 3b 3b 20 4d 69 73 63 0a 0a 28 64 65 66 75 | (point-max)))..;;;;;.Misc..(defu |
| 9c80 | 6e 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 63 6c 65 61 6e 75 70 2d 74 69 74 6c 65 20 28 | n.org-web-tools--cleanup-title.( |
| 9ca0 | 74 69 74 6c 65 29 0a 20 20 22 52 65 74 75 72 6e 20 54 49 54 4c 45 20 77 69 74 68 20 73 70 75 72 | title)..."Return.TITLE.with.spur |
| 9cc0 | 69 6f 75 73 20 77 68 69 74 65 73 70 61 63 65 20 72 65 6d 6f 76 65 64 2e 22 0a 20 20 28 2d 3e 3e | ious.whitespace.removed."...(->> |
| 9ce0 | 20 74 69 74 6c 65 0a 20 20 20 20 20 20 20 28 73 2d 72 65 70 6c 61 63 65 20 22 5c 6e 22 20 22 20 | .title........(s-replace."\n".". |
| 9d00 | 22 29 0a 20 20 20 20 20 20 20 28 73 2d 74 72 69 6d 29 0a 20 20 20 20 20 20 20 28 73 2d 63 6f 6c | ")........(s-trim)........(s-col |
| 9d20 | 6c 61 70 73 65 2d 77 68 69 74 65 73 70 61 63 65 29 29 29 0a 0a 28 64 65 66 75 6e 20 6f 72 67 2d | lapse-whitespace)))..(defun.org- |
| 9d40 | 77 65 62 2d 74 6f 6f 6c 73 2d 2d 64 65 6d 6f 74 65 2d 68 65 61 64 69 6e 67 73 2d 62 65 6c 6f 77 | web-tools--demote-headings-below |
| 9d60 | 20 28 6c 65 76 65 6c 20 26 6f 70 74 69 6f 6e 61 6c 20 73 6b 69 70 29 0a 20 20 22 44 65 6d 6f 74 | .(level.&optional.skip)..."Demot |
| 9d80 | 65 20 61 6c 6c 20 68 65 61 64 69 6e 67 73 20 69 6e 20 62 75 66 66 65 72 20 73 6f 20 74 68 65 20 | e.all.headings.in.buffer.so.the. |
| 9da0 | 68 69 67 68 65 73 74 20 6c 65 76 65 6c 20 69 73 20 62 65 6c 6f 77 20 4c 45 56 45 4c 2e 0a 49 66 | highest.level.is.below.LEVEL..If |
| 9dc0 | 20 61 6c 6c 20 68 65 61 64 69 6e 67 73 20 61 72 65 20 61 6c 72 65 61 64 79 20 62 65 6c 6f 77 20 | .all.headings.are.already.below. |
| 9de0 | 74 68 61 74 20 6c 65 76 65 6c 2c 20 6e 6f 6e 65 20 61 72 65 20 61 64 6a 75 73 74 65 64 2e 0a 49 | that.level,.none.are.adjusted..I |
| 9e00 | 66 20 53 4b 49 50 20 69 73 20 6e 6f 6e 2d 6e 69 6c 2c 20 69 74 20 69 73 20 70 61 73 73 65 64 20 | f.SKIP.is.non-nil,.it.is.passed. |
| 9e20 | 74 6f 20 60 6f 72 67 2d 6d 61 70 2d 65 6e 74 72 69 65 73 27 2c 20 77 68 69 63 68 20 73 65 65 2e | to.`org-map-entries',.which.see. |
| 9e40 | 0a 4e 6f 74 65 20 74 68 61 74 20 5c 22 68 69 67 68 65 73 74 20 6c 65 76 65 6c 5c 22 20 6d 65 61 | .Note.that.\"highest.level\".mea |
| 9e60 | 6e 73 20 74 68 65 20 66 65 77 65 73 74 20 6e 75 6d 62 65 72 20 6f 66 0a 73 74 61 72 73 20 28 69 | ns.the.fewest.number.of.stars.(i |
| 9e80 | 2e 65 2e 20 74 68 65 20 68 69 67 68 65 73 74 20 6c 65 76 65 6c 20 70 6f 73 73 69 62 6c 65 20 68 | .e..the.highest.level.possible.h |
| 9ea0 | 61 73 20 31 20 73 74 61 72 29 2e 22 0a 20 20 28 6c 65 74 2a 20 28 28 62 75 66 66 65 72 2d 68 69 | as.1.star)."...(let*.((buffer-hi |
| 9ec0 | 67 68 65 73 74 2d 6c 65 76 65 6c 20 28 70 72 6f 67 6e 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 | ghest-level.(progn.............. |
| 9ee0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 67 6f 74 6f 2d 63 68 61 72 20 28 | ....................(goto-char.( |
| 9f00 | 70 6f 69 6e 74 2d 6d 69 6e 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | point-min))..................... |
| 9f20 | 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 6f 72 67 2d 62 65 66 6f 72 65 2d 66 | .............(when.(org-before-f |
| 9f40 | 69 72 73 74 2d 68 65 61 64 69 6e 67 2d 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | irst-heading-p)................. |
| 9f60 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6f 75 74 6c 69 6e 65 2d 6e 65 78 74 | ...................(outline-next |
| 9f80 | 2d 68 65 61 64 69 6e 67 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | -heading))...................... |
| 9fa0 | 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6c 2d 6c 6f 6f 70 20 77 68 69 6c 65 20 28 6f 72 67 2d | ............(cl-loop.while.(org- |
| 9fc0 | 61 74 2d 68 65 61 64 69 6e 67 2d 70 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | at-heading-p)................... |
| 9fe0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 63 6f 6c 6c 65 63 74 20 | ........................collect. |
| a000 | 28 6f 72 67 2d 6f 75 74 6c 69 6e 65 2d 6c 65 76 65 6c 29 20 69 6e 74 6f 20 72 65 73 75 6c 74 0a | (org-outline-level).into.result. |
| a020 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| a040 | 20 20 20 20 20 20 20 20 20 20 64 6f 20 28 6f 75 74 6c 69 6e 65 2d 6e 65 78 74 2d 68 65 61 64 69 | ..........do.(outline-next-headi |
| a060 | 6e 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ng)............................. |
| a080 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 66 69 6e 61 6c 6c 79 20 72 65 74 75 72 6e 20 28 69 66 | ..............finally.return.(if |
| a0a0 | 20 72 65 73 75 6c 74 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | .result......................... |
| a0c0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| a0e0 | 20 20 20 20 20 28 73 65 71 2d 6d 69 6e 20 72 65 73 75 6c 74 29 0a 20 20 20 20 20 20 20 20 20 20 | .....(seq-min.result)........... |
| a100 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ................................ |
| a120 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 30 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 | .................0)))).......... |
| a140 | 28 64 69 66 66 65 72 65 6e 63 65 20 28 2d 20 62 75 66 66 65 72 2d 68 69 67 68 65 73 74 2d 6c 65 | (difference.(-.buffer-highest-le |
| a160 | 76 65 6c 20 6c 65 76 65 6c 29 29 0a 20 20 20 20 20 20 20 20 20 28 61 64 6a 75 73 74 2d 62 79 20 | vel.level))..........(adjust-by. |
| a180 | 28 77 68 65 6e 20 28 3c 3d 20 64 69 66 66 65 72 65 6e 63 65 20 30 29 0a 20 20 20 20 20 20 20 20 | (when.(<=.difference.0)......... |
| a1a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 31 2b 20 28 2a 20 2d 31 20 64 69 66 66 65 72 65 6e | ..............(1+.(*.-1.differen |
| a1c0 | 63 65 29 29 29 29 29 0a 20 20 20 20 28 77 68 65 6e 20 61 64 6a 75 73 74 2d 62 79 0a 20 20 20 20 | ce))))).....(when.adjust-by..... |
| a1e0 | 20 20 3b 3b 20 44 65 6d 6f 74 65 20 68 65 61 64 69 6e 67 73 20 69 6e 20 62 75 66 66 65 72 0a 20 | ..;;.Demote.headings.in.buffer.. |
| a200 | 20 20 20 20 20 28 6f 72 67 2d 6d 61 70 2d 65 6e 74 72 69 65 73 0a 20 20 20 20 20 20 20 28 6c 61 | .....(org-map-entries........(la |
| a220 | 6d 62 64 61 20 28 29 0a 20 20 20 20 20 20 20 20 20 28 64 6f 74 69 6d 65 73 20 28 5f 20 61 64 6a | mbda.()..........(dotimes.(_.adj |
| a240 | 75 73 74 2d 62 79 29 0a 20 20 20 20 20 20 20 20 20 20 20 28 6f 72 67 2d 64 65 6d 6f 74 65 29 29 | ust-by)............(org-demote)) |
| a260 | 29 0a 20 20 20 20 20 20 20 74 20 6e 69 6c 20 73 6b 69 70 29 29 29 29 0a 0a 28 64 65 66 75 6e 20 | )........t.nil.skip))))..(defun. |
| a280 | 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 64 6f 6d 2d 74 6f 2d 68 74 6d 6c 20 28 64 6f 6d 29 | org-web-tools--dom-to-html.(dom) |
| a2a0 | 0a 20 20 22 52 65 74 75 72 6e 20 70 61 72 73 65 64 20 48 54 4d 4c 20 6f 62 6a 65 63 74 20 44 4f | ..."Return.parsed.HTML.object.DO |
| a2c0 | 4d 20 61 73 20 61 6e 20 48 54 4d 4c 20 73 74 72 69 6e 67 2e 0a 4e 6f 74 65 3a 20 54 68 69 73 20 | M.as.an.HTML.string..Note:.This. |
| a2e0 | 69 73 20 61 6e 20 61 70 70 72 6f 78 69 6d 61 74 69 6f 6e 20 61 6e 64 20 69 73 20 6e 6f 74 20 6e | is.an.approximation.and.is.not.n |
| a300 | 65 63 65 73 73 61 72 69 6c 79 20 63 6f 72 72 65 63 74 0a 48 54 4d 4c 2e 22 0a 20 20 3b 3b 20 4d | ecessarily.correct.HTML."...;;.M |
| a320 | 41 59 42 45 3a 20 55 73 65 20 60 73 68 72 2d 64 6f 6d 2d 70 72 69 6e 74 27 20 69 6e 73 74 65 61 | AYBE:.Use.`shr-dom-print'.instea |
| a340 | 64 3f 20 20 28 49 20 74 68 69 6e 6b 20 49 20 77 61 73 6e 27 74 20 61 77 61 72 65 20 6f 66 20 74 | d?..(I.think.I.wasn't.aware.of.t |
| a360 | 68 61 74 20 66 75 6e 63 74 69 6f 6e 20 77 68 65 6e 20 49 20 77 72 6f 74 65 0a 20 20 3b 3b 20 74 | hat.function.when.I.wrote...;;.t |
| a380 | 68 69 73 2e 29 0a 20 20 3b 3b 20 4e 4f 54 45 3a 20 41 73 20 74 68 65 20 64 6f 63 73 74 72 69 6e | his.)...;;.NOTE:.As.the.docstrin |
| a3a0 | 67 20 73 61 79 73 2c 20 63 65 72 74 61 69 6e 20 48 54 4d 4c 20 74 61 67 73 20 6d 61 79 20 6e 6f | g.says,.certain.HTML.tags.may.no |
| a3c0 | 74 20 62 65 0a 20 20 3b 3b 20 72 65 6e 64 65 72 65 64 20 63 6f 72 72 65 63 74 6c 79 2c 20 6c 69 | t.be...;;.rendered.correctly,.li |
| a3e0 | 6b 65 20 49 4d 47 20 74 61 67 73 20 77 68 69 63 68 20 61 72 65 6e 27 74 20 73 75 70 70 6f 73 65 | ke.IMG.tags.which.aren't.suppose |
| a400 | 64 20 74 6f 20 68 61 76 65 0a 20 20 3b 3b 20 63 6c 6f 73 69 6e 67 20 3c 2f 69 6d 67 3e 20 74 61 | d.to.have...;;.closing.</img>.ta |
| a420 | 67 73 2e 20 20 41 73 20 66 61 72 20 61 73 20 49 20 63 61 6e 20 74 65 6c 6c 2c 20 74 68 65 72 65 | gs...As.far.as.I.can.tell,.there |
| a440 | 20 69 73 20 6e 6f 20 63 61 6e 6f 6e 69 63 61 6c 0a 20 20 3b 3b 20 77 61 79 20 74 6f 20 74 72 61 | .is.no.canonical...;;.way.to.tra |
| a460 | 6e 73 66 6f 72 6d 20 61 20 70 61 72 73 65 64 20 44 4f 4d 20 62 61 63 6b 20 74 6f 20 63 6f 72 72 | nsform.a.parsed.DOM.back.to.corr |
| a480 | 65 63 74 20 48 54 4d 4c 20 69 6e 20 45 6d 61 63 73 2e 0a 20 20 3b 3b 20 54 68 69 73 20 69 73 20 | ect.HTML.in.Emacs....;;.This.is. |
| a4a0 | 70 72 6f 62 61 62 6c 79 20 63 6c 6f 73 65 20 65 6e 6f 75 67 68 20 74 6f 20 73 74 69 6c 6c 20 62 | probably.close.enough.to.still.b |
| a4c0 | 65 20 75 73 65 66 75 6c 20 69 6e 20 6d 61 6e 79 20 63 61 73 65 73 2e 0a 20 20 28 63 6c 2d 6c 61 | e.useful.in.many.cases....(cl-la |
| a4e0 | 62 65 6c 73 20 28 28 72 65 6e 64 65 72 20 28 6e 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 | bels.((render.(node)............ |
| a500 | 20 20 20 20 20 28 63 6c 2d 74 79 70 65 63 61 73 65 20 6e 6f 64 65 0a 20 20 20 20 20 20 20 20 20 | .....(cl-typecase.node.......... |
| a520 | 20 20 20 20 20 20 20 20 20 28 73 74 72 69 6e 67 20 6e 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 | .........(string.node).......... |
| a540 | 20 20 20 20 20 20 20 20 20 28 6c 69 73 74 20 28 63 6f 6e 63 61 74 20 22 3c 22 0a 20 20 20 20 20 | .........(list.(concat."<"...... |
| a560 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 73 79 6d 62 | ...........................(symb |
| a580 | 6f 6c 2d 6e 61 6d 65 20 28 64 6f 6d 2d 74 61 67 20 6e 6f 64 65 29 29 0a 20 20 20 20 20 20 20 20 | ol-name.(dom-tag.node))......... |
| a5a0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 77 68 65 6e 20 28 64 | ........................(when.(d |
| a5c0 | 6f 6d 2d 61 74 74 72 69 62 75 74 65 73 20 6e 6f 64 65 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | om-attributes.node)............. |
| a5e0 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 63 6f 6e 63 61 74 20 22 20 | ......................(concat.". |
| a600 | 22 20 28 6d 61 70 63 6f 6e 63 61 74 20 23 27 61 74 74 72 20 28 64 6f 6d 2d 61 74 74 72 69 62 75 | ".(mapconcat.#'attr.(dom-attribu |
| a620 | 74 65 73 20 6e 6f 64 65 29 20 22 20 22 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | tes.node).".")))................ |
| a640 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 22 3e 22 0a 20 20 20 20 20 20 20 20 20 20 20 | .................">"............ |
| a660 | 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 6d 61 70 63 6f 6e 63 61 74 20 | .....................(mapconcat. |
| a680 | 23 27 72 65 6e 64 65 72 20 28 64 6f 6d 2d 63 68 69 6c 64 72 65 6e 20 6e 6f 64 65 29 20 22 5c 6e | #'render.(dom-children.node)."\n |
| a6a0 | 22 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | ").............................. |
| a6c0 | 20 20 20 22 3c 2f 22 20 28 73 79 6d 62 6f 6c 2d 6e 61 6d 65 20 28 64 6f 6d 2d 74 61 67 20 6e 6f | ..."</".(symbol-name.(dom-tag.no |
| a6e0 | 64 65 29 29 20 22 3e 22 29 29 29 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 61 74 74 72 | de)).">"))))...............(attr |
| a700 | 20 28 70 61 69 72 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 28 66 6f 72 6d 61 74 20 | .(pair).................(format. |
| a720 | 22 25 73 3d 5c 22 25 73 5c 22 22 20 28 63 61 72 20 70 61 69 72 29 20 28 63 64 72 20 70 61 69 72 | "%s=\"%s\"".(car.pair).(cdr.pair |
| a740 | 29 29 29 29 0a 20 20 20 20 28 72 65 6e 64 65 72 20 64 6f 6d 29 29 29 0a 0a 28 64 65 66 75 6e 20 | )))).....(render.dom)))..(defun. |
| a760 | 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 67 65 74 2d 66 69 72 73 74 2d 75 72 6c 20 28 29 0a | org-web-tools--get-first-url.(). |
| a780 | 20 20 22 52 65 74 75 72 6e 20 55 52 4c 20 69 6e 20 63 6c 69 70 62 6f 61 72 64 2c 20 6f 72 20 66 | .."Return.URL.in.clipboard,.or.f |
| a7a0 | 69 72 73 74 20 55 52 4c 20 69 6e 20 74 68 65 20 60 6b 69 6c 6c 2d 72 69 6e 67 27 2c 20 6f 72 20 | irst.URL.in.the.`kill-ring',.or. |
| a7c0 | 6e 69 6c 20 69 66 20 6e 6f 6e 65 2e 22 0a 20 20 28 63 6c 2d 6c 6f 6f 70 20 66 6f 72 20 69 74 65 | nil.if.none."...(cl-loop.for.ite |
| a7e0 | 6d 20 69 6e 20 28 63 6f 6e 73 20 28 63 75 72 72 65 6e 74 2d 6b 69 6c 6c 20 30 29 20 6b 69 6c 6c | m.in.(cons.(current-kill.0).kill |
| a800 | 2d 72 69 6e 67 29 0a 20 20 20 20 20 20 20 20 20 20 20 77 68 65 6e 20 28 61 6e 64 20 69 74 65 6d | -ring)............when.(and.item |
| a820 | 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 2d 70 20 28 72 78 20 62 6f 6c 20 22 68 74 74 70 22 20 | .(string-match-p.(rx.bol."http". |
| a840 | 28 6f 70 74 69 6f 6e 61 6c 20 22 73 22 29 20 22 3a 2f 2f 22 29 20 69 74 65 6d 29 29 0a 20 20 20 | (optional."s")."://").item)).... |
| a860 | 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 20 69 74 65 6d 29 29 0a 0a 28 64 65 63 6c 61 72 65 2d | ........return.item))..(declare- |
| a880 | 66 75 6e 63 74 69 6f 6e 20 6f 72 67 2d 65 6c 65 6d 65 6e 74 2d 70 72 6f 70 65 72 74 79 20 22 6f | function.org-element-property."o |
| a8a0 | 72 67 2d 65 6c 65 6d 65 6e 74 22 29 0a 28 64 65 66 75 6e 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c | rg-element").(defun.org-web-tool |
| a8c0 | 73 2d 2d 72 65 61 64 2d 75 72 6c 20 28 29 0a 20 20 22 52 65 74 75 72 6e 20 55 52 4c 20 61 74 20 | s--read-url.()..."Return.URL.at. |
| a8e0 | 70 6f 69 6e 74 2c 20 66 72 6f 6d 20 63 6c 69 70 62 6f 61 72 64 2c 20 66 72 6f 6d 20 60 6b 69 6c | point,.from.clipboard,.from.`kil |
| a900 | 6c 2d 72 69 6e 67 27 2c 20 6f 72 20 70 72 6f 6d 70 74 2e 22 0a 20 20 28 6f 72 20 28 74 68 69 6e | l-ring',.or.prompt."...(or.(thin |
| a920 | 67 2d 61 74 2d 70 6f 69 6e 74 2d 75 72 6c 2d 61 74 2d 70 6f 69 6e 74 29 0a 20 20 20 20 20 20 28 | g-at-point-url-at-point).......( |
| a940 | 6f 72 67 2d 65 6c 65 6d 65 6e 74 2d 70 72 6f 70 65 72 74 79 20 3a 72 61 77 2d 6c 69 6e 6b 20 28 | org-element-property.:raw-link.( |
| a960 | 6f 72 67 2d 65 6c 65 6d 65 6e 74 2d 63 6f 6e 74 65 78 74 29 29 0a 20 20 20 20 20 20 28 6f 72 67 | org-element-context)).......(org |
| a980 | 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 67 65 74 2d 66 69 72 73 74 2d 75 72 6c 29 0a 20 20 20 20 20 | -web-tools--get-first-url)...... |
| a9a0 | 20 28 72 65 61 64 2d 73 74 72 69 6e 67 20 22 55 52 4c 3a 20 22 29 29 29 0a 0a 28 64 65 66 63 6f | .(read-string."URL:.")))..(defco |
| a9c0 | 6e 73 74 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 6c 69 6e 6b 2d 64 65 73 63 2d 73 75 62 | nst.org-web-tools--link-desc-sub |
| a9e0 | 6d 61 74 63 68 0a 20 20 28 69 66 20 28 76 65 72 73 69 6f 6e 3c 3d 20 22 39 2e 33 22 20 6f 72 67 | match...(if.(version<=."9.3".org |
| aa00 | 2d 76 65 72 73 69 6f 6e 29 20 32 20 33 29 0a 20 20 22 4d 61 74 63 68 20 67 72 6f 75 70 20 69 6e | -version).2.3)..."Match.group.in |
| aa20 | 64 65 78 20 6f 66 20 6c 69 6e 6b 20 64 65 73 63 72 69 70 74 69 6f 6e 20 69 6e 20 60 6f 72 67 2d | dex.of.link.description.in.`org- |
| aa40 | 6c 69 6e 6b 2d 62 72 61 63 6b 65 74 2d 72 65 27 2e 22 29 0a 0a 28 64 65 66 75 6e 20 6f 72 67 2d | link-bracket-re'.")..(defun.org- |
| aa60 | 77 65 62 2d 74 6f 6f 6c 73 2d 2d 72 65 61 64 2d 6f 72 67 2d 62 72 61 63 6b 65 74 2d 6c 69 6e 6b | web-tools--read-org-bracket-link |
| aa80 | 20 28 26 6f 70 74 69 6f 6e 61 6c 20 6c 69 6e 6b 29 0a 20 20 22 52 65 74 75 72 6e 20 28 54 41 52 | .(&optional.link)..."Return.(TAR |
| aaa0 | 47 45 54 20 2e 20 44 45 53 43 52 49 50 54 49 4f 4e 29 20 66 6f 72 20 4f 72 67 20 62 72 61 63 6b | GET...DESCRIPTION).for.Org.brack |
| aac0 | 65 74 20 4c 49 4e 4b 20 6f 72 20 6e 65 78 74 20 6c 69 6e 6b 20 6f 6e 20 63 75 72 72 65 6e 74 20 | et.LINK.or.next.link.on.current. |
| aae0 | 6c 69 6e 65 2e 22 0a 20 20 3b 3b 20 53 65 61 72 63 68 69 6e 67 20 74 6f 20 74 68 65 20 65 6e 64 | line."...;;.Searching.to.the.end |
| ab00 | 20 6f 66 20 74 68 65 20 6c 69 6e 65 20 73 65 65 6d 73 20 74 68 65 20 73 69 6d 70 6c 65 73 74 20 | .of.the.line.seems.the.simplest. |
| ab20 | 77 61 79 0a 20 20 28 73 61 76 65 2d 65 78 63 75 72 73 69 6f 6e 0a 20 20 20 20 28 6c 65 74 20 28 | way...(save-excursion.....(let.( |
| ab40 | 74 61 72 67 65 74 20 64 65 73 63 29 0a 20 20 20 20 20 20 28 69 66 20 6c 69 6e 6b 0a 20 20 20 20 | target.desc).......(if.link..... |
| ab60 | 20 20 20 20 20 20 3b 3b 20 4c 69 6e 6b 20 70 61 73 73 65 64 20 61 73 20 61 72 67 0a 20 20 20 20 | ......;;.Link.passed.as.arg..... |
| ab80 | 20 20 20 20 20 20 28 77 68 65 6e 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 6f 72 67 2d 6c 69 | ......(when.(string-match.org-li |
| aba0 | 6e 6b 2d 62 72 61 63 6b 65 74 2d 72 65 20 6c 69 6e 6b 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 | nk-bracket-re.link)............. |
| abc0 | 28 73 65 74 71 20 74 61 72 67 65 74 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 | (setq.target.(match-string-no-pr |
| abe0 | 6f 70 65 72 74 69 65 73 20 31 20 6c 69 6e 6b 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 | operties.1.link)................ |
| ac00 | 20 20 20 64 65 73 63 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 | ...desc.(match-string-no-propert |
| ac20 | 69 65 73 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 6c 69 6e 6b 2d 64 65 73 63 2d 73 75 62 | ies.org-web-tools--link-desc-sub |
| ac40 | 6d 61 74 63 68 20 6c 69 6e 6b 29 29 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 4e 6f 20 61 72 67 3b | match.link))).........;;.No.arg; |
| ac60 | 20 67 65 74 20 6c 69 6e 6b 20 66 72 6f 6d 20 62 75 66 66 65 72 0a 20 20 20 20 20 20 20 20 28 77 | .get.link.from.buffer.........(w |
| ac80 | 68 65 6e 20 28 72 65 2d 73 65 61 72 63 68 2d 66 6f 72 77 61 72 64 20 6f 72 67 2d 6c 69 6e 6b 2d | hen.(re-search-forward.org-link- |
| aca0 | 62 72 61 63 6b 65 74 2d 72 65 20 28 70 6f 73 2d 65 6f 6c 29 20 74 29 0a 20 20 20 20 20 20 20 20 | bracket-re.(pos-eol).t)......... |
| acc0 | 20 20 28 73 65 74 71 20 74 61 72 67 65 74 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d | ..(setq.target.(match-string-no- |
| ace0 | 70 72 6f 70 65 72 74 69 65 73 20 31 29 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 64 65 | properties.1).................de |
| ad00 | 73 63 20 28 6d 61 74 63 68 2d 73 74 72 69 6e 67 2d 6e 6f 2d 70 72 6f 70 65 72 74 69 65 73 20 6f | sc.(match-string-no-properties.o |
| ad20 | 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2d 2d 6c 69 6e 6b 2d 64 65 73 63 2d 73 75 62 6d 61 74 63 68 | rg-web-tools--link-desc-submatch |
| ad40 | 29 29 29 29 0a 20 20 20 20 20 20 28 77 68 65 6e 20 28 61 6e 64 20 74 61 72 67 65 74 20 64 65 73 | )))).......(when.(and.target.des |
| ad60 | 63 29 0a 20 20 20 20 20 20 20 20 3b 3b 20 4c 69 6e 6b 20 66 6f 75 6e 64 3b 20 72 65 74 75 72 6e | c).........;;.Link.found;.return |
| ad80 | 20 70 61 72 74 73 0a 20 20 20 20 20 20 20 20 28 63 6f 6e 73 20 74 61 72 67 65 74 20 64 65 73 63 | .parts.........(cons.target.desc |
| ada0 | 29 29 29 29 29 0a 0a 28 70 72 6f 76 69 64 65 20 27 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 29 0a | )))))..(provide.'org-web-tools). |
| adc0 | 0a 3b 3b 3b 20 6f 72 67 2d 77 65 62 2d 74 6f 6f 6c 73 2e 65 6c 20 65 6e 64 73 20 68 65 72 65 0a | .;;;.org-web-tools.el.ends.here. |
| ade0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ae00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ae20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ae40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ae60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ae80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| aea0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| aec0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| aee0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| af00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| af20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| af40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| af60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| af80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| afa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| afc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| afe0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b000 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b020 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b040 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b060 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b080 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b0a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b0c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b0e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b100 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b120 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b140 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b160 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b180 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b1a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b1c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b1e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b200 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b220 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b240 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b260 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b280 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b2a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b2c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b2e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b300 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b320 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b340 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b360 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b3a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b3c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b3e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b400 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b420 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b440 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b460 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b480 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b4a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b4c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b4e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b500 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b520 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b540 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b560 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b580 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b5a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b5c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b5e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b600 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b620 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b640 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b660 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b680 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b6a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b6c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b6e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b700 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b720 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b740 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b760 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b7a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b7c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b7e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b800 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b820 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b840 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b860 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b880 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b8a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b8c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b8e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b900 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b920 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b940 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b960 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b980 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b9a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b9c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| b9e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ba00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ba20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ba40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ba60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| ba80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| baa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bac0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bae0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bb00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bb20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bb40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bb60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bb80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bba0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bbc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bbe0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bc00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bc20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bc40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bc60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bc80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bca0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bcc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bce0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bd00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bd20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bd40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bd60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bd80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bda0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bdc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bde0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| be00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| be20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| be40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| be60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| be80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bea0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bec0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bee0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bf00 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bf20 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bf40 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bf60 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bf80 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bfa0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bfc0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| bfe0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c000 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c020 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c040 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c060 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c080 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c0a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c0c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c0e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c100 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c120 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c140 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c160 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c180 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c1a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c1c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c1e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c200 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c220 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c240 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c260 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c280 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c2a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c2c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c2e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c300 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c320 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c340 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c360 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c380 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c3a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c3c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c3e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c400 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c420 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c440 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c460 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c480 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c4a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c4c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c4e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c500 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c520 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c540 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c560 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c580 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c5a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c5c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c5e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c600 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c620 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c640 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c660 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c680 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c6a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c6c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c6e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c700 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c720 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c740 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c760 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c780 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c7a0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c7c0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
| c7e0 | 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 00 | ................................ |
 |
index : dotemacs.git | |
| my Emacs configuration | Craig Jennings |
| summaryrefslogtreecommitdiff |
blob: c7136aa35f2eb37cdd11e35ee36f85ff7b1a10c0 (plain)