summaryrefslogtreecommitdiff
path: root/.emacs.d/org-7.4/lisp/org-protocol.elc
blob: 53d8fff225b789ad82e33ef29a70187cf68bf1a1 (plain)
ofshex dumpascii
0000 3b 45 4c 43 17 00 00 00 0a 3b 3b 3b 20 43 6f 6d 70 69 6c 65 64 20 62 79 20 6c 75 6b 65 40 48 50 ;ELC.....;;;.Compiled.by.luke@HP
0020 2d 64 76 36 34 32 36 75 73 2d 75 31 30 31 30 20 6f 6e 20 53 75 6e 20 46 65 62 20 32 37 20 31 32 -dv6426us-u1010.on.Sun.Feb.27.12
0040 3a 35 37 3a 31 39 20 32 30 31 31 0a 3b 3b 3b 20 66 72 6f 6d 20 66 69 6c 65 20 2f 68 6f 6d 65 2f :57:19.2011.;;;.from.file./home/
0060 6c 75 6b 65 2f 2e 65 6d 61 63 73 2e 64 2f 6f 72 67 2d 37 2e 34 2f 6c 69 73 70 2f 6f 72 67 2d 70 luke/.emacs.d/org-7.4/lisp/org-p
0080 72 6f 74 6f 63 6f 6c 2e 65 6c 0a 3b 3b 3b 20 69 6e 20 45 6d 61 63 73 20 76 65 72 73 69 6f 6e 20 rotocol.el.;;;.in.Emacs.version.
00a0 32 33 2e 31 2e 31 0a 3b 3b 3b 20 77 69 74 68 20 61 6c 6c 20 6f 70 74 69 6d 69 7a 61 74 69 6f 6e 23.1.1.;;;.with.all.optimization
00c0 73 2e 0a 0a 3b 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 63 6f 6e 74 61 69 6e 73 20 75 74 66 2d 38 s...;;;.This.file.contains.utf-8
00e0 20 6e 6f 6e 2d 41 53 43 49 49 20 63 68 61 72 61 63 74 65 72 73 0a 3b 3b 3b 20 61 6e 64 20 74 68 .non-ASCII.characters.;;;.and.th
0100 65 72 65 66 6f 72 65 20 63 61 6e 6e 6f 74 20 62 65 20 6c 6f 61 64 65 64 20 69 6e 74 6f 20 45 6d erefore.cannot.be.loaded.into.Em
0120 61 63 73 20 32 31 20 6f 72 20 65 61 72 6c 69 65 72 2e 0a 28 69 66 20 28 61 6e 64 20 28 62 6f 75 acs.21.or.earlier..(if.(and.(bou
0140 6e 64 70 20 27 65 6d 61 63 73 2d 76 65 72 73 69 6f 6e 29 0a 09 20 28 3c 20 28 61 72 65 66 20 65 ndp.'emacs-version)...(<.(aref.e
0160 6d 61 63 73 2d 76 65 72 73 69 6f 6e 20 28 31 2d 20 28 6c 65 6e 67 74 68 20 65 6d 61 63 73 2d 76 macs-version.(1-.(length.emacs-v
0180 65 72 73 69 6f 6e 29 29 29 20 3f 41 29 0a 09 20 28 6f 72 20 28 61 6e 64 20 28 62 6f 75 6e 64 70 ersion))).?A)...(or.(and.(boundp
01a0 20 27 65 70 6f 63 68 3a 3a 76 65 72 73 69 6f 6e 29 20 65 70 6f 63 68 3a 3a 76 65 72 73 69 6f 6e .'epoch::version).epoch::version
01c0 29 0a 09 20 20 20 20 20 28 73 74 72 69 6e 67 2d 6c 65 73 73 70 20 65 6d 61 63 73 2d 76 65 72 73 ).......(string-lessp.emacs-vers
01e0 69 6f 6e 20 22 32 33 22 29 29 29 0a 20 20 20 20 28 65 72 72 6f 72 20 22 60 6f 72 67 2d 70 72 6f ion."23"))).....(error."`org-pro
0200 74 6f 63 6f 6c 2e 65 6c 27 20 77 61 73 20 63 6f 6d 70 69 6c 65 64 20 66 6f 72 20 45 6d 61 63 73 tocol.el'.was.compiled.for.Emacs
0220 20 32 33 20 6f 72 20 6c 61 74 65 72 22 29 29 0a 0a 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b .23.or.later"))..;;;;;;;;;;;;;;;
0240 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 0a 0a 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 ;;;;;;;;;;;;;;...(byte-code."\30
0260 30 5c 33 30 31 21 5c 32 31 30 5c 33 30 32 5c 33 30 33 5c 33 30 34 5c 33 30 35 5c 33 30 36 5c 33 0\301!\210\302\303\304\305\306\3
0280 30 37 5c 33 31 30 5c 33 31 31 5c 33 31 30 5c 33 30 31 26 09 5c 32 30 37 22 20 5b 72 65 71 75 69 07\310\311\310\301&.\207".[requi
02a0 72 65 20 6f 72 67 20 63 75 73 74 6f 6d 2d 64 65 63 6c 61 72 65 2d 67 72 6f 75 70 20 6f 72 67 2d re.org.custom-declare-group.org-
02c0 70 72 6f 74 6f 63 6f 6c 20 6e 69 6c 20 22 49 6e 74 65 72 63 65 70 74 20 63 61 6c 6c 73 20 66 72 protocol.nil."Intercept.calls.fr
02e0 6f 6d 20 65 6d 61 63 73 63 6c 69 65 6e 74 20 74 6f 20 74 72 69 67 67 65 72 20 63 75 73 74 6f 6d om.emacsclient.to.trigger.custom
0300 20 61 63 74 69 6f 6e 73 2e 5c 6e 5c 6e 54 68 69 73 20 69 73 20 64 6f 6e 65 20 62 79 20 61 64 76 .actions.\n\nThis.is.done.by.adv
0320 69 73 69 6e 67 20 60 73 65 72 76 65 72 2d 76 69 73 69 74 2d 66 69 6c 65 73 27 20 74 6f 20 73 63 ising.`server-visit-files'.to.sc
0340 61 6e 6e 20 74 68 65 20 6c 69 73 74 20 6f 66 20 66 69 6c 65 6e 61 6d 65 73 5c 6e 66 6f 72 20 60 ann.the.list.of.filenames\nfor.`
0360 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 74 68 65 2d 70 72 6f 74 6f 63 6f 6c 27 20 61 6e 64 20 73 org-protocol-the-protocol'.and.s
0380 75 62 2d 70 72 6f 63 6f 6c 73 20 64 65 66 69 6e 65 64 20 69 6e 5c 6e 60 6f 72 67 2d 70 72 6f 74 ub-procols.defined.in\n`org-prot
03a0 6f 63 6f 6c 2d 70 72 6f 74 6f 63 6f 6c 2d 61 6c 69 73 74 27 20 61 6e 64 20 60 6f 72 67 2d 70 72 ocol-protocol-alist'.and.`org-pr
03c0 6f 74 6f 63 6f 6c 2d 70 72 6f 74 6f 63 6f 6c 2d 61 6c 69 73 74 2d 64 65 66 61 75 6c 74 27 2e 22 otocol-protocol-alist-default'."
03e0 20 3a 76 65 72 73 69 6f 6e 20 22 32 32 2e 31 22 20 3a 67 72 6f 75 70 20 63 6f 6e 76 65 6e 69 65 .:version."22.1".:group.convenie
0400 6e 63 65 5d 20 31 30 29 0a 23 40 39 37 20 44 65 66 61 75 6c 74 20 70 72 6f 74 6f 63 6f 6c 73 20 nce].10).#@97.Default.protocols.
0420 74 6f 20 75 73 65 2e 0a 53 65 65 20 60 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 70 72 6f 74 6f 63 to.use..See.`org-protocol-protoc
0440 6f 6c 2d 61 6c 69 73 74 27 20 66 6f 72 20 61 20 64 65 73 63 72 69 70 74 69 6f 6e 20 6f 66 20 74 ol-alist'.for.a.description.of.t
0460 68 69 73 20 76 61 72 69 61 62 6c 65 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 6f 72 67 2d 70 72 6f his.variable...(defconst.org-pro
0480 74 6f 63 6f 6c 2d 70 72 6f 74 6f 63 6f 6c 2d 61 6c 69 73 74 2d 64 65 66 61 75 6c 74 20 27 28 28 tocol-protocol-alist-default.'((
04a0 22 6f 72 67 2d 72 65 6d 65 6d 62 65 72 22 20 3a 70 72 6f 74 6f 63 6f 6c 20 22 72 65 6d 65 6d 62 "org-remember".:protocol."rememb
04c0 65 72 22 20 3a 66 75 6e 63 74 69 6f 6e 20 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 72 65 6d 65 6d er".:function.org-protocol-remem
04e0 62 65 72 20 3a 6b 69 6c 6c 2d 63 6c 69 65 6e 74 20 74 29 20 28 22 6f 72 67 2d 63 61 70 74 75 72 ber.:kill-client.t).("org-captur
0500 65 22 20 3a 70 72 6f 74 6f 63 6f 6c 20 22 63 61 70 74 75 72 65 22 20 3a 66 75 6e 63 74 69 6f 6e e".:protocol."capture".:function
0520 20 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 63 61 70 74 75 72 65 20 3a 6b 69 6c 6c 2d 63 6c 69 65 .org-protocol-capture.:kill-clie
0540 6e 74 20 74 29 20 28 22 6f 72 67 2d 73 74 6f 72 65 2d 6c 69 6e 6b 22 20 3a 70 72 6f 74 6f 63 6f nt.t).("org-store-link".:protoco
0560 6c 20 22 73 74 6f 72 65 2d 6c 69 6e 6b 22 20 3a 66 75 6e 63 74 69 6f 6e 20 6f 72 67 2d 70 72 6f l."store-link".:function.org-pro
0580 74 6f 63 6f 6c 2d 73 74 6f 72 65 2d 6c 69 6e 6b 29 20 28 22 6f 72 67 2d 6f 70 65 6e 2d 73 6f 75 tocol-store-link).("org-open-sou
05a0 72 63 65 22 20 3a 70 72 6f 74 6f 63 6f 6c 20 22 6f 70 65 6e 2d 73 6f 75 72 63 65 22 20 3a 66 75 rce".:protocol."open-source".:fu
05c0 6e 63 74 69 6f 6e 20 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 6f 70 65 6e 2d 73 6f 75 72 63 65 29 nction.org-protocol-open-source)
05e0 29 20 28 23 24 20 2e 20 31 30 33 38 29 29 0a 23 40 33 33 38 20 54 68 69 73 20 69 73 20 74 68 65 ).(#$...1038)).#@338.This.is.the
0600 20 70 72 6f 74 6f 63 6f 6c 20 74 6f 20 64 65 74 65 63 74 20 69 66 20 6f 72 67 2d 70 72 6f 74 6f .protocol.to.detect.if.org-proto
0620 63 6f 6c 2e 65 6c 20 69 73 20 6c 6f 61 64 65 64 2e 0a 60 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d col.el.is.loaded..`org-protocol-
0640 70 72 6f 74 6f 63 6f 6c 2d 61 6c 69 73 74 2d 64 65 66 61 75 6c 74 27 20 61 6e 64 20 60 6f 72 67 protocol-alist-default'.and.`org
0660 2d 70 72 6f 74 6f 63 6f 6c 2d 70 72 6f 74 6f 63 6f 6c 2d 61 6c 69 73 74 27 20 68 6f 6c 64 0a 74 -protocol-protocol-alist'.hold.t
0680 68 65 20 73 75 62 2d 70 72 6f 74 6f 63 6f 6c 73 20 74 68 61 74 20 74 72 69 67 67 65 72 20 74 68 he.sub-protocols.that.trigger.th
06a0 65 20 72 65 71 75 69 72 65 64 20 61 63 74 69 6f 6e 2e 20 20 59 6f 75 20 77 69 6c 6c 20 68 61 76 e.required.action...You.will.hav
06c0 65 20 74 6f 20 64 65 66 69 6e 65 0a 6a 75 73 74 20 6f 6e 65 20 70 72 6f 74 6f 63 6f 6c 20 68 61 e.to.define.just.one.protocol.ha
06e0 6e 64 6c 65 72 20 4f 53 2d 77 69 64 65 20 28 4d 53 2d 57 69 6e 64 6f 77 73 29 20 6f 72 20 70 65 ndler.OS-wide.(MS-Windows).or.pe
0700 72 20 61 70 70 6c 69 63 61 74 69 6f 6e 20 28 4c 69 6e 75 78 29 2e 0a 54 68 61 74 20 70 72 6f 74 r.application.(Linux)..That.prot
0720 6f 63 6f 6c 20 68 61 6e 64 6c 65 72 20 73 68 6f 75 6c 64 20 63 61 6c 6c 20 65 6d 61 63 73 63 6c ocol.handler.should.call.emacscl
0740 69 65 6e 74 2e 1f 0a 28 64 65 66 63 6f 6e 73 74 20 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 74 68 ient...(defconst.org-protocol-th
0760 65 2d 70 72 6f 74 6f 63 6f 6c 20 22 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 22 20 28 23 24 20 2e 20 e-protocol."org-protocol".(#$...
0780 31 35 32 35 29 29 0a 23 40 33 30 38 20 2a 20 4e 6f 6e 2d 6e 69 6c 20 6d 65 61 6e 73 20 72 65 2d 1525)).#@308.*.Non-nil.means.re-
07a0 72 65 76 65 72 73 65 20 74 68 65 20 6c 69 73 74 20 6f 66 20 66 69 6c 65 6e 61 6d 65 73 20 70 61 reverse.the.list.of.filenames.pa
07c0 73 73 65 64 20 6f 6e 20 74 68 65 20 63 6f 6d 6d 61 6e 64 20 6c 69 6e 65 2e 0a 54 68 65 20 66 69 ssed.on.the.command.line..The.fi
07e0 6c 65 6e 61 6d 65 73 20 70 61 73 73 65 64 20 6f 6e 20 74 68 65 20 63 6f 6d 6d 61 6e 64 20 6c 69 lenames.passed.on.the.command.li
0800 6e 65 20 61 72 65 20 70 61 73 73 65 64 20 74 6f 20 74 68 65 20 65 6d 61 63 73 2d 73 65 72 76 65 ne.are.passed.to.the.emacs-serve
0820 72 20 69 6e 0a 72 65 76 65 72 73 65 20 6f 72 64 65 72 2e 20 20 53 65 74 20 74 6f 20 74 20 28 64 r.in.reverse.order...Set.to.t.(d
0840 65 66 61 75 6c 74 29 20 74 6f 20 72 65 2d 72 65 76 65 72 73 65 20 74 68 65 20 6c 69 73 74 2c 20 efault).to.re-reverse.the.list,.
0860 69 2e 65 2e 20 75 73 65 20 74 68 65 0a 73 65 71 75 65 6e 63 65 20 6f 6e 20 74 68 65 20 63 6f 6d i.e..use.the.sequence.on.the.com
0880 6d 61 6e 64 20 6c 69 6e 65 2e 20 20 49 66 20 6e 69 6c 2c 20 74 68 65 20 73 65 71 75 65 6e 63 65 mand.line...If.nil,.the.sequence
08a0 20 6f 66 20 74 68 65 20 66 69 6c 65 6e 61 6d 65 73 20 69 73 0a 75 6e 63 68 61 6e 67 65 64 2e 1f .of.the.filenames.is.unchanged..
08c0 0a 28 63 75 73 74 6f 6d 2d 64 65 63 6c 61 72 65 2d 76 61 72 69 61 62 6c 65 20 27 6f 72 67 2d 70 .(custom-declare-variable.'org-p
08e0 72 6f 74 6f 63 6f 6c 2d 72 65 76 65 72 73 65 2d 6c 69 73 74 2d 6f 66 2d 66 69 6c 65 73 20 27 74 rotocol-reverse-list-of-files.'t
0900 20 27 28 23 24 20 2e 20 2d 31 39 33 33 29 20 3a 67 72 6f 75 70 20 27 6f 72 67 2d 70 72 6f 74 6f .'(#$...-1933).:group.'org-proto
0920 63 6f 6c 20 3a 74 79 70 65 20 27 62 6f 6f 6c 65 61 6e 29 0a 23 40 31 36 32 33 20 2a 20 4d 61 70 col.:type.'boolean).#@1623.*.Map
0940 20 55 52 4c 73 20 74 6f 20 6c 6f 63 61 6c 20 66 69 6c 65 6e 61 6d 65 73 20 66 6f 72 20 60 6f 72 .URLs.to.local.filenames.for.`or
0960 67 2d 70 72 6f 74 6f 63 6f 6c 2d 6f 70 65 6e 2d 73 6f 75 72 63 65 27 20 28 6f 70 65 6e 2d 73 6f g-protocol-open-source'.(open-so
0980 75 72 63 65 29 2e 0a 0a 45 61 63 68 20 65 6c 65 6d 65 6e 74 20 6f 66 20 74 68 69 73 20 6c 69 73 urce)...Each.element.of.this.lis
09a0 74 20 6d 75 73 74 20 62 65 20 6f 66 20 74 68 65 20 66 6f 72 6d 3a 0a 0a 20 20 28 6d 6f 64 75 6c t.must.be.of.the.form:....(modul
09c0 65 2d 6e 61 6d 65 20 3a 70 72 6f 70 65 72 74 79 20 76 61 6c 75 65 20 70 72 6f 70 65 72 74 79 3a e-name.:property.value.property:
09e0 20 76 61 6c 75 65 20 2e 2e 2e 29 0a 0a 77 68 65 72 65 20 6d 6f 64 75 6c 65 2d 6e 61 6d 65 20 69 .value....)..where.module-name.i
0a00 73 20 61 6e 20 61 72 62 69 74 72 61 72 79 20 6e 61 6d 65 2e 20 41 6c 6c 20 74 68 65 20 76 61 6c s.an.arbitrary.name..All.the.val
0a20 75 65 73 20 61 72 65 20 73 74 72 69 6e 67 73 2e 0a 0a 50 6f 73 73 69 62 6c 65 20 70 72 6f 70 65 ues.are.strings...Possible.prope
0a40 72 74 69 65 73 20 61 72 65 3a 0a 0a 20 20 3a 6f 6e 6c 69 6e 65 2d 73 75 66 66 69 78 20 20 20 20 rties.are:....:online-suffix....
0a60 20 2d 20 74 68 65 20 73 75 66 66 69 78 20 74 6f 20 73 74 72 69 70 20 66 72 6f 6d 20 74 68 65 20 .-.the.suffix.to.strip.from.the.
0a80 70 75 62 6c 69 73 68 65 64 20 55 52 4c 73 0a 20 20 3a 77 6f 72 6b 69 6e 67 2d 73 75 66 66 69 78 published.URLs...:working-suffix
0aa0 20 20 20 20 2d 20 74 68 65 20 72 65 70 6c 61 63 65 6d 65 6e 74 20 66 6f 72 20 6f 6e 6c 69 6e 65 ....-.the.replacement.for.online
0ac0 2d 73 75 66 66 69 78 0a 20 20 3a 62 61 73 65 2d 75 72 6c 20 20 20 20 20 20 20 20 20 20 2d 20 74 -suffix...:base-url..........-.t
0ae0 68 65 20 62 61 73 65 20 55 52 4c 2c 20 65 2e 67 2e 20 68 74 74 70 3a 2f 2f 77 77 77 2e 65 78 61 he.base.URL,.e.g..http://www.exa
0b00 6d 70 6c 65 2e 63 6f 6d 2f 70 72 6f 6a 65 63 74 2f 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 mple.com/project/...............
0b20 20 20 20 20 20 20 20 20 20 4c 61 73 74 20 73 6c 61 73 68 20 72 65 71 75 69 72 65 64 2e 0a 20 20 .........Last.slash.required....
0b40 3a 77 6f 72 6b 69 6e 67 2d 64 69 72 65 63 74 6f 72 79 20 2d 20 74 68 65 20 6c 6f 63 61 6c 20 77 :working-directory.-.the.local.w
0b60 6f 72 6b 69 6e 67 20 64 69 72 65 63 74 6f 72 79 2e 20 54 68 69 73 20 69 73 2c 20 77 68 61 74 20 orking.directory..This.is,.what.
0b80 62 61 73 65 2d 75 72 6c 20 77 69 6c 6c 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 base-url.will...................
0ba0 20 20 20 20 20 62 65 20 72 65 70 6c 61 63 65 64 20 77 69 74 68 2e 0a 20 20 3a 72 65 64 69 72 65 .....be.replaced.with....:redire
0bc0 63 74 73 20 20 20 20 20 20 20 20 20 2d 20 41 20 6c 69 73 74 20 6f 66 20 63 6f 6e 73 20 63 65 6c cts.........-.A.list.of.cons.cel
0be0 6c 73 2c 20 65 61 63 68 20 6f 66 20 77 68 69 63 68 20 6d 61 70 73 20 61 20 72 65 67 75 6c 61 72 ls,.each.of.which.maps.a.regular
0c00 0a 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 20 65 78 70 72 65 73 73 69 ........................expressi
0c20 6f 6e 20 74 6f 20 6d 61 74 63 68 20 74 6f 20 61 20 70 61 74 68 20 72 65 6c 61 74 69 76 65 20 74 on.to.match.to.a.path.relative.t
0c40 6f 20 3a 77 6f 72 6b 69 6e 67 2d 64 69 72 65 63 74 6f 72 79 2e 0a 0a 45 78 61 6d 70 6c 65 3a 0a o.:working-directory...Example:.
0c60 0a 20 20 20 28 73 65 74 71 20 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 70 72 6f 6a 65 63 74 2d 61 ....(setq.org-protocol-project-a
0c80 6c 69 73 74 0a 20 20 20 20 20 20 20 27 28 28 22 68 74 74 70 3a 2f 2f 6f 72 67 6d 6f 64 65 2e 6f list........'(("http://orgmode.o
0ca0 72 67 2f 77 6f 72 67 2f 22 0a 20 20 20 20 20 20 20 20 20 20 3a 6f 6e 6c 69 6e 65 2d 73 75 66 66 rg/worg/"...........:online-suff
0cc0 69 78 20 22 2e 70 68 70 22 0a 20 20 20 20 20 20 20 20 20 20 3a 77 6f 72 6b 69 6e 67 2d 73 75 66 ix.".php"...........:working-suf
0ce0 66 69 78 20 22 2e 6f 72 67 22 0a 20 20 20 20 20 20 20 20 20 20 3a 62 61 73 65 2d 75 72 6c 20 22 fix.".org"...........:base-url."
0d00 68 74 74 70 3a 2f 2f 6f 72 67 6d 6f 64 65 2e 6f 72 67 2f 77 6f 72 67 2f 22 0a 20 20 20 20 20 20 http://orgmode.org/worg/".......
0d20 20 20 20 20 3a 77 6f 72 6b 69 6e 67 2d 64 69 72 65 63 74 6f 72 79 20 22 2f 68 6f 6d 65 2f 75 73 ....:working-directory."/home/us
0d40 65 72 2f 6f 72 67 2f 57 6f 72 67 2f 22 29 0a 20 20 20 20 20 20 20 20 20 28 22 68 74 74 70 3a 2f er/org/Worg/")..........("http:/
0d60 2f 6c 6f 63 61 6c 68 6f 73 74 2f 6f 72 67 2d 6e 6f 74 65 73 2f 22 0a 20 20 20 20 20 20 20 20 20 /localhost/org-notes/"..........
0d80 20 3a 6f 6e 6c 69 6e 65 2d 73 75 66 66 69 78 20 22 2e 68 74 6d 6c 22 0a 20 20 20 20 20 20 20 20 .:online-suffix.".html".........
0da0 20 20 3a 77 6f 72 6b 69 6e 67 2d 73 75 66 66 69 78 20 22 2e 6f 72 67 22 0a 20 20 20 20 20 20 20 ..:working-suffix.".org"........
0dc0 20 20 20 3a 62 61 73 65 2d 75 72 6c 20 22 68 74 74 70 3a 2f 2f 6c 6f 63 61 6c 68 6f 73 74 2f 6f ...:base-url."http://localhost/o
0de0 72 67 2f 22 0a 20 20 20 20 20 20 20 20 20 20 3a 77 6f 72 6b 69 6e 67 2d 64 69 72 65 63 74 6f 72 rg/"...........:working-director
0e00 79 20 22 2f 68 6f 6d 65 2f 75 73 65 72 2f 6f 72 67 2f 22 0a 20 20 20 20 20 20 20 20 20 20 3a 72 y."/home/user/org/"...........:r
0e20 65 77 72 69 74 65 73 20 28 28 22 6f 72 67 2f 3f 24 22 20 2e 20 22 69 6e 64 65 78 2e 70 68 70 22 ewrites.(("org/?$"..."index.php"
0e40 29 29 29 29 29 0a 0a 20 20 20 54 68 65 20 6c 61 73 74 20 6c 69 6e 65 20 74 65 6c 6c 73 20 60 6f ))))).....The.last.line.tells.`o
0e60 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 6f 70 65 6e 2d 73 6f 75 72 63 65 27 20 74 6f 20 6f 70 65 6e rg-protocol-open-source'.to.open
0e80 0a 20 20 20 2f 68 6f 6d 65 2f 75 73 65 72 2f 6f 72 67 2f 69 6e 64 65 78 2e 70 68 70 2c 20 69 66 ..../home/user/org/index.php,.if
0ea0 20 74 68 65 20 55 52 4c 20 63 61 6e 6e 6f 74 20 62 65 20 6d 61 70 70 65 64 20 74 6f 20 61 6e 20 .the.URL.cannot.be.mapped.to.an.
0ec0 65 78 69 73 74 69 6e 67 0a 20 20 20 66 69 6c 65 2c 20 61 6e 64 20 65 6e 64 73 20 77 69 74 68 20 existing....file,.and.ends.with.
0ee0 65 69 74 68 65 72 20 22 6f 72 67 22 20 6f 72 20 22 6f 72 67 2f 22 2e 0a 0a 43 6f 6e 73 69 64 65 either."org".or."org/"...Conside
0f00 72 20 75 73 69 6e 67 20 74 68 65 20 69 6e 74 65 72 61 63 74 69 76 65 20 66 75 6e 63 74 69 6f 6e r.using.the.interactive.function
0f20 73 20 60 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 63 72 65 61 74 65 27 20 61 6e 64 0a 60 6f 72 67 s.`org-protocol-create'.and.`org
0f40 2d 70 72 6f 74 6f 63 6f 6c 2d 63 72 65 61 74 65 2d 66 6f 72 2d 6f 72 67 27 20 74 6f 20 68 65 6c -protocol-create-for-org'.to.hel
0f60 70 20 79 6f 75 20 66 69 6c 6c 69 6e 67 20 74 68 69 73 20 76 61 72 69 61 62 6c 65 20 77 69 74 68 p.you.filling.this.variable.with
0f80 20 76 61 6c 69 64 20 63 6f 6e 74 65 6e 74 73 2e 1f 0a 28 63 75 73 74 6f 6d 2d 64 65 63 6c 61 72 .valid.contents...(custom-declar
0fa0 65 2d 76 61 72 69 61 62 6c 65 20 27 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 70 72 6f 6a 65 63 74 e-variable.'org-protocol-project
0fc0 2d 61 6c 69 73 74 20 27 6e 69 6c 20 27 28 23 24 20 2e 20 2d 32 33 36 33 29 20 3a 67 72 6f 75 70 -alist.'nil.'(#$...-2363).:group
0fe0 20 27 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 20 3a 74 79 70 65 20 27 61 6c 69 73 74 29 0a 23 40 31 .'org-protocol.:type.'alist).#@1
1000 38 35 35 20 2a 20 52 65 67 69 73 74 65 72 20 63 75 73 74 6f 6d 20 68 61 6e 64 6c 65 72 73 20 66 855.*.Register.custom.handlers.f
1020 6f 72 20 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2e 0a 0a 45 61 63 68 20 65 6c 65 6d 65 6e 74 20 6f or.org-protocol...Each.element.o
1040 66 20 74 68 69 73 20 6c 69 73 74 20 6d 75 73 74 20 62 65 20 6f 66 20 74 68 65 20 66 6f 72 6d 3a f.this.list.must.be.of.the.form:
1060 0a 0a 20 20 28 6d 6f 64 75 6c 65 2d 6e 61 6d 65 20 3a 70 72 6f 74 6f 63 6f 6c 20 70 72 6f 74 6f ....(module-name.:protocol.proto
1080 63 6f 6c 20 3a 66 75 6e 63 74 69 6f 6e 20 66 75 6e 63 20 3a 6b 69 6c 6c 2d 63 6c 69 65 6e 74 20 col.:function.func.:kill-client.
10a0 6e 69 6c 29 0a 0a 70 72 6f 74 6f 63 6f 6c 20 2d 20 70 72 6f 74 6f 63 6f 6c 20 74 6f 20 64 65 74 nil)..protocol.-.protocol.to.det
10c0 65 63 74 20 69 6e 20 61 20 66 69 6c 65 6e 61 6d 65 20 77 69 74 68 6f 75 74 20 74 72 61 69 6c 69 ect.in.a.filename.without.traili
10e0 6e 67 20 63 6f 6c 6f 6e 20 61 6e 64 20 73 6c 61 73 68 65 73 2e 0a 20 20 20 20 20 20 20 20 20 20 ng.colon.and.slashes............
1100 20 53 65 65 20 72 66 63 31 37 33 38 20 73 65 63 74 69 6f 6e 20 32 2e 31 20 66 6f 72 20 6d 6f 72 .See.rfc1738.section.2.1.for.mor
1120 65 20 6f 6e 20 74 68 69 73 2e 0a 20 20 20 20 20 20 20 20 20 20 20 49 66 20 79 6f 75 20 64 65 66 e.on.this.............If.you.def
1140 69 6e 65 20 61 20 70 72 6f 74 6f 63 6f 6c 20 22 6d 79 2d 70 72 6f 74 6f 63 6f 6c 22 2c 20 60 6f ine.a.protocol."my-protocol",.`o
1160 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 63 68 65 63 6b 2d 66 69 6c 65 6e 61 6d 65 2d 66 6f 72 2d 70 rg-protocol-check-filename-for-p
1180 72 6f 74 6f 63 6f 6c 27 0a 20 20 20 20 20 20 20 20 20 20 20 77 69 6c 6c 20 73 65 61 72 63 68 20 rotocol'............will.search.
11a0 66 69 6c 65 6e 61 6d 65 73 20 66 6f 72 20 22 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 3a 2f 6d 79 2d filenames.for."org-protocol:/my-
11c0 70 72 6f 74 6f 63 6f 6c 3a 2f 22 0a 20 20 20 20 20 20 20 20 20 20 20 61 6e 64 20 74 72 69 67 67 protocol:/"............and.trigg
11e0 65 72 20 79 6f 75 72 20 61 63 74 69 6f 6e 20 66 6f 72 20 65 76 65 72 79 20 6d 61 74 63 68 2e 20 er.your.action.for.every.match..
1200 60 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 27 20 69 73 20 64 65 66 69 6e 65 64 20 69 6e 0a 20 20 20 `org-protocol'.is.defined.in....
1220 20 20 20 20 20 20 20 20 60 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 74 68 65 2d 70 72 6f 74 6f 63 ........`org-protocol-the-protoc
1240 6f 6c 27 2e 20 44 6f 75 62 6c 65 20 61 6e 64 20 74 72 69 70 6c 65 20 73 6c 61 73 68 65 73 20 61 ol'..Double.and.triple.slashes.a
1260 72 65 20 63 6f 6d 70 72 65 73 73 65 64 0a 20 20 20 20 20 20 20 20 20 20 20 74 6f 20 6f 6e 65 20 re.compressed............to.one.
1280 62 79 20 65 6d 61 63 73 63 6c 69 65 6e 74 2e 0a 0a 66 75 6e 63 74 69 6f 6e 20 2d 20 66 75 6e 63 by.emacsclient...function.-.func
12a0 74 69 6f 6e 20 74 68 61 74 20 68 61 6e 64 6c 65 73 20 72 65 71 75 65 73 74 73 20 77 69 74 68 20 tion.that.handles.requests.with.
12c0 70 72 6f 74 6f 63 6f 6c 20 61 6e 64 20 74 61 6b 65 73 20 65 78 61 63 74 6c 79 20 6f 6e 65 0a 20 protocol.and.takes.exactly.one..
12e0 20 20 20 20 20 20 20 20 20 20 61 72 67 75 6d 65 6e 74 3a 20 74 68 65 20 66 69 6c 65 6e 61 6d 65 ..........argument:.the.filename
1300 20 77 69 74 68 20 61 6c 6c 20 70 72 6f 74 6f 63 6f 6c 73 20 73 74 72 69 70 70 65 64 2e 20 49 66 .with.all.protocols.stripped..If
1320 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 0a 20 20 20 20 20 20 20 20 20 20 20 72 65 74 75 72 6e 73 .the.function............returns
1340 20 6e 69 6c 2c 20 65 6d 61 63 73 63 6c 69 65 6e 74 20 61 6e 64 20 2d 73 65 72 76 65 72 20 64 6f .nil,.emacsclient.and.-server.do
1360 20 6e 6f 74 68 69 6e 67 2e 20 41 6e 79 20 6e 6f 6e 2d 6e 69 6c 20 72 65 74 75 72 6e 0a 20 20 20 .nothing..Any.non-nil.return....
1380 20 20 20 20 20 20 20 20 76 61 6c 75 65 20 69 73 20 63 6f 6e 73 69 64 65 72 65 64 20 61 20 76 61 ........value.is.considered.a.va
13a0 6c 69 64 20 66 69 6c 65 6e 61 6d 65 20 61 6e 64 20 74 68 75 73 20 70 61 73 73 65 64 20 74 6f 20 lid.filename.and.thus.passed.to.
13c0 74 68 65 20 73 65 72 76 65 72 2e 0a 0a 20 20 20 20 20 20 20 20 20 20 20 60 6f 72 67 2d 70 72 6f the.server..............`org-pro
13e0 74 6f 63 6f 6c 2e 65 6c 20 70 72 6f 76 69 64 65 73 20 73 6f 6d 65 20 73 75 70 70 6f 72 74 20 66 tocol.el.provides.some.support.f
1400 6f 72 20 68 61 6e 64 6c 69 6e 67 20 74 68 6f 73 65 20 66 69 6c 65 6e 61 6d 65 73 2c 0a 20 20 20 or.handling.those.filenames,....
1420 20 20 20 20 20 20 20 20 69 66 20 79 6f 75 20 73 74 61 79 20 77 69 74 68 20 74 68 65 20 63 6f 6e ........if.you.stay.with.the.con
1440 76 65 6e 74 69 6f 6e 73 20 75 73 65 64 20 66 6f 72 20 74 68 65 20 73 74 61 6e 64 61 72 64 20 68 ventions.used.for.the.standard.h
1460 61 6e 64 6c 65 72 73 20 69 6e 0a 20 20 20 20 20 20 20 20 20 20 20 60 6f 72 67 2d 70 72 6f 74 6f andlers.in............`org-proto
1480 63 6f 6c 2d 70 72 6f 74 6f 63 6f 6c 2d 61 6c 69 73 74 2d 64 65 66 61 75 6c 74 27 2e 20 53 65 65 col-protocol-alist-default'..See
14a0 20 60 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 73 70 6c 69 74 2d 64 61 74 61 27 2e 0a 0a 6b 69 6c .`org-protocol-split-data'...kil
14c0 6c 2d 63 6c 69 65 6e 74 20 2d 20 49 66 20 74 2c 20 6b 69 6c 6c 20 74 68 65 20 63 6c 69 65 6e 74 l-client.-.If.t,.kill.the.client
14e0 20 69 6d 6d 65 64 69 61 74 65 6c 79 2c 20 6f 6e 63 65 20 74 68 65 20 73 75 62 2d 70 72 6f 74 6f .immediately,.once.the.sub-proto
1500 63 6f 6c 20 69 73 0a 20 20 20 20 20 20 20 20 20 20 20 64 65 74 65 63 74 65 64 2e 20 54 68 69 73 col.is............detected..This
1520 20 69 73 20 6e 65 63 65 73 73 61 72 79 20 66 6f 72 20 61 63 74 69 6f 6e 73 20 74 68 61 74 20 63 .is.necessary.for.actions.that.c
1540 61 6e 20 62 65 20 69 6e 74 65 72 72 75 70 74 65 64 20 62 79 0a 20 20 20 20 20 20 20 20 20 20 20 an.be.interrupted.by............
1560 60 43 2d 67 27 20 74 6f 20 61 76 6f 69 64 20 64 61 6e 67 6c 69 6e 67 20 65 6d 61 63 73 63 6c 69 `C-g'.to.avoid.dangling.emacscli
1580 65 6e 74 73 2e 20 4e 6f 74 65 2c 20 74 68 61 74 20 61 6c 6c 20 6f 74 68 65 72 20 63 6f 6d 6d 61 ents..Note,.that.all.other.comma
15a0 6e 64 0a 20 20 20 20 20 20 20 20 20 20 20 6c 69 6e 65 20 61 72 67 75 6d 65 6e 74 73 20 62 75 74 nd............line.arguments.but
15c0 20 74 68 65 20 74 68 69 73 20 6f 6e 65 20 77 69 6c 6c 20 62 65 20 64 69 73 63 61 72 64 65 64 2c .the.this.one.will.be.discarded,
15e0 20 67 72 65 65 64 79 20 68 61 6e 64 6c 65 72 73 0a 20 20 20 20 20 20 20 20 20 20 20 73 74 69 6c .greedy.handlers............stil
1600 6c 20 72 65 63 65 69 76 65 20 74 68 65 20 77 68 6f 6c 65 20 6c 69 73 74 20 6f 66 20 61 72 67 75 l.receive.the.whole.list.of.argu
1620 6d 65 6e 74 73 20 74 68 6f 75 67 68 2e 0a 0a 48 65 72 65 20 69 73 20 61 6e 20 65 78 61 6d 70 6c ments.though...Here.is.an.exampl
1640 65 3a 0a 0a 20 20 28 73 65 74 71 20 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 70 72 6f 74 6f 63 6f e:....(setq.org-protocol-protoco
1660 6c 2d 61 6c 69 73 74 0a 20 20 20 20 20 20 27 28 28 22 6d 79 2d 70 72 6f 74 6f 63 6f 6c 22 0a 20 l-alist.......'(("my-protocol"..
1680 20 20 20 20 20 20 20 20 3a 70 72 6f 74 6f 63 6f 6c 20 22 6d 79 2d 70 72 6f 74 6f 63 6f 6c 22 0a ........:protocol."my-protocol".
16a0 20 20 20 20 20 20 20 20 20 3a 66 75 6e 63 74 69 6f 6e 20 6d 79 2d 70 72 6f 74 6f 63 6f 6c 2d 68 .........:function.my-protocol-h
16c0 61 6e 64 6c 65 72 2d 66 75 6e 63 74 69 6f 6e 29 0a 20 20 20 20 20 20 20 20 28 22 79 6f 75 72 2d andler-function).........("your-
16e0 70 72 6f 74 6f 63 6f 6c 22 0a 20 20 20 20 20 20 20 20 20 3a 70 72 6f 74 6f 63 6f 6c 20 22 79 6f protocol"..........:protocol."yo
1700 75 72 2d 70 72 6f 74 6f 63 6f 6c 22 0a 20 20 20 20 20 20 20 20 20 3a 66 75 6e 63 74 69 6f 6e 20 ur-protocol"..........:function.
1720 79 6f 75 72 2d 70 72 6f 74 6f 63 6f 6c 2d 68 61 6e 64 6c 65 72 2d 66 75 6e 63 74 69 6f 6e 29 29 your-protocol-handler-function))
1740 29 1f 0a 28 63 75 73 74 6f 6d 2d 64 65 63 6c 61 72 65 2d 76 61 72 69 61 62 6c 65 20 27 6f 72 67 )..(custom-declare-variable.'org
1760 2d 70 72 6f 74 6f 63 6f 6c 2d 70 72 6f 74 6f 63 6f 6c 2d 61 6c 69 73 74 20 27 6e 69 6c 20 27 28 -protocol-protocol-alist.'nil.'(
1780 23 24 20 2e 20 2d 34 31 30 30 29 20 3a 67 72 6f 75 70 20 27 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c #$...-4100).:group.'org-protocol
17a0 20 3a 74 79 70 65 20 27 28 61 6c 69 73 74 29 29 0a 23 40 34 38 20 54 68 65 20 64 65 66 61 75 6c .:type.'(alist)).#@48.The.defaul
17c0 74 20 6f 72 67 2d 72 65 6d 65 6d 62 65 72 2d 74 65 6d 70 6c 61 74 65 73 20 6b 65 79 20 74 6f 20 t.org-remember-templates.key.to.
17e0 75 73 65 2e 1f 0a 28 63 75 73 74 6f 6d 2d 64 65 63 6c 61 72 65 2d 76 61 72 69 61 62 6c 65 20 27 use...(custom-declare-variable.'
1800 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 64 65 66 61 75 6c 74 2d 74 65 6d 70 6c 61 74 65 2d 6b 65 org-protocol-default-template-ke
1820 79 20 27 6e 69 6c 20 27 28 23 24 20 2e 20 36 30 37 30 29 20 3a 67 72 6f 75 70 20 27 6f 72 67 2d y.'nil.'(#$...6070).:group.'org-
1840 70 72 6f 74 6f 63 6f 6c 20 3a 74 79 70 65 20 27 73 74 72 69 6e 67 29 0a 23 40 39 37 20 65 6d 61 protocol.:type.'string).#@97.ema
1860 63 73 63 6c 69 65 6e 74 20 63 6f 6d 70 72 65 73 73 65 73 20 64 6f 75 62 6c 65 20 61 6e 64 20 74 csclient.compresses.double.and.t
1880 72 69 70 6c 65 20 73 6c 61 73 68 65 73 2e 0a 53 6c 61 73 68 65 73 20 61 72 65 20 73 61 6e 69 74 riple.slashes..Slashes.are.sanit
18a0 69 7a 65 64 20 74 6f 20 64 6f 75 62 6c 65 20 73 6c 61 73 68 65 73 20 68 65 72 65 2e 1f 0a 28 64 ized.to.double.slashes.here...(d
18c0 65 66 61 6c 69 61 73 20 27 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 73 61 6e 69 74 69 7a 65 2d 75 efalias.'org-protocol-sanitize-u
18e0 72 69 20 23 5b 28 75 72 69 29 20 22 5c 33 30 32 5c 33 30 33 08 5c 22 5c 32 30 33 18 00 5c 33 30 ri.#[(uri)."\302\303.\"\203..\30
1900 34 08 5c 33 30 35 5c 22 5c 32 31 31 19 40 5c 33 30 36 5c 33 30 37 5c 33 31 30 09 41 5c 33 31 31 4.\305\"\211.@\306\307\310.A\311
1920 23 51 10 29 08 5c 32 30 37 22 20 5b 75 72 69 20 73 70 6c 69 74 70 61 72 74 73 20 73 74 72 69 6e #Q.).\207".[uri.splitparts.strin
1940 67 2d 6d 61 74 63 68 20 22 5e 5c 5c 28 5b 61 2d 7a 5d 2b 5c 5c 29 3a 2f 22 20 73 70 6c 69 74 2d g-match."^\\([a-z]+\\):/".split-
1960 73 74 72 69 6e 67 20 22 2f 2b 22 20 22 2f 2f 22 20 6d 61 70 63 6f 6e 63 61 74 20 69 64 65 6e 74 string."/+"."//".mapconcat.ident
1980 69 74 79 20 22 2f 22 5d 20 37 20 28 23 24 20 2e 20 36 32 33 37 29 5d 29 0a 23 40 33 39 34 20 53 ity."/"].7.(#$...6237)]).#@394.S
19a0 70 6c 69 74 2c 20 77 68 61 74 20 61 6e 20 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 20 68 61 6e 64 6c plit,.what.an.org-protocol.handl
19c0 65 72 20 66 75 6e 63 74 69 6f 6e 20 67 65 74 73 20 61 73 20 6f 6e 6c 79 20 61 72 67 75 6d 65 6e er.function.gets.as.only.argumen
19e0 74 2e 0a 44 41 54 41 20 69 73 20 74 68 61 74 20 6f 6e 65 20 61 72 67 75 6d 65 6e 74 2e 20 44 41 t..DATA.is.that.one.argument..DA
1a00 54 41 20 69 73 20 73 70 6c 69 74 20 61 74 20 65 61 63 68 20 6f 63 63 75 72 72 65 6e 63 65 20 6f TA.is.split.at.each.occurrence.o
1a20 66 0a 53 45 50 41 52 41 54 4f 52 20 28 72 65 67 65 78 70 29 2e 20 49 66 20 6e 6f 20 53 45 50 41 f.SEPARATOR.(regexp)..If.no.SEPA
1a40 52 41 54 4f 52 20 69 73 20 73 70 65 63 69 66 69 65 64 20 6f 72 20 53 45 50 41 52 41 54 4f 52 20 RATOR.is.specified.or.SEPARATOR.
1a60 69 73 0a 6e 69 6c 2c 20 61 73 73 75 6d 65 20 22 2f 2b 22 2e 20 20 54 68 65 20 72 65 73 75 6c 74 is.nil,.assume."/+"...The.result
1a80 73 20 6f 66 20 74 68 61 74 20 73 70 6c 69 74 74 69 6e 67 20 61 72 65 20 72 65 74 75 72 6e 65 64 s.of.that.splitting.are.returned
1aa0 0a 61 73 20 61 20 6c 69 73 74 2e 20 49 66 20 55 4e 48 45 58 49 46 59 20 69 73 20 6e 6f 6e 2d 6e .as.a.list..If.UNHEXIFY.is.non-n
1ac0 69 6c 2c 20 68 65 78 2d 64 65 63 6f 64 65 20 65 61 63 68 20 73 70 6c 69 74 20 70 61 72 74 2e 20 il,.hex-decode.each.split.part..
1ae0 49 66 0a 55 4e 48 45 58 49 46 59 20 69 73 20 61 20 66 75 6e 63 74 69 6f 6e 2c 20 75 73 65 20 74 If.UNHEXIFY.is.a.function,.use.t
1b00 68 61 74 20 66 75 6e 63 74 69 6f 6e 20 74 6f 20 64 65 63 6f 64 65 20 65 61 63 68 20 73 70 6c 69 hat.function.to.decode.each.spli
1b20 74 0a 70 61 72 74 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c t.part...(defalias.'org-protocol
1b40 2d 73 70 6c 69 74 2d 64 61 74 61 20 23 5b 28 64 61 74 61 20 26 6f 70 74 69 6f 6e 61 6c 20 75 6e -split-data.#[(data.&optional.un
1b60 68 65 78 69 66 79 20 73 65 70 61 72 61 74 6f 72 29 20 22 08 5c 32 30 36 05 00 5c 33 30 35 19 5c hexify.separator).".\206..\305.\
1b80 33 30 36 5c 6e 09 5c 22 1b 5c 66 5c 32 30 33 23 00 5c 33 30 37 5c 66 21 5c 32 30 33 1c 00 5c 33 306\n.\".\f\203#.\307\f!\203..\3
1ba0 31 30 5c 66 0b 5c 22 5c 32 30 32 24 00 5c 33 31 30 5c 33 31 31 0b 5c 22 5c 32 30 32 24 00 0b 2a 10\f.\"\202$.\310\311.\"\202$..*
1bc0 5c 32 30 37 22 20 5b 73 65 70 61 72 61 74 6f 72 20 73 65 70 20 64 61 74 61 20 73 70 6c 69 74 2d \207".[separator.sep.data.split-
1be0 70 61 72 74 73 20 75 6e 68 65 78 69 66 79 20 22 2f 2b 22 20 73 70 6c 69 74 2d 73 74 72 69 6e 67 parts.unhexify."/+".split-string
1c00 20 66 62 6f 75 6e 64 70 20 6d 61 70 63 61 72 20 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 75 6e 68 .fboundp.mapcar.org-protocol-unh
1c20 65 78 2d 73 74 72 69 6e 67 5d 20 33 20 28 23 24 20 2e 20 36 35 35 39 29 5d 29 0a 23 40 31 33 34 ex-string].3.(#$...6559)]).#@134
1c40 20 55 6e 68 65 78 20 68 65 78 69 66 69 65 64 20 75 6e 69 63 6f 64 65 20 73 74 72 69 6e 67 73 20 .Unhex.hexified.unicode.strings.
1c60 61 73 20 72 65 74 75 72 6e 65 64 20 66 72 6f 6d 20 74 68 65 20 4a 61 76 61 53 63 72 69 70 74 20 as.returned.from.the.JavaScript.
1c80 66 75 6e 63 74 69 6f 6e 0a 65 6e 63 6f 64 65 55 52 49 43 6f 6d 70 6f 6e 65 6e 74 2e 20 45 2e 67 function.encodeURIComponent..E.g
1ca0 2e 20 60 25 43 33 25 42 36 27 20 69 73 20 74 68 65 20 67 65 72 6d 61 6e 20 55 6d 6c 61 75 74 20 ..`%C3%B6'.is.the.german.Umlaut.
1cc0 60 c3 bc 27 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 75 `..'...(defalias.'org-protocol-u
1ce0 6e 68 65 78 2d 73 74 72 69 6e 67 20 23 5b 28 73 74 72 29 20 22 08 5c 32 30 36 05 00 5c 33 30 36 nhex-string.#[(str).".\206..\306
1d00 10 5c 33 30 36 5c 33 30 37 19 1a 5c 33 31 30 5c 33 31 31 08 5c 22 5c 32 30 33 34 00 5c 33 31 32 .\306\307..\310\311.\"\2034.\312
1d20 5c 32 32 34 1b 5c 33 31 32 5c 32 32 35 1c 5c 33 31 33 5c 33 31 32 08 5c 22 1d 5c 33 31 34 0d 5c \224.\312\225.\313\312.\".\314.\
1d40 32 32 36 21 1e 0e 5c 6e 08 5c 33 31 32 0b 4f 0e 0e 51 12 08 5c 66 5c 33 31 35 4f 10 2c 5c 32 30 226!..\n.\312.O..Q..\f\315O.,\20
1d60 32 5c 6e 00 5c 6e 08 50 5c 32 31 31 12 2a 5c 32 30 37 22 20 5b 73 74 72 20 63 61 73 65 2d 66 6f 2\n.\n.P\211.*\207".[str.case-fo
1d80 6c 64 2d 73 65 61 72 63 68 20 74 6d 70 20 73 74 61 72 74 20 65 6e 64 20 68 65 78 20 22 22 20 74 ld-search.tmp.start.end.hex."".t
1da0 20 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 5c 5c 28 25 5b 30 2d 39 61 2d 66 5d 5b 30 2d 39 61 .string-match."\\(%[0-9a-f][0-9a
1dc0 2d 66 5d 5c 5c 29 2b 22 20 30 20 6d 61 74 63 68 2d 73 74 72 69 6e 67 20 6f 72 67 2d 70 72 6f 74 -f]\\)+".0.match-string.org-prot
1de0 6f 63 6f 6c 2d 75 6e 68 65 78 2d 63 6f 6d 70 6f 75 6e 64 20 6e 69 6c 20 72 65 70 6c 61 63 65 6d ocol-unhex-compound.nil.replacem
1e00 65 6e 74 5d 20 35 20 28 23 24 20 2e 20 37 32 33 33 29 5d 29 0a 23 40 37 30 20 55 6e 68 65 78 69 ent].5.(#$...7233)]).#@70.Unhexi
1e20 66 79 20 75 6e 69 63 6f 64 65 20 68 65 78 2d 63 68 61 72 73 2e 20 45 2e 67 2e 20 60 25 43 33 25 fy.unicode.hex-chars..E.g..`%C3%
1e40 42 36 27 20 69 73 20 74 68 65 20 47 65 72 6d 61 6e 20 55 6d 6c 61 75 74 20 60 c3 bc 27 2e 1f 0a B6'.is.the.German.Umlaut.`..'...
1e60 28 64 65 66 61 6c 69 61 73 20 27 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 75 6e 68 65 78 2d 63 6f (defalias.'org-protocol-unhex-co
1e80 6d 70 6f 75 6e 64 20 23 5b 28 68 65 78 29 20 22 5c 33 30 36 5c 33 30 37 5c 33 31 30 08 5c 33 31 mpound.#[(hex)."\306\307\310.\31
1ea0 31 5c 22 5c 22 19 5c 33 30 37 1a 5c 33 31 32 5c 32 31 31 1b 1c 09 5c 32 30 33 18 01 09 5c 32 31 1\"\".\307.\312\211...\203...\21
1ec0 31 41 11 40 5c 32 31 31 1d 5c 33 31 32 5c 32 33 34 1e 1e 0d 5c 33 31 33 5c 32 33 34 1d 0e 1e 5c 1A.@\211.\312\234...\313\234...\
1ee0 33 31 34 56 5c 32 30 33 31 00 5c 33 31 35 0e 1e 5c 33 31 36 5a 5c 5c 5c 32 30 32 35 00 0e 1e 5c 314V\2031.\315..\316Z\\\2025...\
1f00 33 31 37 5a 1e 1f 0d 5c 33 31 34 56 5c 32 30 33 45 00 5c 33 31 35 0d 5c 33 31 36 5a 5c 5c 5c 32 317Z...\314V\203E.\315.\316Z\\\2
1f20 30 32 48 00 0d 5c 33 31 37 5a 1e 20 5c 33 32 30 0e 1f 5c 33 32 31 5c 22 0e 20 5c 5c 1e 21 0b 5c 02H..\317Z..\320..\321\"..\\.!.\
1f40 33 31 32 55 5c 32 30 33 5c 32 32 35 00 0e 21 5c 33 32 32 59 5c 32 30 33 65 00 5c 33 32 33 5c 32 312U\203\225..!\322Y\203e.\323\2
1f60 30 32 5c 32 32 36 00 0e 21 5c 33 32 34 59 5c 32 30 33 70 00 5c 33 32 35 5c 32 30 32 5c 32 32 36 02\226..!\324Y\203p.\325\202\226
1f80 00 0e 21 5c 33 32 36 59 5c 32 30 33 7b 00 5c 33 32 31 5c 32 30 32 5c 32 32 36 00 0e 21 5c 33 32 ..!\326Y\203{.\321\202\226..!\32
1fa0 37 59 5c 32 30 33 5c 32 30 36 00 5c 33 33 30 5c 32 30 32 5c 32 32 36 00 0e 21 5c 33 33 31 59 5c 7Y\203\206.\330\202\226..!\331Y\
1fc0 32 30 33 5c 32 32 31 00 5c 33 33 32 5c 32 30 32 5c 32 32 36 00 5c 33 31 32 5c 32 30 32 5c 32 32 203\221.\332\202\226.\312\202\22
1fe0 36 00 5c 33 32 33 1e 5c 22 0b 5c 33 31 32 55 5c 32 30 33 5c 33 33 31 00 0e 21 5c 33 32 32 59 5c 6.\323.\".\312U\203\331..!\322Y\
2000 32 30 33 5c 32 35 31 00 5c 33 32 32 5c 32 30 32 5c 33 33 32 00 0e 21 5c 33 32 34 59 5c 32 30 33 203\251.\322\202\332..!\324Y\203
2020 5c 32 36 34 00 5c 33 32 34 5c 32 30 32 5c 33 33 32 00 0e 21 5c 33 32 36 59 5c 32 30 33 5c 32 37 \264.\324\202\332..!\326Y\203\27
2040 37 00 5c 33 32 36 5c 32 30 32 5c 33 33 32 00 0e 21 5c 33 32 37 59 5c 32 30 33 5c 33 31 32 00 5c 7.\326\202\332..!\327Y\203\312.\
2060 33 32 37 5c 32 30 32 5c 33 33 32 00 0e 21 5c 33 33 31 59 5c 32 30 33 5c 33 32 35 00 5c 33 33 31 327\202\332..!\331Y\203\325.\331
2080 5c 32 30 32 5c 33 33 32 00 5c 33 31 32 5c 32 30 32 5c 33 33 32 00 5c 33 33 33 1e 23 0e 21 5c 33 \202\332.\312\202\332.\333.#.!\3
20a0 33 31 59 5c 32 30 33 5c 33 34 36 00 0e 5c 22 13 5c 33 33 34 0e 21 0e 23 5c 22 16 21 5c 33 32 30 31Y\203\346..\".\334.!.#\".!\320
20c0 5c 66 0e 5c 22 5c 22 0e 21 5c 5c 14 0b 5c 33 31 32 56 5c 32 30 33 00 01 0b 53 13 0b 5c 33 31 32 \f.\"\".!\\..\312V\203...S..\312
20e0 55 5c 32 30 33 13 01 5c 6e 5c 66 1e 24 5c 33 33 35 0e 24 21 29 50 12 5c 33 31 32 14 2e 08 5c 32 U\203..\n\f.$\335.$!)P.\312...\2
2100 30 32 0e 00 5c 6e 2c 5c 32 30 37 22 20 5b 68 65 78 20 62 79 74 65 73 20 72 65 74 20 65 61 74 20 02..\n,\207".[hex.bytes.ret.eat.
2120 73 75 6d 20 62 20 72 65 6d 6f 76 65 20 22 22 20 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 22 25 22 sum.b.remove."".split-string."%"
2140 20 30 20 31 20 35 37 20 31 30 20 36 35 20 34 38 20 6c 73 68 20 34 20 32 35 32 20 36 20 32 34 38 .0.1.57.10.65.48.lsh.4.252.6.248
2160 20 35 20 32 34 30 20 32 32 34 20 33 20 31 39 32 20 32 20 31 32 38 20 6c 6f 67 78 6f 72 20 63 68 .5.240.224.3.192.2.128.logxor.ch
2180 61 72 2d 74 6f 2d 73 74 72 69 6e 67 20 61 20 63 31 20 63 32 20 76 61 6c 20 73 68 69 66 74 20 78 ar-to-string.a.c1.c2.val.shift.x
21a0 6f 72 20 63 5d 20 36 20 28 23 24 20 2e 20 37 37 30 36 29 5d 29 0a 23 40 38 33 37 20 47 72 65 65 or.c].6.(#$...7706)]).#@837.Gree
21c0 64 79 20 68 61 6e 64 6c 65 72 73 20 6d 69 67 68 74 20 72 65 63 65 69 76 65 20 61 20 6c 69 73 74 dy.handlers.might.receive.a.list
21e0 20 6c 69 6b 65 20 74 68 69 73 20 66 72 6f 6d 20 65 6d 61 63 73 63 6c 69 65 6e 74 3a 0a 20 27 28 .like.this.from.emacsclient:..'(
2200 20 28 22 2f 64 69 72 2f 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 3a 2f 67 72 65 65 64 79 3a 2f 7e 2f .("/dir/org-protocol:/greedy:/~/
2220 70 61 74 68 31 22 20 28 32 33 20 2e 20 31 32 29 29 20 28 22 2f 64 69 72 2f 70 61 72 61 6d 22 29 path1".(23...12)).("/dir/param")
2240 0a 77 68 65 72 65 20 22 2f 64 69 72 2f 22 20 69 73 20 74 68 65 20 61 62 73 6f 6c 75 74 65 20 70 .where."/dir/".is.the.absolute.p
2260 61 74 68 20 74 6f 20 65 6d 61 63 73 63 6c 69 65 6e 74 73 20 77 6f 72 6b 69 6e 67 20 64 69 72 65 ath.to.emacsclients.working.dire
2280 63 74 6f 72 79 2e 20 20 54 68 69 73 0a 66 75 6e 63 74 69 6f 6e 20 74 72 61 6e 73 66 6f 72 6d 73 ctory...This.function.transforms
22a0 20 69 74 20 69 6e 74 6f 20 61 20 66 6c 61 74 20 6c 69 73 74 20 75 74 69 6c 69 7a 69 6e 67 20 60 .it.into.a.flat.list.utilizing.`
22c0 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 66 6c 61 74 74 65 6e 27 20 61 6e 64 0a 74 72 61 6e 73 66 org-protocol-flatten'.and.transf
22e0 6f 72 6d 73 20 74 68 65 20 65 6c 65 6d 65 6e 74 73 20 6f 66 20 74 68 61 74 20 6c 69 73 74 20 61 orms.the.elements.of.that.list.a
2300 73 20 66 6f 6c 6c 6f 77 73 3a 0a 0a 49 66 20 73 74 72 69 70 2d 70 61 74 68 20 69 73 20 6e 6f 6e s.follows:..If.strip-path.is.non
2320 2d 6e 69 6c 2c 20 72 65 6d 6f 76 65 20 74 68 65 20 22 2f 64 69 72 2f 22 20 70 72 65 66 69 78 20 -nil,.remove.the."/dir/".prefix.
2340 66 72 6f 6d 20 61 6c 6c 20 6d 65 6d 62 65 72 73 20 6f 66 0a 70 61 72 61 6d 2d 6c 69 73 74 2e 0a from.all.members.of.param-list..
2360 0a 49 66 20 72 65 70 6c 61 63 65 6d 65 6e 74 20 69 73 20 73 74 72 69 6e 67 2c 20 72 65 70 6c 61 .If.replacement.is.string,.repla
2380 63 65 20 74 68 65 20 22 2f 64 69 72 2f 22 20 70 72 65 66 69 78 20 77 69 74 68 20 69 74 2e 0a 0a ce.the."/dir/".prefix.with.it...
23a0 54 68 65 20 66 69 72 73 74 20 70 61 72 61 6d 65 74 65 72 2c 20 74 68 65 20 6f 6e 65 20 74 68 61 The.first.parameter,.the.one.tha
23c0 74 20 63 6f 6e 74 61 69 6e 73 20 74 68 65 20 70 72 6f 74 6f 63 6f 6c 73 2c 20 69 73 20 61 6c 77 t.contains.the.protocols,.is.alw
23e0 61 79 73 20 63 68 61 6e 67 65 64 2e 0a 45 76 65 72 79 74 68 69 6e 67 20 75 70 20 74 6f 20 74 68 ays.changed..Everything.up.to.th
2400 65 20 65 6e 64 20 6f 66 20 74 68 65 20 70 72 6f 74 6f 63 6f 6c 73 20 69 73 20 73 74 72 69 70 70 e.end.of.the.protocols.is.stripp
2420 65 64 2e 0a 0a 4e 6f 74 65 2c 20 74 68 61 74 20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 77 69 ed...Note,.that.this.function.wi
2440 6c 6c 20 61 6c 77 61 79 73 20 62 65 68 61 76 65 20 61 73 20 69 66 0a 60 6f 72 67 2d 70 72 6f 74 ll.always.behave.as.if.`org-prot
2460 6f 63 6f 6c 2d 72 65 76 65 72 73 65 2d 6c 69 73 74 2d 6f 66 2d 66 69 6c 65 73 27 20 77 61 73 20 ocol-reverse-list-of-files'.was.
2480 73 65 74 20 74 6f 20 74 20 61 6e 64 20 74 68 65 20 72 65 74 75 72 6e 65 64 20 6c 69 73 74 20 77 set.to.t.and.the.returned.list.w
24a0 69 6c 6c 0a 72 65 66 6c 65 63 74 20 74 68 61 74 2e 20 49 2e 65 2e 20 65 6d 61 63 73 63 6c 69 65 ill.reflect.that..I.e..emacsclie
24c0 6e 74 73 20 66 69 72 73 74 20 70 61 72 61 6d 65 74 65 72 20 77 69 6c 6c 20 62 65 20 74 68 65 20 nts.first.parameter.will.be.the.
24e0 66 69 72 73 74 20 6f 6e 65 20 69 6e 20 74 68 65 0a 72 65 74 75 72 6e 65 64 20 6c 69 73 74 2e 1f first.one.in.the.returned.list..
2500 0a 28 64 65 66 61 6c 69 61 73 20 27 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 66 6c 61 74 74 65 6e .(defalias.'org-protocol-flatten
2520 2d 67 72 65 65 64 79 20 23 5b 28 70 61 72 61 6d 2d 6c 69 73 74 20 26 6f 70 74 69 6f 6e 61 6c 20 -greedy.#[(param-list.&optional.
2540 73 74 72 69 70 2d 70 61 74 68 20 72 65 70 6c 61 63 65 6d 65 6e 74 29 20 22 5c 33 30 36 08 5c 32 strip-path.replacement)."\306.\2
2560 30 33 09 00 09 5c 32 30 32 5c 66 00 5c 33 30 37 09 21 21 5c 32 31 31 1a 40 1b 5c 33 31 30 1c 5c 03...\202\f.\307.!!\211.@.\310.\
2580 33 31 31 5c 32 31 31 1d 1e 10 5c 33 31 32 5c 33 31 33 0b 5c 22 5c 32 30 33 30 00 5c 33 31 34 5c 311\211...\312\313.\"\2030.\314\
25a0 33 31 35 0b 5c 22 5c 32 31 31 15 47 14 5c 6e 0d 5c 33 31 34 5c 33 31 36 0b 5c 22 50 5c 32 34 30 315.\"\211.G.\n.\314\316.\"P\240
25c0 5c 32 31 30 0e 11 5c 32 30 33 5c 32 30 37 00 5c 6e 5c 33 31 31 1e 12 5c 32 31 31 1e 13 5c 32 30 \210..\203\207.\n\311..\211..\20
25e0 33 7b 00 0e 13 40 16 12 5c 33 31 37 0e 10 0e 12 3b 5c 32 30 33 6c 00 0e 14 3b 5c 32 30 33 61 00 3{...@..\317....;\203l...;\203a.
2600 0e 14 0e 12 5c 66 5c 33 31 31 4f 50 5c 32 31 31 16 12 5c 32 30 32 6e 00 0e 12 5c 66 5c 33 31 31 ....\f\311OP\211..\202n...\f\311
2620 4f 5c 32 31 31 16 12 5c 32 30 32 6e 00 0e 12 43 5c 22 16 10 0e 13 41 5c 32 31 31 16 13 5c 32 30 O\211..\202n...C\"....A\211..\20
2640 34 3f 00 5c 33 31 31 16 12 0e 10 2a 5c 32 31 30 0e 10 5c 32 30 32 5c 32 31 30 00 5c 6e 2d 5c 32 4?.\311....*\210..\202\210.\n-\2
2660 30 37 22 20 5b 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 72 65 76 65 72 73 65 2d 6c 69 73 74 2d 6f 07".[org-protocol-reverse-list-o
2680 66 2d 66 69 6c 65 73 20 70 61 72 61 6d 2d 6c 69 73 74 20 6c 20 74 72 69 67 67 65 72 20 6c 65 6e f-files.param-list.l.trigger.len
26a0 20 64 69 72 20 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 66 6c 61 74 74 65 6e 20 72 65 76 65 72 73 .dir.org-protocol-flatten.revers
26c0 65 20 30 20 6e 69 6c 20 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 5e 5c 5c 28 2e 2a 5c 5c 29 5c e.0.nil.string-match."^\\(.*\\)\
26e0 5c 28 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 3a 2f 2b 5b 61 2d 7a 41 2d 7a 30 2d 39 5d 5b 2d 5f 61 \(org-protocol:/+[a-zA-z0-9][-_a
2700 2d 7a 41 2d 7a 30 2d 39 5d 2a 3a 2f 2b 5c 5c 29 5c 5c 28 2e 2a 5c 5c 29 22 20 6d 61 74 63 68 2d -zA-z0-9]*:/+\\)\\(.*\\)".match-
2720 73 74 72 69 6e 67 20 31 20 33 20 61 70 70 65 6e 64 20 72 65 74 20 73 74 72 69 70 2d 70 61 74 68 string.1.3.append.ret.strip-path
2740 20 65 20 23 31 3d 23 3a 2d 2d 63 6c 2d 64 6f 6c 69 73 74 2d 74 65 6d 70 2d 2d 20 72 65 70 6c 61 .e.#1=#:--cl-dolist-temp--.repla
2760 63 65 6d 65 6e 74 5d 20 38 20 28 23 24 20 2e 20 38 36 33 36 29 5d 29 0a 23 40 32 35 30 20 47 72 cement].8.(#$...8636)]).#@250.Gr
2780 65 65 64 79 20 68 61 6e 64 6c 65 72 73 20 6d 69 67 68 74 20 72 65 63 65 69 76 65 20 61 20 6c 69 eedy.handlers.might.receive.a.li
27a0 73 74 20 6c 69 6b 65 20 74 68 69 73 20 66 72 6f 6d 20 65 6d 61 63 73 63 6c 69 65 6e 74 3a 0a 20 st.like.this.from.emacsclient:..
27c0 27 28 20 28 22 2f 64 69 72 2f 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 3a 2f 67 72 65 65 64 79 3a 2f '(.("/dir/org-protocol:/greedy:/
27e0 7e 2f 70 61 74 68 31 22 20 28 32 33 20 2e 20 31 32 29 29 20 28 22 2f 64 69 72 2f 70 61 72 61 6d ~/path1".(23...12)).("/dir/param
2800 22 29 0a 77 68 65 72 65 20 22 2f 64 69 72 2f 22 20 69 73 20 74 68 65 20 61 62 73 6f 6c 75 74 65 ").where."/dir/".is.the.absolute
2820 20 70 61 74 68 20 74 6f 20 65 6d 61 63 73 63 6c 69 65 6e 74 73 20 77 6f 72 6b 69 6e 67 20 64 69 .path.to.emacsclients.working.di
2840 72 65 63 74 6f 72 79 2e 0a 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 74 72 61 6e 73 66 6f 72 6d rectory..This.function.transform
2860 73 20 69 74 20 69 6e 74 6f 20 61 20 66 6c 61 74 20 6c 69 73 74 2e 1f 0a 28 64 65 66 61 6c 69 61 s.it.into.a.flat.list...(defalia
2880 73 20 27 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 66 6c 61 74 74 65 6e 20 23 5b 28 6c 29 20 22 08 s.'org-protocol-flatten.#[(l).".
28a0 5c 32 30 35 16 00 08 3c 5c 32 30 33 14 00 5c 33 30 31 5c 33 30 32 08 40 21 5c 33 30 32 08 41 21 \205...<\203..\301\302.@!\302.A!
28c0 5c 22 5c 32 30 37 08 43 5c 32 30 37 22 20 5b 6c 20 61 70 70 65 6e 64 20 6f 72 67 2d 70 72 6f 74 \"\207.C\207".[l.append.org-prot
28e0 6f 63 6f 6c 2d 66 6c 61 74 74 65 6e 5d 20 34 20 28 23 24 20 2e 20 31 30 31 31 30 29 5d 29 0a 23 ocol-flatten].4.(#$...10110)]).#
2900 40 35 38 38 20 50 72 6f 63 65 73 73 20 61 6e 20 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 3a 2f 2f 73 @588.Process.an.org-protocol://s
2920 74 6f 72 65 2d 6c 69 6e 6b 3a 2f 2f 20 73 74 79 6c 65 20 75 72 6c 2e 0a 41 64 64 69 74 69 6f 6e tore-link://.style.url..Addition
2940 61 6c 6c 79 20 73 74 6f 72 65 20 61 20 62 72 6f 77 73 65 72 20 55 52 4c 20 61 73 20 61 6e 20 6f ally.store.a.browser.URL.as.an.o
2960 72 67 20 6c 69 6e 6b 2e 20 41 6c 73 6f 20 70 75 73 68 65 73 20 74 68 65 0a 6c 69 6e 6b 27 73 20 rg.link..Also.pushes.the.link's.
2980 55 52 4c 20 74 6f 20 74 68 65 20 60 6b 69 6c 6c 2d 72 69 6e 67 27 2e 0a 0a 54 68 65 20 6c 6f 63 URL.to.the.`kill-ring'...The.loc
29a0 61 74 69 6f 6e 20 66 6f 72 20 61 20 62 72 6f 77 73 65 72 27 73 20 62 6f 6f 6b 6d 61 72 6b 20 68 ation.for.a.browser's.bookmark.h
29c0 61 73 20 74 6f 20 6c 6f 6f 6b 20 6c 69 6b 65 20 74 68 69 73 3a 0a 0a 20 20 6a 61 76 61 73 63 72 as.to.look.like.this:....javascr
29e0 69 70 74 3a 6c 6f 63 61 74 69 6f 6e 2e 68 72 65 66 3d 27 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 3a ipt:location.href='org-protocol:
2a00 2f 2f 73 74 6f 72 65 2d 6c 69 6e 6b 3a 2f 2f 27 2b 20 5c 0a 20 20 20 20 20 20 20 20 65 6e 63 6f //store-link://'+.\.........enco
2a20 64 65 55 52 49 43 6f 6d 70 6f 6e 65 6e 74 28 6c 6f 63 61 74 69 6f 6e 2e 68 72 65 66 29 0a 20 20 deURIComponent(location.href)...
2a40 20 20 20 20 20 20 65 6e 63 6f 64 65 55 52 49 43 6f 6d 70 6f 6e 65 6e 74 28 64 6f 63 75 6d 65 6e ......encodeURIComponent(documen
2a60 74 2e 74 69 74 6c 65 29 2b 27 2f 27 2b 20 5c 0a 0a 44 6f 6e 27 74 20 75 73 65 20 60 65 73 63 61 t.title)+'/'+.\..Don't.use.`esca
2a80 70 65 28 29 27 21 20 55 73 65 20 60 65 6e 63 6f 64 65 55 52 49 43 6f 6d 70 6f 6e 65 6e 74 28 29 pe()'!.Use.`encodeURIComponent()
2aa0 27 20 69 6e 73 74 65 61 64 2e 20 54 68 65 20 74 69 74 6c 65 20 6f 66 20 74 68 65 20 70 61 67 65 '.instead..The.title.of.the.page
2ac0 0a 63 6f 75 6c 64 20 63 6f 6e 74 61 69 6e 20 73 6c 61 73 68 65 73 20 61 6e 64 20 74 68 65 20 6c .could.contain.slashes.and.the.l
2ae0 6f 63 61 74 69 6f 6e 20 64 65 66 69 6e 69 74 65 6c 79 20 77 69 6c 6c 2e 0a 0a 54 68 65 20 73 75 ocation.definitely.will...The.su
2b00 62 2d 70 72 6f 74 6f 63 6f 6c 20 75 73 65 64 20 74 6f 20 72 65 61 63 68 20 74 68 69 73 20 66 75 b-protocol.used.to.reach.this.fu
2b20 6e 63 74 69 6f 6e 20 69 73 20 73 65 74 20 69 6e 0a 60 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 70 nction.is.set.in.`org-protocol-p
2b40 72 6f 74 6f 63 6f 6c 2d 61 6c 69 73 74 27 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 6f 72 67 2d rotocol-alist'...(defalias.'org-
2b60 70 72 6f 74 6f 63 6f 6c 2d 73 74 6f 72 65 2d 6c 69 6e 6b 20 23 5b 28 66 6e 61 6d 65 29 20 22 5c protocol-store-link.#[(fname)."\
2b80 33 30 36 08 5c 33 30 37 5c 22 19 5c 33 31 30 09 40 21 1a 09 5c 32 31 31 1b 41 40 29 1c 5c 33 31 306.\307\".\310.@!..\211.A@).\31
2ba0 31 1d 5c 33 31 32 5c 33 31 33 21 5c 32 30 33 21 00 5c 6e 5c 66 44 0e 0b 42 16 0b 5c 33 31 34 5c 1.\312\313!\203!.\n\fD..B..\314\
2bc0 6e 21 5c 32 31 30 5c 33 31 35 5c 33 31 36 5c 33 31 37 5c 33 32 30 21 5c 33 31 37 5c 33 32 31 21 n!\210\315\316\317\320!\317\321!
2be0 5c 6e 24 5c 32 31 30 2c 5c 33 31 31 5c 32 30 37 22 20 5b 66 6e 61 6d 65 20 73 70 6c 69 74 70 61 \n$\210,\311\207".[fname.splitpa
2c00 72 74 73 20 75 72 69 20 78 20 74 69 74 6c 65 20 6f 72 67 6c 69 6e 6b 20 6f 72 67 2d 70 72 6f 74 rts.uri.x.title.orglink.org-prot
2c20 6f 63 6f 6c 2d 73 70 6c 69 74 2d 64 61 74 61 20 74 20 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 73 ocol-split-data.t.org-protocol-s
2c40 61 6e 69 74 69 7a 65 2d 75 72 69 20 6e 69 6c 20 62 6f 75 6e 64 70 20 6f 72 67 2d 73 74 6f 72 65 anitize-uri.nil.boundp.org-store
2c60 64 2d 6c 69 6e 6b 73 20 6b 69 6c 6c 2d 6e 65 77 20 6d 65 73 73 61 67 65 20 22 60 25 73 27 20 74 d-links.kill-new.message."`%s'.t
2c80 6f 20 69 6e 73 65 72 74 20 6e 65 77 20 6f 72 67 2d 6c 69 6e 6b 2c 20 60 25 73 27 20 74 6f 20 69 o.insert.new.org-link,.`%s'.to.i
2ca0 6e 73 65 72 74 20 60 25 73 27 22 20 73 75 62 73 74 69 74 75 74 65 2d 63 6f 6d 6d 61 6e 64 2d 6b nsert.`%s'".substitute-command-k
2cc0 65 79 73 20 22 5c 5c 5b 6f 72 67 2d 69 6e 73 65 72 74 2d 6c 69 6e 6b 5d 22 20 22 5c 5c 5b 79 61 eys."\\[org-insert-link]"."\\[ya
2ce0 6e 6b 5d 22 5d 20 36 20 28 23 24 20 2e 20 31 30 35 30 31 29 5d 29 0a 23 40 33 38 33 20 50 72 6f nk]"].6.(#$...10501)]).#@383.Pro
2d00 63 65 73 73 20 61 6e 20 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 3a 2f 2f 72 65 6d 65 6d 62 65 72 3a cess.an.org-protocol://remember:
2d20 2f 2f 20 73 74 79 6c 65 20 75 72 6c 2e 0a 0a 54 68 65 20 6c 6f 63 61 74 69 6f 6e 20 66 6f 72 20 //.style.url...The.location.for.
2d40 61 20 62 72 6f 77 73 65 72 27 73 20 62 6f 6f 6b 6d 61 72 6b 20 68 61 73 20 74 6f 20 6c 6f 6f 6b a.browser's.bookmark.has.to.look
2d60 20 6c 69 6b 65 20 74 68 69 73 3a 0a 0a 20 20 6a 61 76 61 73 63 72 69 70 74 3a 6c 6f 63 61 74 69 .like.this:....javascript:locati
2d80 6f 6e 2e 68 72 65 66 3d 27 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 3a 2f 2f 72 65 6d 65 6d 62 65 72 on.href='org-protocol://remember
2da0 3a 2f 2f 27 2b 20 5c 0a 20 20 20 20 20 20 20 20 65 6e 63 6f 64 65 55 52 49 43 6f 6d 70 6f 6e 65 ://'+.\.........encodeURICompone
2dc0 6e 74 28 6c 6f 63 61 74 69 6f 6e 2e 68 72 65 66 29 2b 27 2f 27 20 5c 0a 20 20 20 20 20 20 20 20 nt(location.href)+'/'.\.........
2de0 65 6e 63 6f 64 65 55 52 49 43 6f 6d 70 6f 6e 65 6e 74 28 64 6f 63 75 6d 65 6e 74 2e 74 69 74 6c encodeURIComponent(document.titl
2e00 65 29 2b 27 2f 27 2b 20 5c 0a 20 20 20 20 20 20 20 20 65 6e 63 6f 64 65 55 52 49 43 6f 6d 70 6f e)+'/'+.\.........encodeURICompo
2e20 6e 65 6e 74 28 77 69 6e 64 6f 77 2e 67 65 74 53 65 6c 65 63 74 69 6f 6e 28 29 29 0a 0a 53 65 65 nent(window.getSelection())..See
2e40 20 74 68 65 20 64 6f 63 73 20 66 6f 72 20 60 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 63 61 70 74 .the.docs.for.`org-protocol-capt
2e60 75 72 65 27 20 66 6f 72 20 6d 6f 72 65 20 69 6e 66 6f 72 6d 61 74 69 6f 6e 2e 1f 0a 28 64 65 66 ure'.for.more.information...(def
2e80 61 6c 69 61 73 20 27 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 72 65 6d 65 6d 62 65 72 20 23 5b 28 alias.'org-protocol-remember.#[(
2ea0 69 6e 66 6f 29 20 22 5c 33 30 31 5c 33 30 32 21 5c 32 30 33 17 00 5c 33 30 33 5c 33 30 34 21 5c info)."\301\302!\203..\303\304!\
2ec0 32 30 33 17 00 5c 33 30 35 08 5c 33 30 36 5c 22 5c 32 30 33 17 00 5c 33 30 37 5c 33 31 30 21 5c 203..\305.\306\"\203..\307\310!\
2ee0 32 31 30 5c 33 31 31 5c 32 30 37 22 20 5b 69 6e 66 6f 20 62 6f 75 6e 64 70 20 6f 72 67 2d 73 74 210\311\207".[info.boundp.org-st
2f00 6f 72 65 64 2d 6c 69 6e 6b 73 20 66 62 6f 75 6e 64 70 20 6f 72 67 2d 63 61 70 74 75 72 65 20 6f ored-links.fboundp.org-capture.o
2f20 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 64 6f 2d 63 61 70 74 75 72 65 20 6f 72 67 2d 72 65 6d 65 6d rg-protocol-do-capture.org-remem
2f40 62 65 72 20 6d 65 73 73 61 67 65 20 22 4f 72 67 2d 6d 6f 64 65 20 6e 6f 74 20 6c 6f 61 64 65 64 ber.message."Org-mode.not.loaded
2f60 2e 22 20 6e 69 6c 5d 20 33 20 28 23 24 20 2e 20 31 31 35 31 37 29 5d 29 0a 23 40 37 38 38 20 50 .".nil].3.(#$...11517)]).#@788.P
2f80 72 6f 63 65 73 73 20 61 6e 20 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 3a 2f 2f 63 61 70 74 75 72 65 rocess.an.org-protocol://capture
2fa0 3a 2f 2f 20 73 74 79 6c 65 20 75 72 6c 2e 0a 0a 54 68 65 20 73 75 62 2d 70 72 6f 74 6f 63 6f 6c ://.style.url...The.sub-protocol
2fc0 20 75 73 65 64 20 74 6f 20 72 65 61 63 68 20 74 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 69 73 20 .used.to.reach.this.function.is.
2fe0 73 65 74 20 69 6e 0a 60 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 70 72 6f 74 6f 63 6f 6c 2d 61 6c set.in.`org-protocol-protocol-al
3000 69 73 74 27 2e 0a 0a 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 64 65 74 65 63 74 73 20 61 6e 20 ist'...This.function.detects.an.
3020 55 52 4c 2c 20 74 69 74 6c 65 20 61 6e 64 20 6f 70 74 69 6f 6e 61 6c 20 74 65 78 74 2c 20 73 65 URL,.title.and.optional.text,.se
3040 70 61 72 61 74 65 64 20 62 79 20 27 2f 27 0a 54 68 65 20 6c 6f 63 61 74 69 6f 6e 20 66 6f 72 20 parated.by.'/'.The.location.for.
3060 61 20 62 72 6f 77 73 65 72 27 73 20 62 6f 6f 6b 6d 61 72 6b 20 68 61 73 20 74 6f 20 6c 6f 6f 6b a.browser's.bookmark.has.to.look
3080 20 6c 69 6b 65 20 74 68 69 73 3a 0a 0a 20 20 6a 61 76 61 73 63 72 69 70 74 3a 6c 6f 63 61 74 69 .like.this:....javascript:locati
30a0 6f 6e 2e 68 72 65 66 3d 27 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 3a 2f 2f 63 61 70 74 75 72 65 3a on.href='org-protocol://capture:
30c0 2f 2f 27 2b 20 5c 0a 20 20 20 20 20 20 20 20 65 6e 63 6f 64 65 55 52 49 43 6f 6d 70 6f 6e 65 6e //'+.\.........encodeURIComponen
30e0 74 28 6c 6f 63 61 74 69 6f 6e 2e 68 72 65 66 29 2b 27 2f 27 20 5c 0a 20 20 20 20 20 20 20 20 65 t(location.href)+'/'.\.........e
3100 6e 63 6f 64 65 55 52 49 43 6f 6d 70 6f 6e 65 6e 74 28 64 6f 63 75 6d 65 6e 74 2e 74 69 74 6c 65 ncodeURIComponent(document.title
3120 29 2b 27 2f 27 2b 20 5c 0a 20 20 20 20 20 20 20 20 65 6e 63 6f 64 65 55 52 49 43 6f 6d 70 6f 6e )+'/'+.\.........encodeURICompon
3140 65 6e 74 28 77 69 6e 64 6f 77 2e 67 65 74 53 65 6c 65 63 74 69 6f 6e 28 29 29 0a 0a 42 79 20 64 ent(window.getSelection())..By.d
3160 65 66 61 75 6c 74 2c 20 69 74 20 75 73 65 73 20 74 68 65 20 63 68 61 72 61 63 74 65 72 20 60 6f efault,.it.uses.the.character.`o
3180 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 64 65 66 61 75 6c 74 2d 74 65 6d 70 6c 61 74 65 2d 6b 65 79 rg-protocol-default-template-key
31a0 27 2c 0a 77 68 69 63 68 20 73 68 6f 75 6c 64 20 62 65 20 61 73 73 6f 63 69 61 74 65 64 20 77 69 ',.which.should.be.associated.wi
31c0 74 68 20 61 20 74 65 6d 70 6c 61 74 65 20 69 6e 20 60 6f 72 67 2d 63 61 70 74 75 72 65 2d 74 65 th.a.template.in.`org-capture-te
31e0 6d 70 6c 61 74 65 73 27 2e 0a 42 75 74 20 79 6f 75 20 6d 61 79 20 70 72 65 70 65 6e 64 20 74 68 mplates'..But.you.may.prepend.th
3200 65 20 65 6e 63 6f 64 65 64 20 55 52 4c 20 77 69 74 68 20 61 20 63 68 61 72 61 63 74 65 72 20 61 e.encoded.URL.with.a.character.a
3220 6e 64 20 61 20 73 6c 61 73 68 20 6c 69 6b 65 20 73 6f 3a 0a 0a 20 20 6a 61 76 61 73 63 72 69 70 nd.a.slash.like.so:....javascrip
3240 74 3a 6c 6f 63 61 74 69 6f 6e 2e 68 72 65 66 3d 27 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 3a 2f 2f t:location.href='org-protocol://
3260 63 61 70 74 75 72 65 3a 2f 2f 62 2f 27 2b 20 2e 2e 2e 0a 0a 4e 6f 77 20 74 65 6d 70 6c 61 74 65 capture://b/'+......Now.template
3280 20 3f 62 20 77 69 6c 6c 20 62 65 20 75 73 65 64 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 6f 72 .?b.will.be.used...(defalias.'or
32a0 67 2d 70 72 6f 74 6f 63 6f 6c 2d 63 61 70 74 75 72 65 20 23 5b 28 69 6e 66 6f 29 20 22 5c 33 30 g-protocol-capture.#[(info)."\30
32c0 31 5c 33 30 32 21 5c 32 30 33 17 00 5c 33 30 33 5c 33 30 34 21 5c 32 30 33 17 00 5c 33 30 35 08 1\302!\203..\303\304!\203..\305.
32e0 5c 33 30 34 5c 22 5c 32 30 33 17 00 5c 33 30 36 5c 33 30 37 21 5c 32 31 30 5c 33 31 30 5c 32 30 \304\"\203..\306\307!\210\310\20
3300 37 22 20 5b 69 6e 66 6f 20 62 6f 75 6e 64 70 20 6f 72 67 2d 73 74 6f 72 65 64 2d 6c 69 6e 6b 73 7".[info.boundp.org-stored-links
3320 20 66 62 6f 75 6e 64 70 20 6f 72 67 2d 63 61 70 74 75 72 65 20 6f 72 67 2d 70 72 6f 74 6f 63 6f .fboundp.org-capture.org-protoco
3340 6c 2d 64 6f 2d 63 61 70 74 75 72 65 20 6d 65 73 73 61 67 65 20 22 4f 72 67 2d 6d 6f 64 65 20 6e l-do-capture.message."Org-mode.n
3360 6f 74 20 6c 6f 61 64 65 64 2e 22 20 6e 69 6c 5d 20 33 20 28 23 24 20 2e 20 31 32 31 35 39 29 5d ot.loaded.".nil].3.(#$...12159)]
3380 29 0a 23 40 31 31 36 20 53 75 70 70 6f 72 74 20 60 6f 72 67 2d 63 61 70 74 75 72 65 27 20 61 6e ).#@116.Support.`org-capture'.an
33a0 64 20 60 6f 72 67 2d 72 65 6d 65 6d 62 65 72 27 20 61 6c 69 6b 65 2e 0a 43 41 50 54 55 52 45 2d d.`org-remember'.alike..CAPTURE-
33c0 46 55 4e 43 20 69 73 20 65 69 74 68 65 72 20 74 68 65 20 73 79 6d 62 6f 6c 20 60 6f 72 67 2d 72 FUNC.is.either.the.symbol.`org-r
33e0 65 6d 65 6d 62 65 72 27 20 6f 72 20 60 6f 72 67 2d 63 61 70 74 75 72 65 27 2e 1f 0a 28 64 65 66 emember'.or.`org-capture'...(def
3400 61 6c 69 61 73 20 27 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 64 6f 2d 63 61 70 74 75 72 65 20 23 alias.'org-protocol-do-capture.#
3420 5b 28 69 6e 66 6f 20 63 61 70 74 75 72 65 2d 66 75 6e 63 29 20 22 5c 33 30 36 08 5c 33 30 37 5c [(info.capture-func)."\306.\307\
3440 22 5c 32 31 31 19 40 47 5c 33 31 30 55 5c 32 30 33 15 00 09 5c 32 31 31 41 11 40 5c 32 30 36 16 "\211.@G\310U\203...\211A.@\206.
3460 00 5c 6e 1b 5c 33 31 31 09 40 21 1c 5c 33 31 32 5c 33 31 33 5c 66 5c 22 5c 32 30 35 27 00 5c 33 .\n.\311.@!.\312\313\f\"\205'.\3
3480 31 34 5c 33 31 30 5c 66 5c 22 1d 09 5c 32 31 31 1e 19 41 40 29 5c 32 30 36 33 00 5c 33 31 35 1e 14\310\f\"..\211..A@)\2063.\315.
34a0 1a 09 5c 32 31 31 1e 19 41 41 29 40 5c 32 30 36 41 00 5c 33 31 35 1e 1b 5c 33 31 36 5c 66 5c 33 ..\211..AA)@\206A.\315..\316\f\3
34c0 31 32 5c 33 31 37 0e 1a 5c 22 5c 32 30 33 52 00 0e 1a 5c 32 30 32 53 00 5c 66 5c 22 1e 1c 5c 33 12\317..\"\203R...\202S.\f\"..\3
34e0 30 37 1e 1d 5c 33 32 30 1e 1e 5c 66 0e 1a 44 0e 1f 42 16 1f 5c 33 32 31 0e 1c 21 5c 32 31 30 5c 07..\320..\f..D..B..\321..!\210\
3500 33 32 32 5c 33 32 33 0d 5c 33 32 34 5c 66 5c 33 32 35 0e 1a 5c 33 32 36 0e 1c 5c 33 32 37 0e 1b 322\323.\324\f\325..\326..\327..
3520 26 5c 6e 5c 32 31 30 5c 33 33 30 20 5c 32 31 30 0e 20 5c 33 32 30 0b 5c 22 2e 09 5c 32 30 37 22 &\n\210\330.\210..\320.\"..\207"
3540 20 5b 69 6e 66 6f 20 70 61 72 74 73 20 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 64 65 66 61 75 6c .[info.parts.org-protocol-defaul
3560 74 2d 74 65 6d 70 6c 61 74 65 2d 6b 65 79 20 74 65 6d 70 6c 61 74 65 20 75 72 6c 20 74 79 70 65 t-template-key.template.url.type
3580 20 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 73 70 6c 69 74 2d 64 61 74 61 20 74 20 31 20 6f 72 67 .org-protocol-split-data.t.1.org
35a0 2d 70 72 6f 74 6f 63 6f 6c 2d 73 61 6e 69 74 69 7a 65 2d 75 72 69 20 73 74 72 69 6e 67 2d 6d 61 -protocol-sanitize-uri.string-ma
35c0 74 63 68 20 22 5e 5c 5c 28 5b 61 2d 7a 5d 2b 5c 5c 29 3a 22 20 6d 61 74 63 68 2d 73 74 72 69 6e tch."^\\([a-z]+\\):".match-strin
35e0 67 20 22 22 20 6f 72 67 2d 6d 61 6b 65 2d 6c 69 6e 6b 2d 73 74 72 69 6e 67 20 22 5b 5e 5b 3a 73 g."".org-make-link-string."[^[:s
3600 70 61 63 65 3a 5d 5d 22 20 6e 69 6c 20 6b 69 6c 6c 2d 6e 65 77 20 6f 72 67 2d 73 74 6f 72 65 2d pace:]]".nil.kill-new.org-store-
3620 6c 69 6e 6b 2d 70 72 6f 70 73 20 3a 74 79 70 65 20 3a 6c 69 6e 6b 20 3a 64 65 73 63 72 69 70 74 link-props.:type.:link.:descript
3640 69 6f 6e 20 3a 61 6e 6e 6f 74 61 74 69 6f 6e 20 3a 69 6e 69 74 69 61 6c 20 72 61 69 73 65 2d 66 ion.:annotation.:initial.raise-f
3660 72 61 6d 65 20 78 20 74 69 74 6c 65 20 72 65 67 69 6f 6e 20 6f 72 67 6c 69 6e 6b 20 6f 72 67 2d rame.x.title.region.orglink.org-
3680 63 61 70 74 75 72 65 2d 6c 69 6e 6b 2d 69 73 2d 61 6c 72 65 61 64 79 2d 73 74 6f 72 65 64 20 72 capture-link-is-already-stored.r
36a0 65 6d 65 6d 62 65 72 2d 61 6e 6e 6f 74 61 74 69 6f 6e 2d 66 75 6e 63 74 69 6f 6e 73 20 6f 72 67 emember-annotation-functions.org
36c0 2d 73 74 6f 72 65 64 2d 6c 69 6e 6b 73 20 63 61 70 74 75 72 65 2d 66 75 6e 63 5d 20 31 32 20 28 -stored-links.capture-func].12.(
36e0 23 24 20 2e 20 31 33 31 39 32 29 5d 29 0a 23 40 33 31 34 20 50 72 6f 63 65 73 73 20 61 6e 20 6f #$...13192)]).#@314.Process.an.o
3700 72 67 2d 70 72 6f 74 6f 63 6f 6c 3a 2f 2f 6f 70 65 6e 2d 73 6f 75 72 63 65 3a 2f 2f 20 73 74 79 rg-protocol://open-source://.sty
3720 6c 65 20 75 72 6c 2e 0a 0a 43 68 61 6e 67 65 20 61 20 66 69 6c 65 6e 61 6d 65 20 62 79 20 6d 61 le.url...Change.a.filename.by.ma
3740 70 70 69 6e 67 20 55 52 4c 73 20 74 6f 20 6c 6f 63 61 6c 20 66 69 6c 65 6e 61 6d 65 73 20 61 73 pping.URLs.to.local.filenames.as
3760 20 73 65 74 0a 69 6e 20 60 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 70 72 6f 6a 65 63 74 2d 61 6c .set.in.`org-protocol-project-al
3780 69 73 74 27 2e 0a 0a 54 68 65 20 6c 6f 63 61 74 69 6f 6e 20 66 6f 72 20 61 20 62 72 6f 77 73 65 ist'...The.location.for.a.browse
37a0 72 27 73 20 62 6f 6f 6b 6d 61 72 6b 20 73 68 6f 75 6c 64 20 6c 6f 6f 6b 20 6c 69 6b 65 20 74 68 r's.bookmark.should.look.like.th
37c0 69 73 3a 0a 0a 20 20 6a 61 76 61 73 63 72 69 70 74 3a 6c 6f 63 61 74 69 6f 6e 2e 68 72 65 66 3d is:....javascript:location.href=
37e0 27 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 3a 2f 2f 6f 70 65 6e 2d 73 6f 75 72 63 65 3a 2f 2f 27 2b 'org-protocol://open-source://'+
3800 20 5c 0a 20 20 20 20 20 20 20 20 65 6e 63 6f 64 65 55 52 49 43 6f 6d 70 6f 6e 65 6e 74 28 6c 6f .\.........encodeURIComponent(lo
3820 63 61 74 69 6f 6e 2e 68 72 65 66 29 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 6f 72 67 2d 70 72 6f cation.href)..(defalias.'org-pro
3840 74 6f 63 6f 6c 2d 6f 70 65 6e 2d 73 6f 75 72 63 65 20 23 5b 28 66 6e 61 6d 65 29 20 22 5c 33 30 tocol-open-source.#[(fname)."\30
3860 33 5c 33 30 34 08 21 19 1a 5c 33 30 32 5c 33 30 35 5c 32 31 35 2a 5c 32 30 37 22 20 5b 66 6e 61 3\304.!..\302\305\215*\207".[fna
3880 6d 65 20 66 20 72 65 73 75 6c 74 20 6e 69 6c 20 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 75 6e 68 me.f.result.nil.org-protocol-unh
38a0 65 78 2d 73 74 72 69 6e 67 20 28 62 79 74 65 2d 63 6f 64 65 20 22 08 5c 33 30 36 19 5c 32 31 31 ex-string.(byte-code.".\306.\211
38c0 1a 5c 32 30 33 5c 32 36 32 00 5c 6e 40 11 5c 33 30 37 09 41 5c 33 31 30 5c 22 1b 5c 33 31 31 0b .\203\262.\n@.\307.A\310\".\311.
38e0 21 1c 5c 33 31 32 5c 66 0d 5c 22 5c 32 30 33 5c 32 35 32 00 5c 33 30 37 09 41 5c 33 31 33 5c 22 !.\312\f.\"\203\252.\307.A\313\"
3900 1e 1c 5c 33 30 37 09 41 5c 33 31 34 5c 22 1e 1d 5c 33 30 37 09 41 5c 33 31 35 5c 22 1e 1e 0d 5c ..\307.A\314\"..\307.A\315\"...\
3920 33 31 36 5c 33 31 32 5c 33 31 37 0d 5c 22 4f 1e 1f 5c 33 31 32 5c 66 0e 1f 5c 22 0b 47 5c 5c 1e 316\312\317.\"O..\312\f..\".G\\.
3940 20 5c 33 31 32 5c 33 31 31 0e 1d 21 0e 1f 5c 22 1e 21 0e 1c 0e 1f 0e 20 0e 21 4f 50 5c 32 31 31 .\312\311..!..\".!.......!OP\211
3960 1e 5c 22 0e 1e 50 1e 23 5c 33 32 30 0e 23 21 5c 32 30 34 5c 32 30 35 00 5c 33 32 31 5c 33 32 32 .\"..P.#\320.#!\204\205.\321\322
3980 0e 23 5c 22 5c 32 31 30 5c 33 30 37 09 41 5c 33 32 33 5c 22 5c 32 31 31 1e 24 5c 32 30 33 5c 32 .#\"\210\307.A\323\"\211.$\203\2
39a0 30 34 00 5c 33 32 31 5c 33 32 34 0e 24 5c 22 5c 32 31 30 5c 33 32 35 5c 33 32 36 0e 24 5c 22 5c 04.\321\324.$\"\210\325\326.$\"\
39c0 32 31 30 29 5c 33 32 37 0e 23 21 5c 32 30 33 5c 32 32 32 00 5c 33 33 30 5c 33 33 31 0e 23 5c 22 210)\327.#!\203\222.\330\331.#\"
39e0 5c 32 31 30 5c 33 32 30 0e 23 21 5c 32 30 33 5c 32 34 32 00 5c 33 32 31 5c 33 33 32 0e 23 5c 22 \210\320.#!\203\242.\321\332.#\"
3a00 5c 32 31 30 5c 32 30 32 5c 32 35 30 00 5c 33 32 31 5c 33 33 33 0e 23 5c 22 5c 32 31 30 2e 08 2a \210\202\250.\321\333.#\"\210..*
3a20 5c 6e 41 5c 32 31 31 12 5c 32 30 34 08 00 2a 0e 19 5c 32 30 37 22 20 5b 6f 72 67 2d 70 72 6f 74 \nA\211.\204..*..\207".[org-prot
3a40 6f 63 6f 6c 2d 70 72 6f 6a 65 63 74 2d 61 6c 69 73 74 20 70 72 6f 6c 69 73 74 20 23 31 3d 23 3a ocol-project-alist.prolist.#1=#:
3a60 2d 2d 63 6c 2d 64 6f 6c 69 73 74 2d 74 65 6d 70 2d 2d 20 62 61 73 65 2d 75 72 6c 20 77 73 65 61 --cl-dolist-temp--.base-url.wsea
3a80 72 63 68 20 66 20 6e 69 6c 20 70 6c 69 73 74 2d 67 65 74 20 3a 62 61 73 65 2d 75 72 6c 20 72 65 rch.f.nil.plist-get.:base-url.re
3aa0 67 65 78 70 2d 71 75 6f 74 65 20 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 3a 77 6f 72 6b 69 6e 67 gexp-quote.string-match.:working
3ac0 2d 64 69 72 65 63 74 6f 72 79 20 3a 6f 6e 6c 69 6e 65 2d 73 75 66 66 69 78 20 3a 77 6f 72 6b 69 -directory.:online-suffix.:worki
3ae0 6e 67 2d 73 75 66 66 69 78 20 30 20 22 5c 5c 28 5b 5c 5c 3f 23 5d 2e 2a 5c 5c 29 3f 24 22 20 66 ng-suffix.0."\\([\\?#].*\\)?$".f
3b00 69 6c 65 2d 65 78 69 73 74 73 2d 70 20 6d 65 73 73 61 67 65 20 22 46 69 6c 65 20 25 73 20 64 6f ile-exists-p.message."File.%s.do
3b20 65 73 20 6e 6f 74 20 65 78 69 73 74 2e 5c 6e 54 65 73 74 69 6e 67 20 66 6f 72 20 72 65 77 72 69 es.not.exist.\nTesting.for.rewri
3b40 74 74 65 6e 20 55 52 4c 73 2e 22 20 3a 72 65 77 72 69 74 65 73 20 22 52 65 77 72 69 74 65 73 20 tten.URLs.".:rewrites."Rewrites.
3b60 66 6f 75 6e 64 3a 20 25 53 22 20 6d 61 70 63 20 23 5b 28 72 65 77 72 69 74 65 29 20 22 5c 33 30 found:.%S".mapc.#[(rewrite)."\30
3b80 33 08 40 09 5c 22 5c 32 30 35 0f 00 5c 33 30 34 5c 33 30 35 5c 6e 08 41 50 5c 22 5c 32 30 37 22 3.@.\"\205..\304\305\n.AP\"\207"
3ba0 20 5b 72 65 77 72 69 74 65 20 66 32 20 77 64 69 72 20 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 74 .[rewrite.f2.wdir.string-match.t
3bc0 68 72 6f 77 20 72 65 73 75 6c 74 5d 20 34 20 22 54 72 79 20 74 6f 20 6d 61 74 63 68 20 61 20 72 hrow.result].4."Try.to.match.a.r
3be0 65 77 72 69 74 74 65 6e 20 55 52 4c 20 61 6e 64 20 6d 61 70 20 69 74 20 74 6f 20 61 20 72 65 61 ewritten.URL.and.map.it.to.a.rea
3c00 6c 20 66 69 6c 65 2e 22 5d 20 66 69 6c 65 2d 72 65 61 64 61 62 6c 65 2d 70 20 74 68 72 6f 77 20 l.file."].file-readable-p.throw.
3c20 72 65 73 75 6c 74 20 22 25 73 3a 20 70 65 72 6d 69 73 73 69 6f 6e 20 64 65 6e 69 65 64 21 22 20 result."%s:.permission.denied!".
3c40 22 25 73 3a 20 6e 6f 20 73 75 63 68 20 66 69 6c 65 20 6f 72 20 64 69 72 65 63 74 6f 72 79 2e 22 "%s:.no.such.file.or.directory."
3c60 20 77 64 69 72 20 73 74 72 69 70 2d 73 75 66 66 69 78 20 61 64 64 2d 73 75 66 66 69 78 20 66 31 .wdir.strip-suffix.add-suffix.f1
3c80 20 73 74 61 72 74 2d 70 6f 73 20 65 6e 64 2d 70 6f 73 20 66 32 20 74 68 65 2d 66 69 6c 65 20 72 .start-pos.end-pos.f2.the-file.r
3ca0 65 77 72 69 74 65 73 5d 20 36 29 5d 20 33 20 28 23 24 20 2e 20 31 34 30 36 38 29 5d 29 0a 23 40 ewrites].6)].3.(#$...14068)]).#@
3cc0 36 37 31 20 44 65 74 65 63 74 20 69 66 20 60 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 74 68 65 2d 671.Detect.if.`org-protocol-the-
3ce0 70 72 6f 74 6f 63 6f 6c 27 20 61 6e 64 20 61 20 6b 6e 6f 77 6e 20 73 75 62 2d 70 72 6f 74 6f 63 protocol'.and.a.known.sub-protoc
3d00 6f 6c 20 69 73 20 75 73 65 64 20 69 6e 20 66 6e 61 6d 65 2e 0a 53 75 62 2d 70 72 6f 74 6f 63 6f ol.is.used.in.fname..Sub-protoco
3d20 6c 73 20 61 72 65 20 72 65 67 69 73 74 65 72 65 64 20 69 6e 20 60 6f 72 67 2d 70 72 6f 74 6f 63 ls.are.registered.in.`org-protoc
3d40 6f 6c 2d 70 72 6f 74 6f 63 6f 6c 2d 61 6c 69 73 74 27 20 61 6e 64 0a 60 6f 72 67 2d 70 72 6f 74 ol-protocol-alist'.and.`org-prot
3d60 6f 63 6f 6c 2d 70 72 6f 74 6f 63 6f 6c 2d 61 6c 69 73 74 2d 64 65 66 61 75 6c 74 27 2e 0a 54 68 ocol-protocol-alist-default'..Th
3d80 69 73 20 69 73 2c 20 68 6f 77 20 74 68 65 20 6d 61 74 63 68 69 6e 67 20 69 73 20 64 6f 6e 65 3a is.is,.how.the.matching.is.done:
3da0 0a 0a 20 20 28 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 70 72 6f 74 6f 63 6f 6c 3a 2f 2b 73 75 ....(string-match."protocol:/+su
3dc0 62 2d 70 72 6f 74 6f 63 6f 6c 3a 2f 2b 22 20 2e 2e 2e 29 0a 0a 70 72 6f 74 6f 63 6f 6c 20 61 6e b-protocol:/+"....)..protocol.an
3de0 64 20 73 75 62 2d 70 72 6f 74 6f 63 6f 6c 20 61 72 65 20 72 65 67 65 78 70 2d 71 75 6f 74 65 64 d.sub-protocol.are.regexp-quoted
3e00 2e 0a 0a 49 66 20 61 20 6d 61 74 63 68 69 6e 67 20 70 72 6f 74 6f 63 6f 6c 20 69 73 20 66 6f 75 ...If.a.matching.protocol.is.fou
3e20 6e 64 2c 20 74 68 65 20 70 72 6f 74 6f 63 6f 6c 20 69 73 20 73 74 72 69 70 70 65 64 20 66 72 6f nd,.the.protocol.is.stripped.fro
3e40 6d 20 66 6e 61 6d 65 20 61 6e 64 20 74 68 65 0a 72 65 73 75 6c 74 20 69 73 20 70 61 73 73 65 64 m.fname.and.the.result.is.passed
3e60 20 74 6f 20 74 68 65 20 70 72 6f 74 6f 63 6f 6c 73 20 66 75 6e 63 74 69 6f 6e 20 61 73 20 74 68 .to.the.protocols.function.as.th
3e80 65 20 6f 6e 6c 79 20 70 61 72 61 6d 65 74 65 72 2e 20 49 66 20 74 68 65 0a 66 75 6e 63 74 69 6f e.only.parameter..If.the.functio
3ea0 6e 20 72 65 74 75 72 6e 73 20 6e 69 6c 2c 20 74 68 65 20 66 69 6c 65 6e 61 6d 65 20 69 73 20 72 n.returns.nil,.the.filename.is.r
3ec0 65 6d 6f 76 65 64 20 66 72 6f 6d 20 74 68 65 20 6c 69 73 74 20 6f 66 20 66 69 6c 65 6e 61 6d 65 emoved.from.the.list.of.filename
3ee0 73 0a 70 61 73 73 65 64 20 66 72 6f 6d 20 65 6d 61 63 73 63 6c 69 65 6e 74 20 74 6f 20 74 68 65 s.passed.from.emacsclient.to.the
3f00 20 73 65 72 76 65 72 2e 0a 49 66 20 74 68 65 20 66 75 6e 63 74 69 6f 6e 20 72 65 74 75 72 6e 73 .server..If.the.function.returns
3f20 20 61 20 6e 6f 6e 20 6e 69 6c 20 76 61 6c 75 65 2c 20 74 68 61 74 20 76 61 6c 75 65 20 69 73 20 .a.non.nil.value,.that.value.is.
3f40 70 61 73 73 65 64 20 74 6f 20 74 68 65 20 73 65 72 76 65 72 0a 61 73 20 66 69 6c 65 6e 61 6d 65 passed.to.the.server.as.filename
3f60 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 63 68 65 63 6b ...(defalias.'org-protocol-check
3f80 2d 66 69 6c 65 6e 61 6d 65 2d 66 6f 72 2d 70 72 6f 74 6f 63 6f 6c 20 23 5b 28 66 6e 61 6d 65 20 -filename-for-protocol.#[(fname.
3fa0 72 65 73 74 6f 66 66 69 6c 65 73 20 63 6c 69 65 6e 74 29 20 22 5c 33 30 33 08 09 5c 22 1a 5c 33 restoffiles.client)."\303..\".\3
3fc0 30 34 5c 33 30 35 5c 32 31 35 29 5c 32 30 37 22 20 5b 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 70 04\305\215)\207".[org-protocol-p
3fe0 72 6f 74 6f 63 6f 6c 2d 61 6c 69 73 74 20 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 70 72 6f 74 6f rotocol-alist.org-protocol-proto
4000 63 6f 6c 2d 61 6c 69 73 74 2d 64 65 66 61 75 6c 74 20 73 75 62 2d 70 72 6f 74 6f 63 6f 6c 73 20 col-alist-default.sub-protocols.
4020 61 70 70 65 6e 64 20 66 6e 61 6d 65 20 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 36 08 21 5c append.fname.(byte-code."\306.!\
4040 33 30 37 50 19 5c 33 31 30 09 5c 6e 5c 22 5c 32 30 33 5c 32 31 36 00 0b 5c 33 31 31 1c 5c 32 31 307P.\310.\n\"\203\216..\311.\21
4060 31 1d 5c 32 30 33 5c 32 31 35 00 0d 40 14 09 5c 33 30 36 5c 33 31 32 5c 66 41 5c 33 31 33 5c 22 1.\203\215..@..\306\312\fA\313\"
4080 21 5c 33 30 37 51 1e 16 5c 33 31 30 0e 16 5c 6e 5c 22 5c 32 30 33 5c 32 30 35 00 5c 33 31 32 5c !\307Q..\310..\n\"\203\205.\312\
40a0 66 41 5c 33 31 34 5c 22 1e 17 5c 33 31 32 5c 66 41 5c 33 31 35 5c 22 1e 18 5c 33 31 36 5c 6e 0e fA\314\"..\312\fA\315\"..\316\n.
40c0 16 5c 22 1e 19 0e 18 5c 32 30 33 4b 00 0e 1a 5c 32 30 32 53 00 0e 19 5c 32 31 31 1e 1b 41 40 29 .\"....\203K...\202S...\211..A@)
40e0 1e 1c 5c 33 31 32 5c 66 41 5c 33 31 37 5c 22 5c 32 30 33 64 00 5c 33 32 30 5c 33 32 31 21 5c 32 ..\312\fA\317\"\203d.\320\321!\2
4100 31 30 5c 33 32 32 20 5c 32 31 30 5c 33 32 33 0e 17 21 5c 32 30 33 5c 32 30 34 00 0e 18 5c 32 30 10\322.\210\323..!\203\204...\20
4120 34 79 00 5c 33 32 34 5c 33 30 32 0e 17 0e 1c 21 5c 22 5c 32 31 30 0e 17 0e 1c 21 5c 32 31 30 5c 4y.\324\302....!\"\210....!\210\
4140 33 32 34 5c 33 30 32 5c 33 32 35 5c 22 5c 32 31 30 2c 29 0d 41 5c 32 31 31 15 5c 32 30 34 15 00 324\302\325\"\210,).A\211.\204..
4160 2a 29 5c 6e 5c 32 30 37 22 20 5b 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 74 68 65 2d 70 72 6f 74 *)\n\207".[org-protocol-the-prot
4180 6f 63 6f 6c 20 74 68 65 2d 70 72 6f 74 6f 63 6f 6c 20 66 6e 61 6d 65 20 73 75 62 2d 70 72 6f 74 ocol.the-protocol.fname.sub-prot
41a0 6f 63 6f 6c 73 20 70 72 6f 6c 69 73 74 20 23 31 3d 23 3a 2d 2d 63 6c 2d 64 6f 6c 69 73 74 2d 74 ocols.prolist.#1=#:--cl-dolist-t
41c0 65 6d 70 2d 2d 20 72 65 67 65 78 70 2d 71 75 6f 74 65 20 22 3a 2f 2b 22 20 73 74 72 69 6e 67 2d emp--.regexp-quote.":/+".string-
41e0 6d 61 74 63 68 20 6e 69 6c 20 70 6c 69 73 74 2d 67 65 74 20 3a 70 72 6f 74 6f 63 6f 6c 20 3a 66 match.nil.plist-get.:protocol.:f
4200 75 6e 63 74 69 6f 6e 20 3a 67 72 65 65 64 79 20 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 3a 6b 69 unction.:greedy.split-string.:ki
4220 6c 6c 2d 63 6c 69 65 6e 74 20 6d 65 73 73 61 67 65 20 22 47 72 65 65 64 79 20 6f 72 67 2d 70 72 ll-client.message."Greedy.org-pr
4240 6f 74 6f 63 6f 6c 20 68 61 6e 64 6c 65 72 2e 20 4b 69 6c 6c 69 6e 67 20 63 6c 69 65 6e 74 2e 22 otocol.handler..Killing.client."
4260 20 73 65 72 76 65 72 2d 65 64 69 74 20 66 62 6f 75 6e 64 70 20 74 68 72 6f 77 20 74 20 70 72 6f .server-edit.fboundp.throw.t.pro
4280 74 6f 20 66 75 6e 63 20 67 72 65 65 64 79 20 73 70 6c 69 74 74 65 64 20 72 65 73 74 6f 66 66 69 to.func.greedy.splitted.restoffi
42a0 6c 65 73 20 78 20 72 65 73 75 6c 74 5d 20 36 29 5d 20 33 20 28 23 24 20 2e 20 31 35 35 35 36 29 les.x.result].6)].3.(#$...15556)
42c0 5d 29 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 5c ]).(byte-code."\300\301\302\303\
42e0 33 30 34 24 5c 32 31 30 5c 33 30 35 5c 33 30 31 5c 33 30 34 5c 22 5c 32 30 37 22 20 5b 61 64 2d 304$\210\305\301\304\"\207".[ad-
4300 61 64 64 2d 61 64 76 69 63 65 20 73 65 72 76 65 72 2d 76 69 73 69 74 2d 66 69 6c 65 73 20 28 6f add-advice.server-visit-files.(o
4320 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 64 65 74 65 63 74 2d 70 72 6f 74 6f 63 6f 6c 2d 73 65 72 76 rg-protocol-detect-protocol-serv
4340 65 72 20 6e 69 6c 20 74 20 28 61 64 76 69 63 65 20 6c 61 6d 62 64 61 20 6e 69 6c 20 22 41 64 76 er.nil.t.(advice.lambda.nil."Adv
4360 69 63 65 20 73 65 72 76 65 72 2d 76 69 73 69 74 2d 66 6c 69 73 74 20 74 6f 20 63 61 6c 6c 20 60 ice.server-visit-flist.to.call.`
4380 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 6d 6f 64 69 66 79 2d 66 69 6c 65 6e 61 6d 65 2d 66 6f 72 org-protocol-modify-filename-for
43a0 2d 70 72 6f 74 6f 63 6f 6c 27 2e 22 20 28 6c 65 74 20 28 28 66 6c 69 73 74 20 28 69 66 20 6f 72 -protocol'.".(let.((flist.(if.or
43c0 67 2d 70 72 6f 74 6f 63 6f 6c 2d 72 65 76 65 72 73 65 2d 6c 69 73 74 2d 6f 66 2d 66 69 6c 65 73 g-protocol-reverse-list-of-files
43e0 20 28 72 65 76 65 72 73 65 20 28 61 64 2d 67 65 74 2d 61 72 67 20 30 29 29 20 28 61 64 2d 67 65 .(reverse.(ad-get-arg.0)).(ad-ge
4400 74 2d 61 72 67 20 30 29 29 29 20 28 63 6c 69 65 6e 74 20 28 61 64 2d 67 65 74 2d 61 72 67 20 31 t-arg.0))).(client.(ad-get-arg.1
4420 29 29 29 20 28 63 61 74 63 68 20 27 67 72 65 65 64 79 20 28 64 6f 6c 69 73 74 20 28 76 61 72 20 ))).(catch.'greedy.(dolist.(var.
4440 66 6c 69 73 74 29 20 28 6c 65 74 20 28 28 66 6e 61 6d 65 20 28 65 78 70 61 6e 64 2d 66 69 6c 65 flist).(let.((fname.(expand-file
4460 2d 6e 61 6d 65 20 28 63 61 72 20 76 61 72 29 29 29 29 20 28 73 65 74 71 20 66 6e 61 6d 65 20 28 -name.(car.var)))).(setq.fname.(
4480 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 63 68 65 63 6b 2d 66 69 6c 65 6e 61 6d 65 2d 66 6f 72 2d org-protocol-check-filename-for-
44a0 70 72 6f 74 6f 63 6f 6c 20 66 6e 61 6d 65 20 28 6d 65 6d 62 65 72 20 76 61 72 20 66 6c 69 73 74 protocol.fname.(member.var.flist
44c0 29 20 63 6c 69 65 6e 74 29 29 20 28 69 66 20 28 65 71 20 66 6e 61 6d 65 20 74 29 20 28 70 72 6f ).client)).(if.(eq.fname.t).(pro
44e0 67 6e 20 28 61 64 2d 73 65 74 2d 61 72 67 20 30 20 6e 69 6c 29 20 28 74 68 72 6f 77 20 27 67 72 gn.(ad-set-arg.0.nil).(throw.'gr
4500 65 65 64 79 20 74 29 29 20 28 69 66 20 28 73 74 72 69 6e 67 70 20 66 6e 61 6d 65 29 20 28 73 65 eedy.t)).(if.(stringp.fname).(se
4520 74 63 61 72 20 76 61 72 20 66 6e 61 6d 65 29 20 28 61 64 2d 73 65 74 2d 61 72 67 20 30 20 28 64 tcar.var.fname).(ad-set-arg.0.(d
4540 65 6c 71 20 76 61 72 20 28 61 64 2d 67 65 74 2d 61 72 67 20 30 29 29 29 29 29 29 29 29 29 29 29 elq.var.(ad-get-arg.0)))))))))))
4560 20 62 65 66 6f 72 65 20 6e 69 6c 20 61 64 2d 61 63 74 69 76 61 74 65 5d 20 35 29 0a 23 40 32 33 .before.nil.ad-activate].5).#@23
4580 35 20 43 72 65 61 74 65 20 61 20 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 20 70 72 6f 6a 65 63 74 20 5.Create.a.org-protocol.project.
45a0 66 6f 72 20 74 68 65 20 63 75 72 72 65 6e 74 20 66 69 6c 65 27 73 20 4f 72 67 2d 6d 6f 64 65 20 for.the.current.file's.Org-mode.
45c0 70 72 6f 6a 65 63 74 2e 0a 54 68 69 73 20 77 6f 72 6b 73 2c 20 69 66 20 74 68 65 20 66 69 6c 65 project..This.works,.if.the.file
45e0 20 76 69 73 69 74 65 64 20 69 73 20 70 61 72 74 20 6f 66 20 61 20 70 75 62 6c 69 73 68 69 6e 67 .visited.is.part.of.a.publishing
4600 20 70 72 6f 6a 65 63 74 20 69 6e 0a 60 6f 72 67 2d 70 75 62 6c 69 73 68 2d 70 72 6f 6a 65 63 74 .project.in.`org-publish-project
4620 2d 61 6c 69 73 74 27 2e 20 20 54 68 69 73 20 66 75 6e 63 74 69 6f 6e 20 63 61 6c 6c 73 20 60 6f -alist'...This.function.calls.`o
4640 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 63 72 65 61 74 65 27 20 74 6f 20 64 6f 0a 6d 6f 73 74 20 6f rg-protocol-create'.to.do.most.o
4660 66 20 74 68 65 20 77 6f 72 6b 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 6f 72 67 2d 70 72 6f 74 f.the.work...(defalias.'org-prot
4680 6f 63 6f 6c 2d 63 72 65 61 74 65 2d 66 6f 72 2d 6f 72 67 20 23 5b 6e 69 6c 20 22 5c 33 30 32 5c ocol-create-for-org.#[nil."\302\
46a0 33 30 33 21 5c 32 31 30 5c 33 30 34 08 21 5c 32 31 31 19 5c 32 30 33 13 00 5c 33 30 35 09 41 21 303!\210\304.!\211.\203..\305.A!
46c0 5c 32 30 32 19 00 5c 33 30 36 5c 33 30 37 5c 33 31 30 5c 33 31 31 21 5c 22 29 5c 32 30 37 22 20 \202..\306\307\310\311!\")\207".
46e0 5b 62 75 66 66 65 72 2d 66 69 6c 65 2d 6e 61 6d 65 20 61 6c 6c 20 72 65 71 75 69 72 65 20 6f 72 [buffer-file-name.all.require.or
4700 67 2d 70 75 62 6c 69 73 68 20 6f 72 67 2d 70 75 62 6c 69 73 68 2d 67 65 74 2d 70 72 6f 6a 65 63 g-publish.org-publish-get-projec
4720 74 2d 66 72 6f 6d 2d 66 69 6c 65 6e 61 6d 65 20 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 63 72 65 t-from-filename.org-protocol-cre
4740 61 74 65 20 6d 65 73 73 61 67 65 20 22 4e 6f 74 20 69 6e 20 61 6e 20 6f 72 67 2d 70 72 6f 6a 65 ate.message."Not.in.an.org-proje
4760 63 74 2e 20 44 69 64 20 6d 65 61 6e 20 25 73 3f 22 20 73 75 62 73 74 69 74 75 74 65 2d 63 6f 6d ct..Did.mean.%s?".substitute-com
4780 6d 61 6e 64 2d 6b 65 79 73 20 22 5c 5c 5b 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 63 72 65 61 74 mand-keys."\\[org-protocol-creat
47a0 65 5d 22 5d 20 35 20 28 23 24 20 2e 20 31 37 37 39 34 29 20 6e 69 6c 5d 29 0a 23 40 33 37 31 20 e]"].5.(#$...17794).nil]).#@371.
47c0 43 72 65 61 74 65 20 61 20 6e 65 77 20 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 20 70 72 6f 6a 65 63 Create.a.new.org-protocol.projec
47e0 74 20 69 6e 74 65 72 61 63 74 69 76 65 6c 79 2e 0a 41 6e 20 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c t.interactively..An.org-protocol
4800 20 70 72 6f 6a 65 63 74 20 69 73 20 61 6e 20 65 6e 74 72 79 20 69 6e 20 60 6f 72 67 2d 70 72 6f .project.is.an.entry.in.`org-pro
4820 74 6f 63 6f 6c 2d 70 72 6f 6a 65 63 74 2d 61 6c 69 73 74 27 0a 77 68 69 63 68 20 69 73 20 75 73 tocol-project-alist'.which.is.us
4840 65 64 20 62 79 20 60 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 6f 70 65 6e 2d 73 6f 75 72 63 65 27 ed.by.`org-protocol-open-source'
4860 2e 0a 4f 70 74 69 6f 6e 61 6c 6c 79 20 75 73 65 20 70 72 6f 6a 65 63 74 2d 70 6c 69 73 74 20 74 ..Optionally.use.project-plist.t
4880 6f 20 69 6e 69 74 69 61 6c 69 7a 65 20 74 68 65 20 64 65 66 61 75 6c 74 73 20 66 6f 72 20 74 68 o.initialize.the.defaults.for.th
48a0 69 73 20 70 72 6f 6a 65 63 74 2e 20 49 66 0a 70 72 6f 6a 65 63 74 2d 70 6c 69 73 74 20 69 73 20 is.project..If.project-plist.is.
48c0 74 68 65 20 43 44 52 20 6f 66 20 61 6e 20 65 6c 65 6d 65 6e 74 20 69 6e 20 60 6f 72 67 2d 70 75 the.CDR.of.an.element.in.`org-pu
48e0 62 6c 69 73 68 2d 70 72 6f 6a 65 63 74 2d 61 6c 69 73 74 27 2c 20 72 65 75 73 65 0a 3a 62 61 73 blish-project-alist',.reuse.:bas
4900 65 2d 64 69 72 65 63 74 6f 72 79 2c 20 3a 68 74 6d 6c 2d 65 78 74 65 6e 73 69 6f 6e 20 61 6e 64 e-directory,.:html-extension.and
4920 20 3a 62 61 73 65 2d 65 78 74 65 6e 73 69 6f 6e 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 6f 72 .:base-extension...(defalias.'or
4940 67 2d 70 72 6f 74 6f 63 6f 6c 2d 63 72 65 61 74 65 20 23 5b 28 26 6f 70 74 69 6f 6e 61 6c 20 70 g-protocol-create.#[(&optional.p
4960 72 6f 6a 65 63 74 2d 70 6c 69 73 74 29 20 22 5c 33 30 36 5c 33 30 37 08 5c 33 31 30 5c 22 5c 32 roject-plist)."\306\307.\310\"\2
4980 30 36 09 00 09 21 5c 33 31 31 5c 33 30 37 08 5c 33 31 32 5c 22 5c 32 30 36 13 00 5c 33 31 33 5c 06...!\311\307.\312\"\206..\313\
49a0 33 30 37 08 5c 33 31 34 5c 22 5c 32 30 33 23 00 5c 33 31 35 5c 33 30 37 08 5c 33 31 34 5c 22 50 307.\314\"\203#.\315\307.\314\"P
49c0 5c 32 30 32 24 00 5c 33 31 36 5c 33 31 37 5c 33 32 30 5c 33 31 37 1a 1b 1c 1d 1e 23 1e 24 1e 25 \202$.\316\317\320\317.....#.$.%
49e0 5c 33 32 31 5c 33 32 32 0e 24 5c 33 31 37 0e 24 5c 33 32 30 25 16 24 5c 33 32 33 5c 33 32 34 0e \321\322.$\317.$\320%.$\323\324.
4a00 24 5c 22 5c 32 30 34 4a 00 0e 24 5c 33 32 35 50 16 24 5c 33 30 36 5c 33 32 36 5c 33 32 37 0e 25 $\"\204J..$\325P.$\306\326\327.%
4a20 5c 32 31 31 5c 33 32 30 24 21 16 25 5c 33 32 33 5c 33 32 34 0e 25 5c 22 5c 32 30 34 63 00 0e 25 \211\320$!.%\323\324.%\"\204c..%
4a40 5c 33 32 35 50 16 25 5c 33 32 31 5c 33 33 30 0e 23 5c 33 33 31 51 0e 23 5c 33 31 37 0e 23 5c 33 \325P.%\321\330.#\331Q.#\317.#\3
4a60 32 30 25 16 23 5c 33 32 31 5c 33 33 32 0d 5c 33 33 31 51 0d 5c 33 31 37 0d 5c 33 32 30 25 15 5c 20%.#\321\332.\331Q.\317.\320%.\
4a80 33 33 33 5c 33 33 34 21 5c 32 30 35 5c 32 33 34 00 0e 24 5c 33 33 35 0e 24 5c 33 33 36 0e 25 5c 333\334!\205\234..$\335.$\336.%\
4aa0 33 33 37 0e 23 5c 33 34 30 0d 5c 32 35 37 09 0e 5c 22 42 16 5c 22 5c 33 34 31 5c 33 34 32 0e 5c 337.#\340.\257..\"B.\"\341\342.\
4ac0 22 5c 22 2e 07 5c 32 30 37 22 20 5b 70 72 6f 6a 65 63 74 2d 70 6c 69 73 74 20 64 65 66 61 75 6c "\"..\207".[project-plist.defaul
4ae0 74 2d 64 69 72 65 63 74 6f 72 79 20 6d 69 6e 69 62 75 66 66 65 72 2d 61 6c 6c 6f 77 2d 74 65 78 t-directory.minibuffer-allow-tex
4b00 74 2d 70 72 6f 70 65 72 74 69 65 73 20 69 6e 73 65 72 74 2d 64 65 66 61 75 6c 74 2d 64 69 72 65 t-properties.insert-default-dire
4b20 63 74 6f 72 79 20 77 6f 72 67 6c 65 74 2d 62 75 66 66 65 72 20 77 6f 72 6b 69 6e 67 2d 73 75 66 ctory.worglet-buffer.working-suf
4b40 66 69 78 20 65 78 70 61 6e 64 2d 66 69 6c 65 2d 6e 61 6d 65 20 70 6c 69 73 74 2d 67 65 74 20 3a fix.expand-file-name.plist-get.:
4b60 62 61 73 65 2d 64 69 72 65 63 74 6f 72 79 20 22 68 74 74 70 3a 2f 2f 6f 72 67 6d 6f 64 65 2e 6f base-directory."http://orgmode.o
4b80 72 67 2f 77 6f 72 67 2f 22 20 3a 68 74 6d 6c 2d 65 78 74 65 6e 73 69 6f 6e 20 22 2e 68 74 6d 6c rg/worg/".:html-extension.".html
4ba0 22 20 3a 62 61 73 65 2d 65 78 74 65 6e 73 69 6f 6e 20 22 2e 22 20 22 2e 6f 72 67 22 20 6e 69 6c ".:base-extension.".".".org".nil
4bc0 20 74 20 72 65 61 64 2d 73 74 72 69 6e 67 20 22 42 61 73 65 20 55 52 4c 20 6f 66 20 70 75 62 6c .t.read-string."Base.URL.of.publ
4be0 69 73 68 65 64 20 63 6f 6e 74 65 6e 74 3a 20 22 20 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 5c ished.content:.".string-match."\
4c00 5c 2f 24 22 20 22 2f 22 20 72 65 61 64 2d 64 69 72 65 63 74 6f 72 79 2d 6e 61 6d 65 20 22 4c 6f \/$"."/".read-directory-name."Lo
4c20 63 61 6c 20 77 6f 72 6b 69 6e 67 20 64 69 72 65 63 74 6f 72 79 3a 20 22 20 22 45 78 74 65 6e 73 cal.working.directory:."."Extens
4c40 69 6f 6e 20 74 6f 20 73 74 72 69 70 20 66 72 6f 6d 20 70 75 62 6c 69 73 68 65 64 20 55 52 4c 73 ion.to.strip.from.published.URLs
4c60 20 28 22 20 22 29 3a 20 22 20 22 45 78 74 65 6e 73 69 6f 6e 20 6f 66 20 65 64 69 74 61 62 6c 65 .("."):."."Extension.of.editable
4c80 20 66 69 6c 65 73 20 28 22 20 79 65 73 2d 6f 72 2d 6e 6f 2d 70 20 22 53 61 76 65 20 74 68 65 20 .files.(".yes-or-no-p."Save.the.
4ca0 6e 65 77 20 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 70 72 6f 6a 65 63 74 20 74 6f 20 79 6f 75 72 new.org-protocol-project.to.your
4cc0 20 69 6e 69 74 20 66 69 6c 65 3f 20 22 20 3a 62 61 73 65 2d 75 72 6c 20 3a 77 6f 72 6b 69 6e 67 .init.file?.".:base-url.:working
4ce0 2d 64 69 72 65 63 74 6f 72 79 20 3a 6f 6e 6c 69 6e 65 2d 73 75 66 66 69 78 20 3a 77 6f 72 6b 69 -directory.:online-suffix.:worki
4d00 6e 67 2d 73 75 66 66 69 78 20 63 75 73 74 6f 6d 69 7a 65 2d 73 61 76 65 2d 76 61 72 69 61 62 6c ng-suffix.customize-save-variabl
4d20 65 20 6f 72 67 2d 70 72 6f 74 6f 63 6f 6c 2d 70 72 6f 6a 65 63 74 2d 61 6c 69 73 74 20 73 74 72 e.org-protocol-project-alist.str
4d40 69 70 2d 73 75 66 66 69 78 20 62 61 73 65 2d 75 72 6c 20 77 6f 72 6b 69 6e 67 2d 64 69 72 5d 20 ip-suffix.base-url.working-dir].
4d60 39 20 28 23 24 20 2e 20 31 38 33 36 38 29 20 6e 69 6c 5d 29 0a 28 70 72 6f 76 69 64 65 20 27 6f 9.(#$...18368).nil]).(provide.'o
4d80 72 67 2d 70 72 6f 74 6f 63 6f 6c 29 0a rg-protocol).