ofs | hex dump | ascii |
---|
0000 | 3b 45 4c 43 17 00 00 00 0a 3b 3b 3b 20 43 6f 6d 70 69 6c 65 64 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 36 3a 35 38 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 | :56:58.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 62 | luke/.emacs.d/org-7.4/lisp/org-b |
0080 | 62 64 62 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 32 33 2e 31 | bdb.el.;;;.in.Emacs.version.23.1 |
00a0 | 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 73 2e 0a 0a | .1.;;;.with.all.optimizations... |
00c0 | 3b 3b 3b 20 54 68 69 73 20 66 69 6c 65 20 75 73 65 73 20 64 79 6e 61 6d 69 63 20 64 6f 63 73 74 | ;;;.This.file.uses.dynamic.docst |
00e0 | 72 69 6e 67 73 2c 20 66 69 72 73 74 20 61 64 64 65 64 20 69 6e 20 45 6d 61 63 73 20 31 39 2e 32 | rings,.first.added.in.Emacs.19.2 |
0100 | 39 2e 0a 28 69 66 20 28 61 6e 64 20 28 62 6f 75 6e 64 70 20 27 65 6d 61 63 73 2d 76 65 72 73 69 | 9..(if.(and.(boundp.'emacs-versi |
0120 | 6f 6e 29 0a 09 20 28 3c 20 28 61 72 65 66 20 65 6d 61 63 73 2d 76 65 72 73 69 6f 6e 20 28 31 2d | on)...(<.(aref.emacs-version.(1- |
0140 | 20 28 6c 65 6e 67 74 68 20 65 6d 61 63 73 2d 76 65 72 73 69 6f 6e 29 29 29 20 3f 41 29 0a 09 20 | .(length.emacs-version))).?A)... |
0160 | 28 6f 72 20 28 61 6e 64 20 28 62 6f 75 6e 64 70 20 27 65 70 6f 63 68 3a 3a 76 65 72 73 69 6f 6e | (or.(and.(boundp.'epoch::version |
0180 | 29 20 65 70 6f 63 68 3a 3a 76 65 72 73 69 6f 6e 29 0a 09 20 20 20 20 20 28 73 74 72 69 6e 67 2d | ).epoch::version).......(string- |
01a0 | 6c 65 73 73 70 20 65 6d 61 63 73 2d 76 65 72 73 69 6f 6e 20 22 31 39 2e 32 39 22 29 29 29 0a 20 | lessp.emacs-version."19.29"))).. |
01c0 | 20 20 20 28 65 72 72 6f 72 20 22 60 6f 72 67 2d 62 62 64 62 2e 65 6c 27 20 77 61 73 20 63 6f 6d | ...(error."`org-bbdb.el'.was.com |
01e0 | 70 69 6c 65 64 20 66 6f 72 20 45 6d 61 63 73 20 31 39 2e 32 39 20 6f 72 20 6c 61 74 65 72 22 29 | piled.for.Emacs.19.29.or.later") |
0200 | 29 0a 0a 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b | )..;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
0220 | 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b 3b | ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; |
0240 | 3b 3b 3b 3b 3b 3b 0a 0a 0a 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 30 5c 33 30 31 21 5c 32 | ;;;;;;...(byte-code."\300\301!\2 |
0260 | 31 30 5c 33 30 32 5c 33 30 33 5c 33 30 34 5c 33 30 35 5c 33 30 36 5c 33 30 37 25 5c 32 30 37 22 | 10\302\303\304\305\306\307%\207" |
0280 | 20 5b 72 65 71 75 69 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 | .[require.org.custom-declare-gro |
02a0 | 75 70 20 6f 72 67 2d 62 62 64 62 2d 61 6e 6e 69 76 65 72 73 61 72 69 65 73 20 6e 69 6c 20 22 43 | up.org-bbdb-anniversaries.nil."C |
02c0 | 75 73 74 6f 6d 69 7a 61 74 69 6f 6e 73 20 66 6f 72 20 69 6e 63 6c 75 64 69 6e 67 20 61 6e 6e 69 | ustomizations.for.including.anni |
02e0 | 76 65 72 73 61 72 69 65 73 20 66 72 6f 6d 20 42 42 44 42 20 69 6e 74 6f 20 41 67 65 6e 64 61 2e | versaries.from.BBDB.into.Agenda. |
0300 | 22 20 3a 67 72 6f 75 70 20 6f 72 67 2d 62 62 64 62 5d 20 36 29 0a 23 40 32 38 20 44 65 66 61 75 | ".:group.org-bbdb].6).#@28.Defau |
0320 | 6c 74 20 61 6e 6e 69 76 65 72 73 61 72 79 20 63 6c 61 73 73 2e 1f 0a 28 63 75 73 74 6f 6d 2d 64 | lt.anniversary.class...(custom-d |
0340 | 65 63 6c 61 72 65 2d 76 61 72 69 61 62 6c 65 20 27 6f 72 67 2d 62 62 64 62 2d 64 65 66 61 75 6c | eclare-variable.'org-bbdb-defaul |
0360 | 74 2d 61 6e 6e 69 76 65 72 73 61 72 79 2d 66 6f 72 6d 61 74 20 27 22 62 69 72 74 68 64 61 79 22 | t-anniversary-format.'"birthday" |
0380 | 20 27 28 23 24 20 2e 20 37 39 35 29 20 3a 74 79 70 65 20 27 73 74 72 69 6e 67 20 3a 67 72 6f 75 | .'(#$...795).:type.'string.:grou |
03a0 | 70 20 27 6f 72 67 2d 62 62 64 62 2d 61 6e 6e 69 76 65 72 73 61 72 69 65 73 20 3a 72 65 71 75 69 | p.'org-bbdb-anniversaries.:requi |
03c0 | 72 65 20 27 62 62 64 62 29 0a 23 40 36 33 35 20 48 6f 77 20 64 69 66 66 65 72 65 6e 74 20 74 79 | re.'bbdb).#@635.How.different.ty |
03e0 | 70 65 73 20 6f 66 20 61 6e 6e 69 76 65 72 73 61 72 69 65 73 20 73 68 6f 75 6c 64 20 62 65 20 66 | pes.of.anniversaries.should.be.f |
0400 | 6f 72 6d 61 74 74 65 64 2e 0a 41 6e 20 61 6c 69 73 74 20 6f 66 20 65 6c 65 6d 65 6e 74 73 20 28 | ormatted..An.alist.of.elements.( |
0420 | 53 54 52 49 4e 47 20 2e 20 46 4f 52 4d 41 54 29 20 77 68 65 72 65 20 53 54 52 49 4e 47 20 69 73 | STRING...FORMAT).where.STRING.is |
0440 | 20 74 68 65 20 6e 61 6d 65 20 6f 66 20 61 6e 0a 61 6e 6e 69 76 65 72 73 61 72 79 20 63 6c 61 73 | .the.name.of.an.anniversary.clas |
0460 | 73 20 61 6e 64 20 66 6f 72 6d 61 74 20 69 73 20 65 69 74 68 65 72 3a 0a 31 29 20 41 20 66 6f 72 | s.and.format.is.either:.1).A.for |
0480 | 6d 61 74 20 73 74 72 69 6e 67 20 77 69 74 68 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 73 75 | mat.string.with.the.following.su |
04a0 | 62 73 74 69 74 75 74 69 6f 6e 73 20 28 69 6e 20 6f 72 64 65 72 29 3a 0a 20 20 20 20 2a 20 74 68 | bstitutions.(in.order):.....*.th |
04c0 | 65 20 6e 61 6d 65 20 6f 66 20 74 68 65 20 72 65 63 6f 72 64 20 63 6f 6e 74 61 69 6e 69 6e 67 20 | e.name.of.the.record.containing. |
04e0 | 74 68 69 73 20 61 6e 6e 69 76 65 72 73 61 72 79 0a 20 20 20 20 2a 20 74 68 65 20 6e 75 6d 62 65 | this.anniversary.....*.the.numbe |
0500 | 72 20 6f 66 20 79 65 61 72 73 0a 20 20 20 20 2a 20 61 6e 20 6f 72 64 69 6e 61 6c 20 73 75 66 66 | r.of.years.....*.an.ordinal.suff |
0520 | 69 78 20 28 73 74 2c 20 6e 64 2c 20 72 64 2c 20 74 68 29 20 66 6f 72 20 74 68 65 20 79 65 61 72 | ix.(st,.nd,.rd,.th).for.the.year |
0540 | 0a 0a 32 29 20 41 20 66 75 6e 63 74 69 6f 6e 20 74 6f 20 62 65 20 63 61 6c 6c 65 64 20 77 69 74 | ..2).A.function.to.be.called.wit |
0560 | 68 20 74 68 72 65 65 20 61 72 67 75 6d 65 6e 74 73 3a 20 4e 41 4d 45 20 59 45 41 52 53 20 53 55 | h.three.arguments:.NAME.YEARS.SU |
0580 | 46 46 49 58 0a 20 20 20 28 73 74 72 69 6e 67 20 69 6e 74 20 73 74 72 69 6e 67 29 20 72 65 74 75 | FFIX....(string.int.string).retu |
05a0 | 72 6e 69 6e 67 20 61 20 73 74 72 69 6e 67 20 66 6f 72 20 74 68 65 20 64 69 61 72 79 20 6f 72 20 | rning.a.string.for.the.diary.or. |
05c0 | 6e 69 6c 2e 0a 0a 33 29 20 41 6e 20 45 6d 61 63 73 20 4c 69 73 70 20 66 6f 72 6d 20 74 68 61 74 | nil...3).An.Emacs.Lisp.form.that |
05e0 | 20 73 68 6f 75 6c 64 20 65 76 61 6c 75 61 74 65 20 74 6f 20 61 20 73 74 72 69 6e 67 20 28 6f 72 | .should.evaluate.to.a.string.(or |
0600 | 20 6e 69 6c 29 20 69 6e 20 74 68 65 0a 20 20 20 73 63 6f 70 65 20 6f 66 20 76 61 72 69 61 62 6c | .nil).in.the....scope.of.variabl |
0620 | 65 73 20 4e 41 4d 45 2c 20 59 45 41 52 53 20 61 6e 64 20 53 55 46 46 49 58 20 28 61 6d 6f 6e 67 | es.NAME,.YEARS.and.SUFFIX.(among |
0640 | 20 6f 74 68 65 72 73 29 2e 1f 0a 28 63 75 73 74 6f 6d 2d 64 65 63 6c 61 72 65 2d 76 61 72 69 61 | .others)...(custom-declare-varia |
0660 | 62 6c 65 20 27 6f 72 67 2d 62 62 64 62 2d 61 6e 6e 69 76 65 72 73 61 72 79 2d 66 6f 72 6d 61 74 | ble.'org-bbdb-anniversary-format |
0680 | 2d 61 6c 69 73 74 20 27 27 28 28 22 62 69 72 74 68 64 61 79 22 20 6c 61 6d 62 64 61 20 28 6e 61 | -alist.''(("birthday".lambda.(na |
06a0 | 6d 65 20 79 65 61 72 73 20 73 75 66 66 69 78 29 20 28 63 6f 6e 63 61 74 20 22 42 69 72 74 68 64 | me.years.suffix).(concat."Birthd |
06c0 | 61 79 3a 20 5b 5b 62 62 64 62 3a 22 20 6e 61 6d 65 20 22 5d 5b 22 20 6e 61 6d 65 20 22 20 28 22 | ay:.[[bbdb:".name."][".name.".(" |
06e0 | 20 28 6e 75 6d 62 65 72 2d 74 6f 2d 73 74 72 69 6e 67 20 79 65 61 72 73 29 20 73 75 66 66 69 78 | .(number-to-string.years).suffix |
0700 | 20 22 29 5d 5d 22 29 29 20 28 22 77 65 64 64 69 6e 67 22 20 6c 61 6d 62 64 61 20 28 6e 61 6d 65 | .")]]")).("wedding".lambda.(name |
0720 | 20 79 65 61 72 73 20 73 75 66 66 69 78 29 20 28 63 6f 6e 63 61 74 20 22 5b 5b 62 62 64 62 3a 22 | .years.suffix).(concat."[[bbdb:" |
0740 | 20 6e 61 6d 65 20 22 5d 5b 22 20 6e 61 6d 65 20 22 27 73 20 22 20 28 6e 75 6d 62 65 72 2d 74 6f | .name."][".name."'s.".(number-to |
0760 | 2d 73 74 72 69 6e 67 20 79 65 61 72 73 29 20 73 75 66 66 69 78 20 22 20 77 65 64 64 69 6e 67 20 | -string.years).suffix.".wedding. |
0780 | 61 6e 6e 69 76 65 72 73 61 72 79 5d 5d 22 29 29 29 20 27 28 23 24 20 2e 20 39 37 36 29 20 3a 74 | anniversary]]"))).'(#$...976).:t |
07a0 | 79 70 65 20 27 73 65 78 70 20 3a 67 72 6f 75 70 20 27 6f 72 67 2d 62 62 64 62 2d 61 6e 6e 69 76 | ype.'sexp.:group.'org-bbdb-anniv |
07c0 | 65 72 73 61 72 69 65 73 20 3a 72 65 71 75 69 72 65 20 27 62 62 64 62 29 0a 23 40 34 34 36 20 54 | ersaries.:require.'bbdb).#@446.T |
07e0 | 68 65 20 42 42 44 42 20 66 69 65 6c 64 20 77 68 69 63 68 20 63 6f 6e 74 61 69 6e 73 20 61 6e 6e | he.BBDB.field.which.contains.ann |
0800 | 69 76 65 72 73 61 72 69 65 73 2e 0a 54 68 65 20 61 6e 6e 69 76 65 72 73 61 72 69 65 73 20 61 72 | iversaries..The.anniversaries.ar |
0820 | 65 20 73 74 6f 72 65 64 20 69 6e 20 74 68 65 20 66 6f 6c 6c 6f 77 69 6e 67 20 66 6f 72 6d 61 74 | e.stored.in.the.following.format |
0840 | 0a 0a 59 59 59 59 2d 4d 4d 2d 44 44 20 43 6c 61 73 73 2d 6f 72 2d 46 6f 72 6d 61 74 2d 53 74 72 | ..YYYY-MM-DD.Class-or-Format-Str |
0860 | 69 6e 67 0a 0a 77 68 65 72 65 20 63 6c 61 73 73 20 69 73 20 6f 6e 65 20 6f 66 20 74 68 65 20 63 | ing..where.class.is.one.of.the.c |
0880 | 75 73 74 6f 6d 69 7a 65 64 20 63 6c 61 73 73 65 73 20 66 6f 72 20 61 6e 6e 69 76 65 72 73 61 72 | ustomized.classes.for.anniversar |
08a0 | 69 65 73 3b 0a 62 69 72 74 68 64 61 79 20 61 6e 64 20 77 65 64 64 69 6e 67 20 61 72 65 20 70 72 | ies;.birthday.and.wedding.are.pr |
08c0 | 65 64 65 66 69 6e 65 64 2e 20 20 46 6f 72 6d 61 74 2d 53 74 72 69 6e 67 20 63 61 6e 20 74 61 6b | edefined...Format-String.can.tak |
08e0 | 65 20 74 68 72 65 65 0a 73 75 62 73 74 69 74 75 74 69 6f 6e 73 20 31 29 20 74 68 65 20 6e 61 6d | e.three.substitutions.1).the.nam |
0900 | 65 20 6f 66 20 74 68 65 20 72 65 63 6f 72 64 20 63 6f 6e 74 61 69 6e 69 6e 67 20 74 68 69 73 0a | e.of.the.record.containing.this. |
0920 | 61 6e 6e 69 76 65 72 73 61 72 79 2c 20 32 29 20 74 68 65 20 6e 75 6d 62 65 72 20 6f 66 20 79 65 | anniversary,.2).the.number.of.ye |
0940 | 61 72 73 2c 20 61 6e 64 20 33 29 20 61 6e 20 6f 72 64 69 6e 61 6c 20 73 75 66 66 69 78 20 66 6f | ars,.and.3).an.ordinal.suffix.fo |
0960 | 72 0a 74 68 65 20 79 65 61 72 2e 0a 0a 4d 75 6c 74 69 70 6c 65 20 61 6e 6e 69 76 65 72 73 61 72 | r.the.year...Multiple.anniversar |
0980 | 69 65 73 20 63 61 6e 20 62 65 20 73 65 70 61 72 61 74 65 64 20 62 79 20 5c 6e 2e 1f 0a 28 63 75 | ies.can.be.separated.by.\n...(cu |
09a0 | 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 62 62 64 62 2d | stom-declare-variable.'org-bbdb- |
09c0 | 61 6e 6e 69 76 65 72 73 61 72 79 2d 66 69 65 6c 64 20 27 27 61 6e 6e 69 76 65 72 73 61 72 79 20 | anniversary-field.''anniversary. |
09e0 | 27 28 23 24 20 2e 20 32 30 31 35 29 20 3a 74 79 70 65 20 27 73 79 6d 62 6f 6c 20 3a 67 72 6f 75 | '(#$...2015).:type.'symbol.:grou |
0a00 | 70 20 27 6f 72 67 2d 62 62 64 62 2d 61 6e 6e 69 76 65 72 73 61 72 69 65 73 20 3a 72 65 71 75 69 | p.'org-bbdb-anniversaries.:requi |
0a20 | 72 65 20 27 62 62 64 62 29 0a 23 40 32 30 31 20 48 6f 77 20 74 6f 20 72 65 74 72 69 65 76 65 20 | re.'bbdb).#@201.How.to.retrieve. |
0a40 | 60 6d 6f 6e 74 68 20 64 61 74 65 20 79 65 61 72 27 20 66 72 6f 6d 20 74 68 65 20 61 6e 6e 69 76 | `month.date.year'.from.the.anniv |
0a60 | 65 72 73 61 72 79 20 66 69 65 6c 64 2e 0a 0a 43 75 73 74 6f 6d 69 7a 65 20 69 66 20 79 6f 75 20 | ersary.field...Customize.if.you. |
0a80 | 68 61 76 65 20 61 6c 72 65 61 64 79 20 66 69 6c 6c 65 64 20 79 6f 75 72 20 42 42 44 42 20 77 69 | have.already.filled.your.BBDB.wi |
0aa0 | 74 68 20 64 61 74 65 73 0a 64 69 66 66 65 72 65 6e 74 20 66 72 6f 6d 20 59 59 59 59 2d 4d 4d 2d | th.dates.different.from.YYYY-MM- |
0ac0 | 44 44 2e 20 20 54 68 65 20 66 75 6e 63 74 69 6f 6e 20 6d 75 73 74 20 72 65 74 75 72 6e 20 61 20 | DD...The.function.must.return.a. |
0ae0 | 6c 69 73 74 20 28 6d 6f 6e 74 68 0a 64 61 74 65 20 79 65 61 72 29 2e 1f 0a 28 63 75 73 74 6f 6d | list.(month.date.year)...(custom |
0b00 | 2d 64 65 63 6c 61 72 65 2d 76 61 72 69 61 62 6c 65 20 27 6f 72 67 2d 62 62 64 62 2d 65 78 74 72 | -declare-variable.'org-bbdb-extr |
0b20 | 61 63 74 2d 64 61 74 65 2d 66 75 6e 20 27 27 6f 72 67 2d 62 62 64 62 2d 61 6e 6e 69 76 2d 65 78 | act-date-fun.''org-bbdb-anniv-ex |
0b40 | 74 72 61 63 74 2d 64 61 74 65 20 27 28 23 24 20 2e 20 32 36 30 38 29 20 3a 74 79 70 65 20 27 66 | tract-date.'(#$...2608).:type.'f |
0b60 | 75 6e 63 74 69 6f 6e 20 3a 67 72 6f 75 70 20 27 6f 72 67 2d 62 62 64 62 2d 61 6e 6e 69 76 65 72 | unction.:group.'org-bbdb-anniver |
0b80 | 73 61 72 69 65 73 20 3a 72 65 71 75 69 72 65 20 27 62 62 64 62 29 0a 28 62 79 74 65 2d 63 6f 64 | saries.:require.'bbdb).(byte-cod |
0ba0 | 65 20 22 5c 33 30 30 5c 33 30 31 5c 33 30 32 5c 33 30 33 23 5c 32 31 30 5c 33 30 34 5c 33 30 35 | e."\300\301\302\303#\210\304\305 |
0bc0 | 5c 33 30 36 5c 22 5c 32 30 37 22 20 5b 6f 72 67 2d 61 64 64 2d 6c 69 6e 6b 2d 74 79 70 65 20 22 | \306\"\207".[org-add-link-type." |
0be0 | 62 62 64 62 22 20 6f 72 67 2d 62 62 64 62 2d 6f 70 65 6e 20 6f 72 67 2d 62 62 64 62 2d 65 78 70 | bbdb".org-bbdb-open.org-bbdb-exp |
0c00 | 6f 72 74 20 61 64 64 2d 68 6f 6f 6b 20 6f 72 67 2d 73 74 6f 72 65 2d 6c 69 6e 6b 2d 66 75 6e 63 | ort.add-hook.org-store-link-func |
0c20 | 74 69 6f 6e 73 20 6f 72 67 2d 62 62 64 62 2d 73 74 6f 72 65 2d 6c 69 6e 6b 5d 20 34 29 0a 23 40 | tions.org-bbdb-store-link].4).#@ |
0c40 | 34 30 20 53 74 6f 72 65 20 61 20 6c 69 6e 6b 20 74 6f 20 61 20 42 42 44 42 20 64 61 74 61 62 61 | 40.Store.a.link.to.a.BBDB.databa |
0c60 | 73 65 20 65 6e 74 72 79 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 6f 72 67 2d 62 62 64 62 2d 73 | se.entry...(defalias.'org-bbdb-s |
0c80 | 74 6f 72 65 2d 6c 69 6e 6b 20 23 5b 6e 69 6c 20 22 08 5c 33 30 34 3d 5c 32 30 35 26 00 5c 33 30 | tore-link.#[nil.".\304=\205&.\30 |
0ca0 | 35 5c 33 30 36 20 21 19 5c 33 30 37 5c 33 30 36 20 5c 33 30 32 5c 22 1a 5c 33 31 30 5c 33 31 31 | 5\306.!.\307\306.\302\".\310\311 |
0cc0 | 09 5c 22 1b 5c 33 31 32 5c 33 31 33 5c 33 31 34 5c 33 31 35 09 5c 33 31 36 5c 6e 5c 33 31 37 0b | .\".\312\313\314\315.\316\n\317. |
0ce0 | 5c 33 32 30 09 26 5c 6e 5c 32 31 30 0b 2b 5c 32 30 37 22 20 5b 6d 61 6a 6f 72 2d 6d 6f 64 65 20 | \320.&\n\210.+\207".[major-mode. |
0d00 | 6e 61 6d 65 20 63 6f 6d 70 61 6e 79 20 6c 69 6e 6b 20 62 62 64 62 2d 6d 6f 64 65 20 62 62 64 62 | name.company.link.bbdb-mode.bbdb |
0d20 | 2d 72 65 63 6f 72 64 2d 6e 61 6d 65 20 62 62 64 62 2d 63 75 72 72 65 6e 74 2d 72 65 63 6f 72 64 | -record-name.bbdb-current-record |
0d40 | 20 62 62 64 62 2d 72 65 63 6f 72 64 2d 67 65 74 70 72 6f 70 20 6f 72 67 2d 6d 61 6b 65 2d 6c 69 | .bbdb-record-getprop.org-make-li |
0d60 | 6e 6b 20 22 62 62 64 62 3a 22 20 6f 72 67 2d 73 74 6f 72 65 2d 6c 69 6e 6b 2d 70 72 6f 70 73 20 | nk."bbdb:".org-store-link-props. |
0d80 | 3a 74 79 70 65 20 22 62 62 64 62 22 20 3a 6e 61 6d 65 20 3a 63 6f 6d 70 61 6e 79 20 3a 6c 69 6e | :type."bbdb".:name.:company.:lin |
0da0 | 6b 20 3a 64 65 73 63 72 69 70 74 69 6f 6e 5d 20 31 31 20 28 23 24 20 2e 20 33 31 33 39 29 5d 29 | k.:description].11.(#$...3139)]) |
0dc0 | 0a 23 40 31 38 33 20 43 72 65 61 74 65 20 74 68 65 20 65 78 70 6f 72 74 20 76 65 72 73 69 6f 6e | .#@183.Create.the.export.version |
0de0 | 20 6f 66 20 61 20 42 42 44 42 20 6c 69 6e 6b 20 73 70 65 63 69 66 69 65 64 20 62 79 20 50 41 54 | .of.a.BBDB.link.specified.by.PAT |
0e00 | 48 20 6f 72 20 44 45 53 43 2e 0a 49 66 20 65 78 70 6f 72 74 69 6e 67 20 74 6f 20 65 69 74 68 65 | H.or.DESC..If.exporting.to.eithe |
0e20 | 72 20 48 54 4d 4c 20 6f 72 20 4c 61 54 65 58 20 46 4f 52 4d 41 54 20 74 68 65 20 6c 69 6e 6b 20 | r.HTML.or.LaTeX.FORMAT.the.link. |
0e40 | 77 69 6c 6c 20 62 65 0a 69 74 61 6c 69 63 69 7a 65 64 2c 20 69 6e 20 61 6c 6c 20 6f 74 68 65 72 | will.be.italicized,.in.all.other |
0e60 | 20 63 61 73 65 73 20 69 74 20 69 73 20 6c 65 66 74 20 75 6e 63 68 61 6e 67 65 64 2e 1f 0a 28 64 | .cases.it.is.left.unchanged...(d |
0e80 | 65 66 61 6c 69 61 73 20 27 6f 72 67 2d 62 62 64 62 2d 65 78 70 6f 72 74 20 23 5b 28 70 61 74 68 | efalias.'org-bbdb-export.#[(path |
0ea0 | 20 64 65 73 63 20 66 6f 72 6d 61 74 29 20 22 08 5c 33 30 33 3d 5c 32 30 33 0f 00 5c 33 30 30 5c | .desc.format).".\303=\203..\300\ |
0ec0 | 33 30 34 09 5c 32 30 36 0d 00 5c 6e 5c 22 5c 32 30 37 08 5c 33 30 35 3d 5c 32 30 33 1e 00 5c 33 | 304.\206..\n\"\207.\305=\203..\3 |
0ee0 | 30 30 5c 33 30 36 09 5c 32 30 36 1c 00 5c 6e 5c 22 5c 32 30 37 09 5c 32 30 36 23 00 5c 6e 5c 32 | 00\306.\206..\n\"\207.\206#.\n\2 |
0f00 | 30 37 22 20 5b 66 6f 72 6d 61 74 20 64 65 73 63 20 70 61 74 68 20 68 74 6d 6c 20 22 3c 69 3e 25 | 07".[format.desc.path.html."<i>% |
0f20 | 73 3c 2f 69 3e 22 20 6c 61 74 65 78 20 22 5c 5c 74 65 78 74 69 74 7b 25 73 7d 22 5d 20 33 20 28 | s</i>".latex."\\textit{%s}"].3.( |
0f40 | 23 24 20 2e 20 33 35 32 37 29 5d 29 0a 23 40 32 39 20 46 6f 6c 6c 6f 77 20 61 20 42 42 44 42 20 | #$...3527)]).#@29.Follow.a.BBDB. |
0f60 | 6c 69 6e 6b 20 74 6f 20 4e 41 4d 45 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 6f 72 67 2d 62 62 | link.to.NAME...(defalias.'org-bb |
0f80 | 64 62 2d 6f 70 65 6e 20 23 5b 28 6e 61 6d 65 29 20 22 5c 33 30 33 5c 33 30 34 21 5c 32 31 30 08 | db-open.#[(name)."\303\304!\210. |
0fa0 | 3f 5c 33 30 35 19 1a 5c 33 30 36 5c 33 30 37 5c 32 31 35 2a 5c 32 30 37 22 20 5b 64 65 62 75 67 | ?\305..\306\307\215*\207".[debug |
0fc0 | 2d 6f 6e 2d 65 72 72 6f 72 20 62 62 64 62 2d 65 6c 65 63 74 72 69 63 2d 70 20 69 6e 68 69 62 69 | -on-error.bbdb-electric-p.inhibi |
0fe0 | 74 2d 72 65 64 69 73 70 6c 61 79 20 72 65 71 75 69 72 65 20 62 62 64 62 20 6e 69 6c 20 65 78 69 | t-redisplay.require.bbdb.nil.exi |
1000 | 74 20 28 62 79 74 65 2d 63 6f 64 65 20 22 5c 33 30 31 5c 33 30 32 08 5c 33 30 33 51 5c 33 30 34 | t.(byte-code."\301\302.\303Q\304 |
1020 | 5c 22 5c 32 31 30 5c 33 30 35 5c 33 30 36 5c 33 30 37 5c 33 31 30 21 21 57 5c 32 30 33 17 00 5c | \"\210\305\306\307\310!!W\203..\ |
1040 | 33 31 31 5c 33 31 32 5c 33 30 34 5c 22 5c 32 31 30 5c 33 31 33 5c 33 30 32 08 5c 33 30 33 51 5c | 311\312\304\"\210\313\302.\303Q\ |
1060 | 33 30 34 5c 22 5c 32 31 30 5c 33 30 35 5c 33 30 36 5c 33 30 37 5c 33 31 30 21 21 57 5c 32 30 33 | 304\"\210\305\306\307\310!!W\203 |
1080 | 2e 00 5c 33 31 31 5c 33 31 32 5c 33 30 34 5c 22 5c 32 31 30 5c 33 30 31 08 5c 33 30 34 5c 22 5c | ..\311\312\304\"\210\301.\304\"\ |
10a0 | 32 31 30 5c 33 30 35 5c 33 30 36 5c 33 30 37 5c 33 31 30 21 21 57 5c 32 30 33 42 00 5c 33 31 31 | 210\305\306\307\310!!W\203B.\311 |
10c0 | 5c 33 31 32 5c 33 30 34 5c 22 5c 32 31 30 5c 33 31 33 08 5c 33 30 34 5c 22 5c 32 31 30 5c 33 30 | \312\304\"\210\313.\304\"\210\30 |
10e0 | 35 5c 33 30 36 5c 33 30 37 5c 33 31 30 21 21 57 5c 32 30 33 56 00 5c 33 31 31 5c 33 31 32 5c 33 | 5\306\307\310!!W\203V.\311\312\3 |
1100 | 30 34 5c 22 5c 32 31 30 5c 33 31 34 08 5c 33 30 34 5c 22 5c 32 31 30 5c 33 30 36 5c 33 30 37 5c | 04\"\210\314.\304\"\210\306\307\ |
1120 | 33 31 30 21 21 5c 33 30 35 55 5c 32 30 35 6e 00 5c 33 31 35 5c 33 31 36 5c 33 31 30 21 21 5c 32 | 310!!\305U\205n.\315\316\310!!\2 |
1140 | 31 30 5c 33 31 37 5c 33 32 30 21 5c 32 30 37 22 20 5b 6e 61 6d 65 20 62 62 64 62 2d 6e 61 6d 65 | 10\317\320!\207".[name.bbdb-name |
1160 | 20 22 5c 5c 60 22 20 22 5c 5c 27 22 20 6e 69 6c 20 30 20 62 75 66 66 65 72 2d 73 69 7a 65 20 67 | ."\\`"."\\'".nil.0.buffer-size.g |
1180 | 65 74 2d 62 75 66 66 65 72 20 22 2a 42 42 44 42 2a 22 20 74 68 72 6f 77 20 65 78 69 74 20 62 62 | et-buffer."*BBDB*".throw.exit.bb |
11a0 | 64 62 2d 63 6f 6d 70 61 6e 79 20 62 62 64 62 20 64 65 6c 65 74 65 2d 77 69 6e 64 6f 77 20 67 65 | db-company.bbdb.delete-window.ge |
11c0 | 74 2d 62 75 66 66 65 72 2d 77 69 6e 64 6f 77 20 65 72 72 6f 72 20 22 4e 6f 20 6d 61 74 63 68 69 | t-buffer-window.error."No.matchi |
11e0 | 6e 67 20 42 42 44 42 20 72 65 63 6f 72 64 22 5d 20 34 29 5d 20 32 20 28 23 24 20 2e 20 33 39 32 | ng.BBDB.record"].4)].2.(#$...392 |
1200 | 32 29 5d 29 0a 23 40 39 34 20 43 6f 6e 76 65 72 74 20 59 59 59 59 2d 4d 4d 2d 44 44 20 74 6f 20 | 2)]).#@94.Convert.YYYY-MM-DD.to. |
1220 | 28 6d 6f 6e 74 68 20 64 61 74 65 20 79 65 61 72 29 2e 0a 41 72 67 75 6d 65 6e 74 20 54 49 4d 45 | (month.date.year)..Argument.TIME |
1240 | 2d 53 54 52 20 69 73 20 74 68 65 20 76 61 6c 75 65 20 72 65 74 72 69 65 76 65 64 20 66 72 6f 6d | -STR.is.the.value.retrieved.from |
1260 | 20 42 42 44 42 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 6f 72 67 2d 62 62 64 62 2d 61 6e 6e 69 | .BBDB...(defalias.'org-bbdb-anni |
1280 | 76 2d 65 78 74 72 61 63 74 2d 64 61 74 65 20 23 5b 28 74 69 6d 65 2d 73 74 72 29 20 22 5c 33 30 | v-extract-date.#[(time-str)."\30 |
12a0 | 35 08 5c 33 30 36 5c 22 5c 32 31 31 19 40 1a 09 41 40 1b 5c 33 30 37 09 38 1c 5c 33 31 30 0b 21 | 5.\306\"\211.@..A@.\307.8.\310.! |
12c0 | 5c 33 31 30 5c 66 21 5c 33 31 30 5c 6e 21 45 2c 5c 32 30 37 22 20 5b 74 69 6d 65 2d 73 74 72 20 | \310\f!\310\n!E,\207".[time-str. |
12e0 | 23 31 3d 23 3a 2d 2d 63 6c 2d 76 61 72 2d 2d 20 79 20 6d 20 64 20 62 62 64 62 2d 73 70 6c 69 74 | #1=#:--cl-var--.y.m.d.bbdb-split |
1300 | 20 22 2d 22 20 32 20 73 74 72 69 6e 67 2d 74 6f 2d 6e 75 6d 62 65 72 5d 20 35 20 28 23 24 20 2e | ."-".2.string-to-number].5.(#$.. |
1320 | 20 34 36 31 38 29 5d 29 0a 23 40 31 30 32 20 53 70 6c 69 74 20 6d 75 6c 74 69 70 6c 65 20 65 6e | .4618)]).#@102.Split.multiple.en |
1340 | 74 72 69 65 73 20 69 6e 20 74 68 65 20 42 42 44 42 20 61 6e 6e 69 76 65 72 73 61 72 79 20 66 69 | tries.in.the.BBDB.anniversary.fi |
1360 | 65 6c 64 2e 0a 41 72 67 75 6d 65 6e 74 20 53 54 52 20 69 73 20 74 68 65 20 61 6e 6e 69 76 65 72 | eld..Argument.STR.is.the.anniver |
1380 | 73 61 72 79 20 66 69 65 6c 64 20 69 6e 20 42 42 44 42 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 | sary.field.in.BBDB...(defalias.' |
13a0 | 6f 72 67 2d 62 62 64 62 2d 61 6e 6e 69 76 2d 73 70 6c 69 74 20 23 5b 28 73 74 72 29 20 22 5c 33 | org-bbdb-anniv-split.#[(str)."\3 |
13c0 | 30 32 5c 33 30 33 08 5c 22 5c 32 31 31 19 5c 32 30 33 17 00 08 5c 33 30 34 09 4f 5c 33 30 35 08 | 02\303.\"\211.\203...\304.O\305. |
13e0 | 09 5c 33 30 36 4f 21 44 5c 32 30 32 1a 00 08 5c 33 30 36 44 29 5c 32 30 37 22 20 5b 73 74 72 20 | .\306O!D\202...\306D)\207".[str. |
1400 | 70 6f 73 20 73 74 72 69 6e 67 2d 6d 61 74 63 68 20 22 5b 20 09 5d 22 20 30 20 62 62 64 62 2d 73 | pos.string-match."[..]".0.bbdb-s |
1420 | 74 72 69 6e 67 2d 74 72 69 6d 20 6e 69 6c 5d 20 36 20 28 23 24 20 2e 20 34 39 31 31 29 5d 29 0a | tring-trim.nil].6.(#$...4911)]). |
1440 | 23 40 39 31 20 41 20 68 61 73 68 20 68 6f 6c 64 69 6e 67 20 61 6e 6e 69 76 65 72 73 61 72 69 65 | #@91.A.hash.holding.anniversarie |
1460 | 73 20 65 78 74 72 61 63 74 65 64 20 66 72 6f 6d 20 42 42 44 42 2e 0a 54 68 65 20 68 61 73 68 20 | s.extracted.from.BBDB..The.hash. |
1480 | 74 61 62 6c 65 20 69 73 20 63 72 65 61 74 65 64 20 6f 6e 20 66 69 72 73 74 20 75 73 65 2e 1f 0a | table.is.created.on.first.use... |
14a0 | 28 64 65 66 76 61 72 20 6f 72 67 2d 62 62 64 62 2d 61 6e 6e 69 76 2d 68 61 73 68 20 6e 69 6c 20 | (defvar.org-bbdb-anniv-hash.nil. |
14c0 | 28 23 24 20 2e 20 35 31 38 39 29 29 0a 23 40 37 32 20 54 68 69 73 20 69 73 20 6e 6f 6e 2d 6e 69 | (#$...5189)).#@72.This.is.non-ni |
14e0 | 6c 20 69 66 20 42 42 44 42 20 68 61 73 20 62 65 65 6e 20 75 70 64 61 74 65 64 20 73 69 6e 63 65 | l.if.BBDB.has.been.updated.since |
1500 | 20 77 65 20 6c 61 73 74 20 62 75 69 6c 74 20 74 68 65 20 68 61 73 68 2e 1f 0a 28 64 65 66 76 61 | .we.last.built.the.hash...(defva |
1520 | 72 20 6f 72 67 2d 62 62 64 62 2d 75 70 64 61 74 65 64 2d 70 20 74 20 28 23 24 20 2e 20 35 33 33 | r.org-bbdb-updated-p.t.(#$...533 |
1540 | 30 29 29 0a 23 40 31 34 35 20 43 72 65 61 74 65 20 61 20 68 61 73 68 20 77 69 74 68 20 61 6e 6e | 0)).#@145.Create.a.hash.with.ann |
1560 | 69 76 65 72 73 61 72 69 65 73 20 65 78 74 72 61 63 74 65 64 20 66 72 6f 6d 20 42 42 44 42 2c 20 | iversaries.extracted.from.BBDB,. |
1580 | 66 6f 72 20 66 61 73 74 20 61 63 63 65 73 73 2e 0a 54 68 65 20 61 6e 6e 69 76 65 72 73 61 72 69 | for.fast.access..The.anniversari |
15a0 | 65 73 20 61 72 65 20 61 73 73 75 6d 65 64 20 74 6f 20 62 65 20 73 74 6f 72 65 64 20 60 6f 72 67 | es.are.assumed.to.be.stored.`org |
15c0 | 2d 62 62 64 62 2d 61 6e 6e 69 76 65 72 73 61 72 79 2d 66 69 65 6c 64 27 2e 1f 0a 28 64 65 66 61 | -bbdb-anniversary-field'...(defa |
15e0 | 6c 69 61 73 20 27 6f 72 67 2d 62 62 64 62 2d 6d 61 6b 65 2d 61 6e 6e 69 76 2d 68 61 73 68 20 23 | lias.'org-bbdb-make-anniv-hash.# |
1600 | 5b 6e 69 6c 20 22 5c 33 30 36 5c 32 31 31 5c 32 31 31 18 19 1a 5c 33 30 37 0b 21 5c 32 31 30 5c | [nil."\306\211\211...\307.!\210\ |
1620 | 33 31 30 20 5c 33 30 36 1c 5c 32 31 31 1d 5c 32 30 33 74 00 0d 40 14 5c 33 31 31 5c 66 0e 11 5c | 310.\306.\211.\203t..@.\311\f..\ |
1640 | 22 5c 32 31 31 10 5c 32 30 33 6d 00 5c 33 31 32 08 5c 33 31 33 5c 22 10 08 5c 32 30 33 6d 00 5c | "\211.\203m.\312.\313\"..\203m.\ |
1660 | 33 31 34 08 5c 32 31 31 41 10 40 21 12 0e 12 5c 6e 40 21 5c 32 31 31 1e 13 40 1e 14 0e 13 41 40 | 314.\211A.@!...\n@!\211..@....A@ |
1680 | 1e 15 5c 33 31 35 0e 13 38 1e 16 5c 33 31 36 0e 14 0e 15 44 0b 5c 22 11 5c 33 31 37 0e 14 0e 15 | ..\315..8..\316....D.\".\317.... |
16a0 | 44 0e 16 5c 33 32 30 5c 66 21 5c 6e 5c 32 31 31 1e 17 41 40 29 45 09 42 0b 23 5c 32 31 30 2c 5c | D..\320\f!\n\211..A@)E.B.#\210,\ |
16c0 | 32 30 32 25 00 0d 41 5c 32 31 31 15 5c 32 30 34 13 00 2d 5c 33 30 36 5c 32 31 31 16 18 5c 32 30 | 202%..A\211.\204..-\306\211..\20 |
16e0 | 37 22 20 5b 61 6e 6e 69 76 73 20 74 6d 70 20 73 70 6c 69 74 20 6f 72 67 2d 62 62 64 62 2d 61 6e | 7".[annivs.tmp.split.org-bbdb-an |
1700 | 6e 69 76 2d 68 61 73 68 20 72 65 63 20 23 31 3d 23 3a 2d 2d 63 6c 2d 64 6f 6c 69 73 74 2d 74 65 | niv-hash.rec.#1=#:--cl-dolist-te |
1720 | 6d 70 2d 2d 20 6e 69 6c 20 63 6c 72 68 61 73 68 20 62 62 64 62 2d 72 65 63 6f 72 64 73 20 62 62 | mp--.nil.clrhash.bbdb-records.bb |
1740 | 64 62 2d 72 65 63 6f 72 64 2d 67 65 74 70 72 6f 70 20 62 62 64 62 2d 73 70 6c 69 74 20 22 5c 6e | db-record-getprop.bbdb-split."\n |
1760 | 22 20 6f 72 67 2d 62 62 64 62 2d 61 6e 6e 69 76 2d 73 70 6c 69 74 20 32 20 67 65 74 68 61 73 68 | ".org-bbdb-anniv-split.2.gethash |
1780 | 20 70 75 74 68 61 73 68 20 62 62 64 62 2d 72 65 63 6f 72 64 2d 6e 61 6d 65 20 6f 72 67 2d 62 62 | .puthash.bbdb-record-name.org-bb |
17a0 | 64 62 2d 61 6e 6e 69 76 65 72 73 61 72 79 2d 66 69 65 6c 64 20 6f 72 67 2d 62 62 64 62 2d 65 78 | db-anniversary-field.org-bbdb-ex |
17c0 | 74 72 61 63 74 2d 64 61 74 65 2d 66 75 6e 20 23 32 3d 23 3a 2d 2d 63 6c 2d 76 61 72 2d 2d 20 6d | tract-date-fun.#2=#:--cl-var--.m |
17e0 | 20 64 20 79 20 78 20 6f 72 67 2d 62 62 64 62 2d 75 70 64 61 74 65 64 2d 70 5d 20 36 20 28 23 24 | .d.y.x.org-bbdb-updated-p].6.(#$ |
1800 | 20 2e 20 35 34 35 30 29 5d 29 0a 23 40 31 30 36 20 52 65 63 6f 72 64 20 74 68 65 20 66 61 63 74 | ...5450)]).#@106.Record.the.fact |
1820 | 20 74 68 61 74 20 42 42 44 42 20 68 61 73 20 62 65 65 6e 20 75 70 64 61 74 65 64 2e 0a 54 68 69 | .that.BBDB.has.been.updated..Thi |
1840 | 73 20 69 73 20 75 73 65 64 20 62 79 20 4f 72 67 20 74 6f 20 72 65 2d 63 72 65 61 74 65 20 74 68 | s.is.used.by.Org.to.re-create.th |
1860 | 65 20 61 6e 6e 69 76 65 72 73 61 72 79 20 68 61 73 68 20 74 61 62 6c 65 2e 1f 0a 28 64 65 66 61 | e.anniversary.hash.table...(defa |
1880 | 6c 69 61 73 20 27 6f 72 67 2d 62 62 64 62 2d 75 70 64 61 74 65 64 20 23 5b 28 72 65 63 29 20 22 | lias.'org-bbdb-updated.#[(rec)." |
18a0 | 5c 33 30 31 5c 32 31 31 10 5c 32 30 37 22 20 5b 6f 72 67 2d 62 62 64 62 2d 75 70 64 61 74 65 64 | \301\211.\207".[org-bbdb-updated |
18c0 | 2d 70 20 74 5d 20 32 20 28 23 24 20 2e 20 36 31 36 31 29 5d 29 0a 28 61 64 64 2d 68 6f 6f 6b 20 | -p.t].2.(#$...6161)]).(add-hook. |
18e0 | 27 62 62 64 62 2d 61 66 74 65 72 2d 63 68 61 6e 67 65 2d 68 6f 6f 6b 20 27 6f 72 67 2d 62 62 64 | 'bbdb-after-change-hook.'org-bbd |
1900 | 62 2d 75 70 64 61 74 65 64 29 0a 23 40 36 30 20 45 78 74 72 61 63 74 20 61 6e 6e 69 76 65 72 73 | b-updated).#@60.Extract.annivers |
1920 | 61 72 69 65 73 20 66 72 6f 6d 20 42 42 44 42 20 66 6f 72 20 64 69 73 70 6c 61 79 20 69 6e 20 74 | aries.from.BBDB.for.display.in.t |
1940 | 68 65 20 61 67 65 6e 64 61 2e 1f 0a 28 64 65 66 61 6c 69 61 73 20 27 6f 72 67 2d 62 62 64 62 2d | he.agenda...(defalias.'org-bbdb- |
1960 | 61 6e 6e 69 76 65 72 73 61 72 69 65 73 20 23 5b 6e 69 6c 20 22 5c 33 30 36 5c 33 30 37 21 5c 32 | anniversaries.#[nil."\306\307!\2 |
1980 | 31 30 5c 33 30 36 5c 33 31 30 21 5c 32 31 30 5c 33 31 31 08 21 5c 32 30 34 15 00 5c 33 31 32 5c | 10\306\310!\210\311.!\204..\312\ |
19a0 | 33 31 33 5c 33 31 34 5c 33 31 35 5c 33 31 36 24 10 09 5c 32 30 34 21 00 5c 33 31 37 08 21 5c 33 | 313\314\315\316$..\204!.\317.!\3 |
19c0 | 32 30 55 5c 32 30 33 24 00 5c 33 32 31 20 5c 32 31 30 5c 6e 40 1b 5c 6e 41 40 1c 5c 33 32 32 5c | 20U\203$.\321.\210\n@.\nA@.\322\ |
19e0 | 6e 38 1d 5c 33 32 33 0b 5c 66 44 08 5c 22 1e 5c 22 5c 33 32 34 5c 32 31 31 1e 23 1e 24 5c 33 32 | n8.\323.\fD.\".\"\324\211.#.$\32 |
1a00 | 34 1e 25 0b 5c 33 32 35 55 5c 32 30 33 7a 00 5c 66 5c 33 32 36 55 5c 32 30 33 7a 00 5c 33 32 33 | 4.%.\325U\203z.\f\326U\203z.\323 |
1a20 | 5c 33 32 32 5c 33 32 37 44 08 5c 22 5c 32 30 33 7a 00 5c 33 33 30 0d 21 5c 32 30 34 7a 00 5c 33 | \322\327D.\"\203z.\330.!\204z.\3 |
1a40 | 32 33 5c 33 32 32 5c 33 32 37 44 08 5c 22 16 25 0e 25 5c 32 31 31 41 16 25 40 5c 32 31 31 16 24 | 23\322\327D.\".%.%\211A.%@\211.$ |
1a60 | 5c 32 30 33 7a 00 0e 24 0e 5c 22 42 16 5c 22 5c 32 30 32 63 00 0e 5c 22 5c 32 30 33 0e 01 0e 5c | \203z..$.\"B.\"\202c..\"\203...\ |
1a80 | 22 5c 32 31 31 41 16 5c 22 40 5c 32 31 31 16 24 5c 32 30 33 0e 01 0e 24 5c 32 30 33 7f 00 5c 33 | "\211A.\"@\211.$\203...$\203..\3 |
1aa0 | 32 32 0e 24 38 5c 32 30 36 5c 32 33 32 00 0e 26 1e 27 5c 33 33 31 0e 27 0e 28 5c 33 33 32 23 41 | 22.$8\206\232..&.'\331.'.(\332#A |
1ac0 | 5c 32 30 36 5c 32 35 31 00 0e 27 1e 29 0e 24 41 40 1e 2a 0d 0e 24 40 5a 1e 2b 5c 33 33 33 0e 2b | \206\251..'.).$A@.*..$@Z.+\333.+ |
1ae0 | 21 1e 2c 5c 33 33 34 0e 29 21 5c 32 30 33 5c 33 32 31 00 0e 29 0e 2a 0e 2b 0e 2c 23 5c 32 30 32 | !.,\334.)!\203\321..).*.+.,#\202 |
1b00 | 5c 33 35 30 00 0e 29 3c 5c 32 30 33 5c 33 33 36 00 5c 33 33 35 0e 29 21 5c 32 30 32 5c 33 35 30 | \350..)<\203\336.\335.)!\202\350 |
1b20 | 00 5c 33 33 36 0e 29 0e 2a 0e 2b 0e 2c 24 1e 2d 5c 33 33 37 0e 2d 5c 33 32 34 5c 33 34 30 0e 2a | .\336.).*.+.,$.-\337.-\324\340.* |
1b40 | 24 5c 32 31 30 0e 23 5c 32 30 33 04 01 5c 33 34 31 0e 23 0e 2d 43 5c 22 16 23 5c 32 30 32 09 01 | $\210.#\203..\341.#.-C\".#\202.. |
1b60 | 0e 2d 43 16 23 2e 06 5c 32 30 32 7f 00 0e 23 2e 07 5c 32 30 37 22 20 5b 6f 72 67 2d 62 62 64 62 | .-C.#..\202...#..\207".[org-bbdb |
1b80 | 2d 61 6e 6e 69 76 2d 68 61 73 68 20 6f 72 67 2d 62 62 64 62 2d 75 70 64 61 74 65 64 2d 70 20 64 | -anniv-hash.org-bbdb-updated-p.d |
1ba0 | 61 74 65 20 6d 20 64 20 79 20 72 65 71 75 69 72 65 20 62 62 64 62 20 64 69 61 72 79 2d 6c 69 62 | ate.m.d.y.require.bbdb.diary-lib |
1bc0 | 20 68 61 73 68 2d 74 61 62 6c 65 2d 70 20 6d 61 6b 65 2d 68 61 73 68 2d 74 61 62 6c 65 20 3a 74 | .hash-table-p.make-hash-table.:t |
1be0 | 65 73 74 20 65 71 75 61 6c 20 3a 73 69 7a 65 20 33 36 36 20 68 61 73 68 2d 74 61 62 6c 65 2d 63 | est.equal.:size.366.hash-table-c |
1c00 | 6f 75 6e 74 20 30 20 6f 72 67 2d 62 62 64 62 2d 6d 61 6b 65 2d 61 6e 6e 69 76 2d 68 61 73 68 20 | ount.0.org-bbdb-make-anniv-hash. |
1c20 | 32 20 67 65 74 68 61 73 68 20 6e 69 6c 20 33 20 31 20 32 39 20 63 61 6c 65 6e 64 61 72 2d 6c 65 | 2.gethash.nil.3.1.29.calendar-le |
1c40 | 61 70 2d 79 65 61 72 2d 70 20 61 73 73 6f 63 2d 73 74 72 69 6e 67 20 74 20 64 69 61 72 79 2d 6f | ap-year-p.assoc-string.t.diary-o |
1c60 | 72 64 69 6e 61 6c 2d 73 75 66 66 69 78 20 66 75 6e 63 74 69 6f 6e 70 20 65 76 61 6c 20 66 6f 72 | rdinal-suffix.functionp.eval.for |
1c80 | 6d 61 74 20 6f 72 67 2d 61 64 64 2d 70 72 6f 70 73 20 6f 72 67 2d 62 62 64 62 2d 6e 61 6d 65 20 | mat.org-add-props.org-bbdb-name. |
1ca0 | 61 70 70 65 6e 64 20 61 6e 6e 69 76 73 20 74 65 78 74 20 72 65 63 20 72 65 63 73 20 6f 72 67 2d | append.annivs.text.rec.recs.org- |
1cc0 | 62 62 64 62 2d 64 65 66 61 75 6c 74 2d 61 6e 6e 69 76 65 72 73 61 72 79 2d 66 6f 72 6d 61 74 20 | bbdb-default-anniversary-format. |
1ce0 | 63 6c 61 73 73 20 6f 72 67 2d 62 62 64 62 2d 61 6e 6e 69 76 65 72 73 61 72 79 2d 66 6f 72 6d 61 | class.org-bbdb-anniversary-forma |
1d00 | 74 2d 61 6c 69 73 74 20 66 6f 72 6d 20 6e 61 6d 65 20 79 65 61 72 73 20 73 75 66 66 69 78 20 74 | t-alist.form.name.years.suffix.t |
1d20 | 6d 70 5d 20 36 20 28 23 24 20 2e 20 36 34 31 36 29 5d 29 0a 23 40 34 30 20 52 65 61 64 20 61 20 | mp].6.(#$...6416)]).#@40.Read.a. |
1d40 | 62 62 64 62 20 6c 69 6e 6b 20 77 69 74 68 20 6e 61 6d 65 20 63 6f 6d 70 6c 65 74 69 6f 6e 2e 1f | bbdb.link.with.name.completion.. |
1d60 | 0a 28 64 65 66 61 6c 69 61 73 20 27 6f 72 67 2d 62 62 64 62 2d 63 6f 6d 70 6c 65 74 65 2d 6c 69 | .(defalias.'org-bbdb-complete-li |
1d80 | 6e 6b 20 23 5b 6e 69 6c 20 22 5c 33 30 30 5c 33 30 31 21 5c 32 31 30 5c 33 30 32 5c 33 30 33 5c | nk.#[nil."\300\301!\210\302\303\ |
1da0 | 33 30 34 5c 33 30 35 21 40 21 50 5c 32 30 37 22 20 5b 72 65 71 75 69 72 65 20 62 62 64 62 2d 63 | 304\305!@!P\207".[require.bbdb-c |
1dc0 | 6f 6d 20 22 62 62 64 62 3a 22 20 62 62 64 62 2d 72 65 63 6f 72 64 2d 6e 61 6d 65 20 62 62 64 62 | om."bbdb:".bbdb-record-name.bbdb |
1de0 | 2d 63 6f 6d 70 6c 65 74 69 6e 67 2d 72 65 61 64 2d 72 65 63 6f 72 64 20 22 4e 61 6d 65 3a 20 22 | -completing-read-record."Name:." |
1e00 | 5d 20 34 20 28 23 24 20 2e 20 37 34 38 31 29 5d 29 0a 23 40 37 31 20 45 78 74 72 61 63 74 20 61 | ].4.(#$...7481)]).#@71.Extract.a |
1e20 | 6e 6e 69 76 65 72 73 61 72 69 65 73 20 66 72 6f 6d 20 42 42 44 42 20 61 6e 64 20 63 6f 6e 76 65 | nniversaries.from.BBDB.and.conve |
1e40 | 72 74 20 74 68 65 6d 20 74 6f 20 69 63 61 6c 65 6e 64 61 72 20 66 6f 72 6d 61 74 2e 1f 0a 28 64 | rt.them.to.icalendar.format...(d |
1e60 | 65 66 61 6c 69 61 73 20 27 6f 72 67 2d 62 62 64 62 2d 61 6e 6e 69 76 2d 65 78 70 6f 72 74 2d 69 | efalias.'org-bbdb-anniv-export-i |
1e80 | 63 61 6c 20 23 5b 6e 69 6c 20 22 5c 33 30 32 5c 33 30 33 21 5c 32 31 30 5c 33 30 32 5c 33 30 34 | cal.#[nil."\302\303!\210\302\304 |
1ea0 | 21 5c 32 31 30 5c 33 30 35 08 21 5c 32 30 34 15 00 5c 33 30 36 5c 33 30 37 5c 33 31 30 5c 33 31 | !\210\305.!\204..\306\307\310\31 |
1ec0 | 31 5c 33 31 32 24 10 09 5c 32 30 34 21 00 5c 33 31 33 08 21 5c 33 31 34 55 5c 32 30 33 24 00 5c | 1\312$..\204!.\313.!\314U\203$.\ |
1ee0 | 33 31 35 20 5c 32 31 30 5c 33 31 36 5c 33 31 37 08 5c 22 5c 32 30 37 22 20 5b 6f 72 67 2d 62 62 | 315.\210\316\317.\"\207".[org-bb |
1f00 | 64 62 2d 61 6e 6e 69 76 2d 68 61 73 68 20 6f 72 67 2d 62 62 64 62 2d 75 70 64 61 74 65 64 2d 70 | db-anniv-hash.org-bbdb-updated-p |
1f20 | 20 72 65 71 75 69 72 65 20 62 62 64 62 20 64 69 61 72 79 2d 6c 69 62 20 68 61 73 68 2d 74 61 62 | .require.bbdb.diary-lib.hash-tab |
1f40 | 6c 65 2d 70 20 6d 61 6b 65 2d 68 61 73 68 2d 74 61 62 6c 65 20 3a 74 65 73 74 20 65 71 75 61 6c | le-p.make-hash-table.:test.equal |
1f60 | 20 3a 73 69 7a 65 20 33 36 36 20 68 61 73 68 2d 74 61 62 6c 65 2d 63 6f 75 6e 74 20 30 20 6f 72 | .:size.366.hash-table-count.0.or |
1f80 | 67 2d 62 62 64 62 2d 6d 61 6b 65 2d 61 6e 6e 69 76 2d 68 61 73 68 20 6d 61 70 68 61 73 68 20 6f | g-bbdb-make-anniv-hash.maphash.o |
1fa0 | 72 67 2d 62 62 64 62 2d 66 6f 72 6d 61 74 2d 76 65 76 65 6e 74 5d 20 35 20 28 23 24 20 2e 20 37 | rg-bbdb-format-vevent].5.(#$...7 |
1fc0 | 37 30 33 29 5d 29 0a 28 64 65 66 61 6c 69 61 73 20 27 6f 72 67 2d 62 62 64 62 2d 66 6f 72 6d 61 | 703)]).(defalias.'org-bbdb-forma |
1fe0 | 74 2d 76 65 76 65 6e 74 20 23 5b 28 6b 65 79 20 72 65 63 73 29 20 22 5c 33 30 35 5c 32 31 31 18 | t-vevent.#[(key.recs)."\305\211. |
2000 | 19 5c 6e 5c 32 31 31 41 12 40 5c 32 31 31 11 5c 32 30 35 44 00 5c 33 30 36 09 38 5c 32 30 36 15 | .\n\211A.@\211.\205D.\306.8\206. |
2020 | 00 0b 10 5c 33 30 37 5c 33 31 30 5c 33 31 31 09 40 5c 66 40 5c 66 41 40 5c 33 31 32 5c 33 31 33 | ...\307\310\311.@\f@\fA@\312\313 |
2040 | 5c 33 31 34 09 41 40 5c 33 31 35 5c 22 5c 33 31 36 23 09 40 5c 66 40 5c 66 41 40 09 41 40 5c 33 | \314.A@\315\"\316#.@\f@\fA@.A@\3 |
2060 | 31 37 08 21 5c 33 32 30 09 41 40 51 08 26 0b 21 5c 32 31 30 5c 32 30 32 04 00 2a 5c 32 30 37 22 | 17.!\320.A@Q.&.!\210\202..*\207" |
2080 | 20 5b 63 61 74 65 67 20 72 65 63 20 72 65 63 73 20 6f 72 67 2d 62 62 64 62 2d 64 65 66 61 75 6c | .[categ.rec.recs.org-bbdb-defaul |
20a0 | 74 2d 61 6e 6e 69 76 65 72 73 61 72 79 2d 66 6f 72 6d 61 74 20 6b 65 79 20 6e 69 6c 20 32 20 70 | t-anniversary-format.key.nil.2.p |
20c0 | 72 69 6e 63 20 66 6f 72 6d 61 74 20 22 42 45 47 49 4e 3a 56 45 56 45 4e 54 5c 6e 55 49 44 3a 20 | rinc.format."BEGIN:VEVENT\nUID:. |
20e0 | 41 4e 4e 49 56 2d 25 34 69 25 30 32 69 25 30 32 69 2d 25 73 5c 6e 44 54 53 54 41 52 54 3a 25 34 | ANNIV-%4i%02i%02i-%s\nDTSTART:%4 |
2100 | 69 25 30 32 69 25 30 32 69 5c 6e 53 55 4d 4d 41 52 59 3a 25 73 5c 6e 44 45 53 43 52 49 50 54 49 | i%02i%02i\nSUMMARY:%s\nDESCRIPTI |
2120 | 4f 4e 3a 25 73 5c 6e 43 41 54 45 47 4f 52 49 45 53 3a 25 73 5c 6e 52 52 55 4c 45 3a 46 52 45 51 | ON:%s\nCATEGORIES:%s\nRRULE:FREQ |
2140 | 3d 59 45 41 52 4c 59 5c 6e 45 4e 44 3a 56 45 56 45 4e 54 5c 6e 22 20 6d 61 70 63 6f 6e 63 61 74 | =YEARLY\nEND:VEVENT\n".mapconcat |
2160 | 20 69 64 65 6e 74 69 74 79 20 6f 72 67 2d 73 70 6c 69 74 2d 73 74 72 69 6e 67 20 22 5b 5e 61 2d | .identity.org-split-string."[^a- |
2180 | 7a 41 2d 5a 30 2d 39 30 5d 2b 22 20 22 2d 22 20 63 61 70 69 74 61 6c 69 7a 65 20 22 20 22 5d 20 | zA-Z0-90]+"."-".capitalize."."]. |
21a0 | 31 34 5d 29 0a 28 70 72 6f 76 69 64 65 20 27 6f 72 67 2d 62 62 64 62 29 0a | 14]).(provide.'org-bbdb). |