--- /tmp/emacs-27.1+1-3.1061e9eac/debian/emacs-common_27.1+1-3.1_all.deb +++ emacs-common_27.1+1-3.1_all.deb ├── file list │ @@ -1,3 +1,3 @@ │ -rw-r--r-- 0 0 0 4 2021-03-20 21:41:44.000000 debian-binary │ -rw-r--r-- 0 0 0 56984 2021-03-20 21:41:44.000000 control.tar.xz │ --rw-r--r-- 0 0 0 13628116 2021-03-20 21:41:44.000000 data.tar.xz │ +-rw-r--r-- 0 0 0 13628452 2021-03-20 21:41:44.000000 data.tar.xz ├── control.tar.xz │ ├── control.tar │ │ ├── ./md5sums │ │ │ ├── ./md5sums │ │ │ │┄ Files differ ├── data.tar.xz │ ├── data.tar │ │ ├── file list │ │ │ @@ -1021,16 +1021,16 @@ │ │ │ -rw-r--r-- 0 root (0) root (0) 6814 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/calendar/cal-persia.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 77609 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/calendar/cal-tex.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 4556 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/calendar/cal-x.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 100846 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/calendar/calendar.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 105569 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/calendar/diary-lib.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 10861 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/calendar/diary-loaddefs.el │ │ │ -rw-r--r-- 0 root (0) root (0) 5229 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/calendar/hol-loaddefs.el │ │ │ --rw-r--r-- 0 root (0) root (0) 33511 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/calendar/holidays.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 59520 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/calendar/icalendar.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 33369 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/calendar/holidays.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 59463 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/calendar/icalendar.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 8901 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/calendar/iso8601.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 12795 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/calendar/lunar.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 5590 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/calendar/parse-time.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 39226 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/calendar/solar.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 14598 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/calendar/time-date.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 47289 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/calendar/timeclock.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 200128 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/calendar/todo-mode.elc │ │ │ @@ -1277,15 +1277,15 @@ │ │ │ -rw-r--r-- 0 root (0) root (0) 20258 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/emacs-lisp/easy-mmode.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 20362 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/emacs-lisp/easymenu.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 126081 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/emacs-lisp/edebug.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 17582 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/emacs-lisp/eieio-base.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 8609 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/emacs-lisp/eieio-compat.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 37797 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/emacs-lisp/eieio-core.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 16176 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/emacs-lisp/eieio-custom.elc │ │ │ --rw-r--r-- 0 root (0) root (0) 3249 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/emacs-lisp/eieio-datadebug.elc │ │ │ +-rw-r--r-- 0 root (0) root (0) 3240 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/emacs-lisp/eieio-datadebug.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 4056 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/emacs-lisp/eieio-loaddefs.el │ │ │ -rw-r--r-- 0 root (0) root (0) 9544 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/emacs-lisp/eieio-opt.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 13440 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/emacs-lisp/eieio-speedbar.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 33818 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/emacs-lisp/eieio.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 19603 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/emacs-lisp/eldoc.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 31333 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/emacs-lisp/elint.elc │ │ │ -rw-r--r-- 0 root (0) root (0) 12987 2021-03-20 21:41:44.000000 ./usr/share/emacs/27.1/lisp/emacs-lisp/elp.elc │ │ ├── ./usr/share/emacs/27.1/lisp/calendar/holidays.elc │ │ │ @@ -873,1223 +873,1214 @@ │ │ │ 00003680: 7374 2d68 6f6c 6964 6179 7320 235b 3130 st-holidays #[10 │ │ │ 00003690: 3235 2022 025c 3230 3407 0003 5c32 3632 25 ".\204...\262 │ │ │ 000036a0: 035c 3330 365c 3330 3721 5c32 3130 015c .\306\307!\210.\ │ │ │ 000036b0: 3230 3610 0008 015c 3230 3615 005c 3331 206....\206..\31 │ │ │ 000036c0: 305c 3331 315c 3331 3206 0745 5c32 3131 0\311\312..E\211 │ │ │ 000036d0: 5c33 3131 0138 5c32 3632 015c 3331 3301 \311.8\262.\313. │ │ │ 000036e0: 5c33 3134 555c 3230 332d 005c 3331 355c \314U\203-.\315\ │ │ │ -000036f0: 3331 3621 5c32 3032 6d01 015c 3331 3456 316!\202m..\314V │ │ │ -00003700: 5c32 3033 5c32 3433 0001 535c 3236 3201 \203\243..S\262. │ │ │ +000036f0: 3331 3621 5c32 3032 6701 015c 3331 3456 316!\202g..\314V │ │ │ +00003700: 5c32 3033 5c32 3431 0001 535c 3236 3201 \203\241..S\262. │ │ │ 00003710: 5c33 3137 035c 3231 315c 3231 3140 5c32 \317.\211\211@\2 │ │ │ 00003720: 3632 0101 5c32 3131 4140 5c32 3632 0102 62..\211A@\262.. │ │ │ 00003730: 5c33 3131 0138 5c32 3632 0101 5c33 3230 \311.8\262..\320 │ │ │ 00003740: 0453 5f5c 5c03 5c33 3131 565c 3230 335c .S_\\.\311V\203\ │ │ │ 00003750: 3231 3600 5c32 3131 5c33 3231 5c33 3232 216.\211\321\322 │ │ │ 00003760: 0606 5f5c 5c5c 3332 335c 3234 355a 5c32 .._\\\323\245Z\2 │ │ │ 00003770: 3632 0101 5c32 3131 5c33 3134 575c 3230 62..\211\314W\20 │ │ │ 00003780: 336f 005c 3332 3401 2153 5c32 3632 015c 3o.\324.!S\262.\ │ │ │ 00003790: 3231 315c 3332 325c 3234 365c 3331 3455 211\322\246\314U │ │ │ 000037a0: 5c32 3035 5c32 3035 005c 3231 315c 3332 \205\205.\211\32 │ │ │ 000037b0: 355c 3234 365c 3331 3455 3f5c 3230 365c 5\246\314U?\206\ │ │ │ 000037c0: 3230 3500 5c32 3131 5c33 3236 5c32 3436 205.\211\326\246 │ │ │ 000037d0: 5c33 3134 555c 3236 3201 5c32 3033 5c32 \314U\262.\203\2 │ │ │ 000037e0: 3136 005c 3231 3154 5c32 3632 015c 3236 16.\211T\262.\26 │ │ │ -000037f0: 365c 3230 335c 3236 3201 5c33 3237 035f 6\203\262.\327._ │ │ │ -00003800: 035c 3332 325c 3234 3504 5c33 3235 5c32 .\322\245.\325\2 │ │ │ -00003810: 3435 5b05 5c33 3236 5c32 3435 255c 3230 45[.\326\245%\20 │ │ │ -00003820: 326d 015c 3332 3402 5421 5c32 3632 015c 2m.\324.T!\262.\ │ │ │ -00003830: 3333 3003 5c32 3131 5c32 3131 405c 3236 330.\211\211@\26 │ │ │ -00003840: 3201 015c 3231 3141 405c 3236 3201 025c 2..\211A@\262..\ │ │ │ -00003850: 3331 3101 385c 3236 3201 015c 3332 3004 311.8\262..\320. │ │ │ -00003860: 535f 5c5c 035c 3331 3156 5c32 3033 0001 S_\\.\311V\203.. │ │ │ -00003870: 5c32 3131 5c33 3231 5c33 3232 0606 5f5c \211\321\322.._\ │ │ │ -00003880: 5c5c 3332 335c 3234 355a 5c32 3632 0101 \\323\245Z\262.. │ │ │ -00003890: 5c32 3131 5c33 3134 575c 3230 335c 3334 \211\314W\203\34 │ │ │ -000038a0: 3100 5c33 3234 0121 535c 3236 3201 5c32 1.\324.!S\262.\2 │ │ │ -000038b0: 3131 5c33 3232 5c32 3436 5c33 3134 555c 11\322\246\314U\ │ │ │ -000038c0: 3230 355c 3336 3700 5c32 3131 5c33 3235 205\367.\211\325 │ │ │ -000038d0: 5c32 3436 5c33 3134 553f 5c32 3036 5c33 \246\314U?\206\3 │ │ │ -000038e0: 3637 005c 3231 315c 3332 365c 3234 365c 67.\211\326\246\ │ │ │ -000038f0: 3331 3455 5c32 3632 015c 3230 3300 015c 314U\262.\203..\ │ │ │ -00003900: 3231 3154 5c32 3632 015c 3236 365c 3230 211T\262.\266\20 │ │ │ -00003910: 335c 3236 3201 5c33 3237 035f 035c 3332 3\262.\327._.\32 │ │ │ -00003920: 325c 3234 3504 5c33 3235 5c32 3435 5b05 2\245.\325\245[. │ │ │ -00003930: 5c33 3236 5c32 3435 5c33 3331 5c32 3131 \326\245\331\211 │ │ │ -00003940: 5c32 3131 405c 3236 3201 015c 3231 3141 \211@\262..\211A │ │ │ -00003950: 405c 3236 3201 025c 3331 3101 385c 3236 @\262..\311.8\26 │ │ │ -00003960: 3201 015c 3332 3004 535f 5c5c 035c 3331 2..\320.S_\\.\31 │ │ │ -00003970: 3156 5c32 3033 6701 5c32 3131 5c33 3231 1V\203g.\211\321 │ │ │ -00003980: 5c33 3232 0606 5f5c 5c5c 3332 335c 3234 \322.._\\\323\24 │ │ │ -00003990: 355a 5c32 3632 0101 5c32 3131 5c33 3134 5Z\262..\211\314 │ │ │ -000039a0: 575c 3230 3348 015c 3332 3401 2153 5c32 W\203H.\324.!S\2 │ │ │ -000039b0: 3632 015c 3231 315c 3332 325c 3234 365c 62.\211\322\246\ │ │ │ -000039c0: 3331 3455 5c32 3035 5e01 5c32 3131 5c33 314U\205^.\211\3 │ │ │ -000039d0: 3235 5c32 3436 5c33 3134 553f 5c32 3036 25\246\314U?\206 │ │ │ -000039e0: 5e01 5c32 3131 5c33 3236 5c32 3436 5c33 ^.\211\326\246\3 │ │ │ -000039f0: 3134 555c 3236 3201 5c32 3033 6701 5c32 14U\262.\203g.\2 │ │ │ -00003a00: 3131 545c 3236 3201 5c32 3636 5c32 3033 11T\262.\266\203 │ │ │ -00003a10: 5c32 3632 0126 065c 3236 365c 3230 325c \262.&.\266\202\ │ │ │ -00003a20: 3236 3201 5c33 3332 5c33 3132 0607 455c 262.\332\312..E\ │ │ │ -00003a30: 3231 315c 3331 3101 385c 3236 3201 5c33 211\311.8\262.\3 │ │ │ -00003a40: 3133 015c 3331 3455 5c32 3033 5c32 3131 13.\314U\203\211 │ │ │ -00003a50: 015c 3331 355c 3331 3621 5c32 3032 5c33 .\315\316!\202\3 │ │ │ -00003a60: 3131 0201 5c33 3134 565c 3230 335c 3337 11..\314V\203\37 │ │ │ -00003a70: 3701 0153 5c32 3632 015c 3331 3703 5c32 7..S\262.\317.\2 │ │ │ -00003a80: 3131 5c32 3131 405c 3236 3201 015c 3231 11\211@\262..\21 │ │ │ -00003a90: 3141 405c 3236 3201 025c 3331 3101 385c 1A@\262..\311.8\ │ │ │ -00003aa0: 3236 3201 015c 3332 3004 535f 5c5c 035c 262..\320.S_\\.\ │ │ │ -00003ab0: 3331 3156 5c32 3033 5c33 3532 015c 3231 311V\203\352.\21 │ │ │ -00003ac0: 315c 3332 315c 3332 3206 065f 5c5c 5c33 1\321\322.._\\\3 │ │ │ -00003ad0: 3233 5c32 3435 5a5c 3236 3201 015c 3231 23\245Z\262..\21 │ │ │ -00003ae0: 315c 3331 3457 5c32 3033 5c33 3133 015c 1\314W\203\313.\ │ │ │ -00003af0: 3332 3401 2153 5c32 3632 015c 3231 315c 324.!S\262.\211\ │ │ │ -00003b00: 3332 325c 3234 365c 3331 3455 5c32 3035 322\246\314U\205 │ │ │ -00003b10: 5c33 3431 015c 3231 315c 3332 355c 3234 \341.\211\325\24 │ │ │ -00003b20: 365c 3331 3455 3f5c 3230 365c 3334 3101 6\314U?\206\341. │ │ │ -00003b30: 5c32 3131 5c33 3236 5c32 3436 5c33 3134 \211\326\246\314 │ │ │ -00003b40: 555c 3236 3201 5c32 3033 5c33 3532 015c U\262.\203\352.\ │ │ │ -00003b50: 3231 3154 5c32 3632 015c 3236 365c 3230 211T\262.\266\20 │ │ │ -00003b60: 335c 3236 3201 5c33 3237 035f 035c 3332 3\262.\327._.\32 │ │ │ -00003b70: 325c 3234 3504 5c33 3235 5c32 3435 5b05 2\245.\325\245[. │ │ │ -00003b80: 5c33 3236 5c32 3435 255c 3230 325c 3331 \326\245%\202\31 │ │ │ -00003b90: 3102 5c33 3234 0254 215c 3236 3201 5c33 1.\324.T!\262.\3 │ │ │ -00003ba0: 3330 035c 3231 315c 3231 3140 5c32 3632 30.\211\211@\262 │ │ │ -00003bb0: 0101 5c32 3131 4140 5c32 3632 0102 5c33 ..\211A@\262..\3 │ │ │ -00003bc0: 3131 0138 5c32 3632 0101 5c33 3230 0453 11.8\262..\320.S │ │ │ -00003bd0: 5f5c 5c03 5c33 3131 565c 3230 335c 5c02 _\\.\311V\203\\. │ │ │ -00003be0: 5c32 3131 5c33 3231 5c33 3232 0606 5f5c \211\321\322.._\ │ │ │ -00003bf0: 5c5c 3332 335c 3234 355a 5c32 3632 0101 \\323\245Z\262.. │ │ │ -00003c00: 5c32 3131 5c33 3134 575c 3230 333d 025c \211\314W\203=.\ │ │ │ -00003c10: 3332 3401 2153 5c32 3632 015c 3231 315c 324.!S\262.\211\ │ │ │ -00003c20: 3332 325c 3234 365c 3331 3455 5c32 3035 322\246\314U\205 │ │ │ -00003c30: 5302 5c32 3131 5c33 3235 5c32 3436 5c33 S.\211\325\246\3 │ │ │ -00003c40: 3134 553f 5c32 3036 5302 5c32 3131 5c33 14U?\206S.\211\3 │ │ │ -00003c50: 3236 5c32 3436 5c33 3134 555c 3236 3201 26\246\314U\262. │ │ │ -00003c60: 5c32 3033 5c5c 025c 3231 3154 5c32 3632 \203\\.\211T\262 │ │ │ -00003c70: 015c 3236 365c 3230 335c 3236 3201 5c33 .\266\203\262.\3 │ │ │ -00003c80: 3237 035f 035c 3332 325c 3234 3504 5c33 27._.\322\245.\3 │ │ │ -00003c90: 3235 5c32 3435 5b05 5c33 3236 5c32 3435 25\245[.\326\245 │ │ │ -00003ca0: 5c33 3331 5c32 3131 5c32 3131 405c 3236 \331\211\211@\26 │ │ │ -00003cb0: 3201 015c 3231 3141 405c 3236 3201 025c 2..\211A@\262..\ │ │ │ -00003cc0: 3331 3101 385c 3236 3201 015c 3332 3004 311.8\262..\320. │ │ │ -00003cd0: 535f 5c5c 035c 3331 3156 5c32 3033 5c33 S_\\.\311V\203\3 │ │ │ -00003ce0: 3033 025c 3231 315c 3332 315c 3332 3206 03.\211\321\322. │ │ │ -00003cf0: 065f 5c5c 5c33 3233 5c32 3435 5a5c 3236 ._\\\323\245Z\26 │ │ │ -00003d00: 3201 015c 3231 315c 3331 3457 5c32 3033 2..\211\314W\203 │ │ │ -00003d10: 5c32 3434 025c 3332 3401 2153 5c32 3632 \244.\324.!S\262 │ │ │ -00003d20: 015c 3231 315c 3332 325c 3234 365c 3331 .\211\322\246\31 │ │ │ -00003d30: 3455 5c32 3035 5c32 3732 025c 3231 315c 4U\205\272.\211\ │ │ │ -00003d40: 3332 355c 3234 365c 3331 3455 3f5c 3230 325\246\314U?\20 │ │ │ -00003d50: 365c 3237 3202 5c32 3131 5c33 3236 5c32 6\272.\211\326\2 │ │ │ -00003d60: 3436 5c33 3134 555c 3236 3201 5c32 3033 46\314U\262.\203 │ │ │ -00003d70: 5c33 3033 025c 3231 3154 5c32 3632 015c \303.\211T\262.\ │ │ │ -00003d80: 3236 365c 3230 335c 3236 3201 2606 5c32 266\203\262.&.\2 │ │ │ -00003d90: 3636 5c32 3032 5c32 3632 015c 3331 3106 66\202\262.\311. │ │ │ -00003da0: 085c 3331 3301 1902 1a06 0618 0404 585c .\313.........X\ │ │ │ -00003db0: 3230 337e 045c 3333 3301 5c33 3334 205c 203~.\333.\334 \ │ │ │ -00003dc0: 225c 3236 3201 5c33 3335 5c33 3133 095c "\262.\335\313.\ │ │ │ -00003dd0: 3331 3457 5c32 3033 5c33 3630 0209 5411 314W\203\360..T. │ │ │ -00003de0: 5c33 3137 0903 5f5c 6e5c 3333 365c 3333 \317.._\n\336\33 │ │ │ -00003df0: 3724 5c32 3632 015c 3334 3001 035c 2254 7$\262.\340..\"T │ │ │ -00003e00: 125c 3231 3102 5c32 3435 115c 3231 315c .\211.\245.\211\ │ │ │ -00003e10: 3331 3457 5c32 3033 1303 5c6e 5c33 3132 314W\203..\n\312 │ │ │ -00003e20: 565c 3230 3313 0309 5311 095c 3331 3257 V\203...S..\312W │ │ │ -00003e30: 5c32 3033 1c03 0953 115c 3236 3602 5c6e \203...S.\266.\n │ │ │ -00003e40: 5c33 3132 0945 5c32 3131 5c33 3131 0138 \312.E\211\311.8 │ │ │ -00003e50: 5c32 3632 015c 3331 3301 5c33 3134 555c \262.\313.\314U\ │ │ │ -00003e60: 3230 3335 035c 3331 355c 3331 3621 5c32 2035.\315\316!\2 │ │ │ -00003e70: 3032 7504 015c 3331 3456 5c32 3033 5c32 02u..\314V\203\2 │ │ │ -00003e80: 3533 0301 535c 3236 3201 5c33 3137 035c 53..S\262.\317.\ │ │ │ -00003e90: 3231 315c 3231 3140 5c32 3632 0101 5c32 211\211@\262..\2 │ │ │ -00003ea0: 3131 4140 5c32 3632 0102 5c33 3131 0138 11A@\262..\311.8 │ │ │ -00003eb0: 5c32 3632 0101 5c33 3230 0453 5f5c 5c03 \262..\320.S_\\. │ │ │ -00003ec0: 5c33 3131 565c 3230 335c 3232 3603 5c32 \311V\203\226.\2 │ │ │ -00003ed0: 3131 5c33 3231 5c33 3232 0606 5f5c 5c5c 11\321\322.._\\\ │ │ │ -00003ee0: 3332 335c 3234 355a 5c32 3632 0101 5c32 323\245Z\262..\2 │ │ │ -00003ef0: 3131 5c33 3134 575c 3230 3377 035c 3332 11\314W\203w.\32 │ │ │ -00003f00: 3401 2153 5c32 3632 015c 3231 315c 3332 4.!S\262.\211\32 │ │ │ -00003f10: 325c 3234 365c 3331 3455 5c32 3035 5c32 2\246\314U\205\2 │ │ │ -00003f20: 3135 035c 3231 315c 3332 355c 3234 365c 15.\211\325\246\ │ │ │ -00003f30: 3331 3455 3f5c 3230 365c 3231 3503 5c32 314U?\206\215.\2 │ │ │ -00003f40: 3131 5c33 3236 5c32 3436 5c33 3134 555c 11\326\246\314U\ │ │ │ -00003f50: 3236 3201 5c32 3033 5c32 3236 035c 3231 262.\203\226.\21 │ │ │ -00003f60: 3154 5c32 3632 015c 3236 365c 3230 335c 1T\262.\266\203\ │ │ │ -00003f70: 3236 3201 5c33 3237 035f 035c 3332 325c 262.\327._.\322\ │ │ │ -00003f80: 3234 3504 5c33 3235 5c32 3435 5b05 5c33 245.\325\245[.\3 │ │ │ -00003f90: 3236 5c32 3435 255c 3230 3275 045c 3332 26\245%\202u.\32 │ │ │ -00003fa0: 3402 5421 5c32 3632 015c 3333 3003 5c32 4.T!\262.\330.\2 │ │ │ -00003fb0: 3131 5c32 3131 405c 3236 3201 015c 3231 11\211@\262..\21 │ │ │ -00003fc0: 3141 405c 3236 3201 025c 3331 3101 385c 1A@\262..\311.8\ │ │ │ -00003fd0: 3236 3201 015c 3332 3004 535f 5c5c 035c 262..\320.S_\\.\ │ │ │ -00003fe0: 3331 3156 5c32 3033 0804 5c32 3131 5c33 311V\203..\211\3 │ │ │ -00003ff0: 3231 5c33 3232 0606 5f5c 5c5c 3332 335c 21\322.._\\\323\ │ │ │ -00004000: 3234 355a 5c32 3632 0101 5c32 3131 5c33 245Z\262..\211\3 │ │ │ -00004010: 3134 575c 3230 335c 3335 3103 5c33 3234 14W\203\351.\324 │ │ │ -00004020: 0121 535c 3236 3201 5c32 3131 5c33 3232 .!S\262.\211\322 │ │ │ -00004030: 5c32 3436 5c33 3134 555c 3230 355c 3337 \246\314U\205\37 │ │ │ -00004040: 3703 5c32 3131 5c33 3235 5c32 3436 5c33 7.\211\325\246\3 │ │ │ -00004050: 3134 553f 5c32 3036 5c33 3737 035c 3231 14U?\206\377.\21 │ │ │ -00004060: 315c 3332 365c 3234 365c 3331 3455 5c32 1\326\246\314U\2 │ │ │ -00004070: 3632 015c 3230 3308 045c 3231 3154 5c32 62.\203..\211T\2 │ │ │ -00004080: 3632 015c 3236 365c 3230 335c 3236 3201 62.\266\203\262. │ │ │ -00004090: 5c33 3237 035f 035c 3332 325c 3234 3504 \327._.\322\245. │ │ │ -000040a0: 5c33 3235 5c32 3435 5b05 5c33 3236 5c32 \325\245[.\326\2 │ │ │ -000040b0: 3435 5c33 3331 5c32 3131 5c32 3131 405c 45\331\211\211@\ │ │ │ -000040c0: 3236 3201 015c 3231 3141 405c 3236 3201 262..\211A@\262. │ │ │ -000040d0: 025c 3331 3101 385c 3236 3201 015c 3332 .\311.8\262..\32 │ │ │ -000040e0: 3004 535f 5c5c 035c 3331 3156 5c32 3033 0.S_\\.\311V\203 │ │ │ -000040f0: 6f04 5c32 3131 5c33 3231 5c33 3232 0606 o.\211\321\322.. │ │ │ -00004100: 5f5c 5c5c 3332 335c 3234 355a 5c32 3632 _\\\323\245Z\262 │ │ │ -00004110: 0101 5c32 3131 5c33 3134 575c 3230 3350 ..\211\314W\203P │ │ │ -00004120: 045c 3332 3401 2153 5c32 3632 015c 3231 .\324.!S\262.\21 │ │ │ -00004130: 315c 3332 325c 3234 365c 3331 3455 5c32 1\322\246\314U\2 │ │ │ -00004140: 3035 6604 5c32 3131 5c33 3235 5c32 3436 05f.\211\325\246 │ │ │ -00004150: 5c33 3134 553f 5c32 3036 6604 5c32 3131 \314U?\206f.\211 │ │ │ -00004160: 5c33 3236 5c32 3436 5c33 3134 555c 3236 \326\246\314U\26 │ │ │ -00004170: 3201 5c32 3033 6f04 5c32 3131 545c 3236 2.\203o.\211T\26 │ │ │ -00004180: 3201 5c32 3636 5c32 3033 5c32 3632 0126 2.\266\203\262.& │ │ │ -00004190: 065c 3236 365c 3230 325c 3236 3201 5c32 .\266\202\262.\2 │ │ │ -000041a0: 3632 055c 3230 325c 3333 3002 5c32 3132 62.\202\330.\212 │ │ │ -000041b0: 5c33 3431 0b21 715c 3231 305c 3334 325c \341.!q\210\342\ │ │ │ -000041c0: 3334 3321 5c32 3034 5c32 3135 045c 3334 343!\204\215.\34 │ │ │ -000041d0: 3320 5c32 3130 5c33 3133 145c 3334 3415 3 \210\313.\344. │ │ │ -000041e0: 5c33 3435 205c 3231 305c 3334 360b 215c \345 \210\346.!\ │ │ │ -000041f0: 3231 305c 3334 3706 0b06 0b55 5c32 3033 210\347....U\203 │ │ │ -00004200: 5c32 3533 045c 3335 305c 3335 3106 0806 \253.\350\351... │ │ │ -00004210: 0e23 5c32 3032 5c32 3634 045c 3335 305c .#\202\264.\350\ │ │ │ -00004220: 3335 3206 0806 0e06 0e24 215c 3231 305c 352......$!\210\ │ │ │ -00004230: 3335 335c 3335 3402 5c33 3535 2363 5c32 353\354.\355#c\2 │ │ │ -00004240: 3130 6562 5c32 3130 5c33 3536 5c33 3133 10eb\210\356\313 │ │ │ -00004250: 215c 3231 305c 3334 3414 5c33 3036 5c33 !\210\344.\306\3 │ │ │ -00004260: 3537 212c 5c32 3037 2220 5b63 616c 656e 57!,\207" [calen │ │ │ -00004270: 6461 722d 686f 6c69 6461 7973 2064 6973 dar-holidays dis │ │ │ -00004280: 706c 6179 6564 2d79 6561 7220 6469 7370 played-year disp │ │ │ -00004290: 6c61 7965 642d 6d6f 6e74 6820 686f 6c69 layed-month holi │ │ │ -000042a0: 6461 792d 6275 6666 6572 2062 7566 6665 day-buffer buffe │ │ │ -000042b0: 722d 7265 6164 2d6f 6e6c 7920 6275 6666 r-read-only buff │ │ │ -000042c0: 6572 2d75 6e64 6f2d 6c69 7374 206d 6573 er-undo-list mes │ │ │ -000042d0: 7361 6765 2022 436f 6d70 7574 696e 6720 sage "Computing │ │ │ -000042e0: 686f 6c69 6461 7973 2e2e 2e22 2022 486f holidays..." "Ho │ │ │ -000042f0: 6c69 6461 7973 2220 3220 3120 6e69 6c20 lidays" 2 1 nil │ │ │ -00004300: 3020 7573 6572 2d65 7272 6f72 2022 5468 0 user-error "Th │ │ │ -00004310: 6572 6520 7761 7320 6e6f 2079 6561 7220 ere was no year │ │ │ -00004320: 7a65 726f 2220 2b20 3331 2032 3320 3420 zero" + 31 23 4 │ │ │ -00004330: 3130 2061 6273 2031 3030 2034 3030 2033 10 abs 100 400 3 │ │ │ -00004340: 3635 202d 2028 3132 2033 3120 2d31 2920 65 - (12 31 -1) │ │ │ -00004350: 3131 2061 7070 656e 6420 6361 6c65 6e64 11 append calend │ │ │ -00004360: 6172 2d68 6f6c 6964 6179 2d6c 6973 7420 ar-holiday-list │ │ │ -00004370: 3132 202d 3120 3320 6d6f 6420 6765 742d 12 -1 3 mod get- │ │ │ -00004380: 6275 6666 6572 2d63 7265 6174 6520 6465 buffer-create de │ │ │ -00004390: 7269 7665 642d 6d6f 6465 2d70 2073 7065 rived-mode-p spe │ │ │ -000043a0: 6369 616c 2d6d 6f64 6520 7420 6572 6173 cial-mode t eras │ │ │ -000043b0: 652d 6275 6666 6572 2064 6973 706c 6179 e-buffer display │ │ │ -000043c0: 2d62 7566 6665 7220 6361 6c65 6e64 6172 -buffer calendar │ │ │ -000043d0: 2d73 6574 2d6d 6f64 652d 6c69 6e65 2066 -set-mode-line f │ │ │ -000043e0: 6f72 6d61 7420 2225 7320 666f 7220 2573 ormat "%s for %s │ │ │ -000043f0: 2220 2225 7320 666f 7220 2573 2d25 7322 " "%s for %s-%s" │ │ │ -00004400: 206d 6170 636f 6e63 6174 2023 5b32 3537 mapconcat #[257 │ │ │ -00004410: 2022 5c33 3030 0140 215c 3330 3102 4140 "\300.@!\301.A@ │ │ │ -00004420: 515c 3230 3722 205b 6361 6c65 6e64 6172 Q\207" [calendar │ │ │ -00004430: 2d64 6174 652d 7374 7269 6e67 2022 3a20 -date-string ": │ │ │ -00004440: 225d 2034 2022 5c6e 5c6e 2866 6e20 5829 "] 4 "\n\n(fn X) │ │ │ -00004450: 225d 2022 5c6e 2220 7365 742d 6275 6666 "] "\n" set-buff │ │ │ -00004460: 6572 2d6d 6f64 6966 6965 642d 7020 2243 er-modified-p "C │ │ │ -00004470: 6f6d 7075 7469 6e67 2068 6f6c 6964 6179 omputing holiday │ │ │ -00004480: 732e 2e2e 646f 6e65 225d 2032 3920 2823 s...done"] 29 (# │ │ │ -00004490: 2420 2e20 3133 3136 3229 2028 6279 7465 $ . 13162) (byte │ │ │ -000044a0: 2d63 6f64 6520 225c 3330 365c 3330 375c -code "\306\307\ │ │ │ -000044b0: 3331 305c 3331 315c 3331 3220 5c33 3133 310\311\312 \313 │ │ │ -000044c0: 0138 5c32 3632 0121 235c 3330 365c 3331 .8\262.!#\306\31 │ │ │ -000044d0: 345c 3331 3503 5c22 5c33 3136 5c33 3137 4\315.\"\316\317 │ │ │ -000044e0: 5c33 3230 5c33 3231 5c33 3232 0607 215c \320\321\322..!\ │ │ │ -000044f0: 3332 335c 225c 3332 345c 3332 3525 5c33 323\"\324\325%\3 │ │ │ -00004500: 3131 0421 235c 3332 3618 5c33 3237 0942 11.!#\326.\327.B │ │ │ -00004510: 5c33 3330 5c33 3331 4343 425c 6e5c 3230 \330\331CCB\n\20 │ │ │ -00004520: 3534 005c 3333 325c 6e42 0b5c 3230 353b 54.\332\nB.\205; │ │ │ -00004530: 005c 3333 330b 425c 665c 3230 3542 005c .\333.B\f\205B.\ │ │ │ -00004540: 3333 345c 6642 0d5c 3230 3549 005c 3333 334\fB.\205I.\33 │ │ │ -00004550: 350d 420e 2e5c 3230 3552 005c 3333 360e 5.B..\205R.\336. │ │ │ -00004560: 2e42 0e2f 5c32 3035 5b00 5c33 3337 0e2f .B./\205[.\337./ │ │ │ -00004570: 420e 305c 3230 3564 005c 3334 300e 3042 B.0\205d.\340.0B │ │ │ -00004580: 0e31 5c32 3035 6d00 5c33 3431 0e31 420e .1\205m.\341.1B. │ │ │ -00004590: 325c 3230 3576 005c 3334 320e 3242 5c33 2\205v.\342.2B\3 │ │ │ -000045a0: 3433 5c33 3434 425c 3235 375c 665c 3334 43\344B\257\f\34 │ │ │ -000045b0: 355c 3334 365c 3334 3703 5c33 3434 5c33 5\346\347.\344\3 │ │ │ -000045c0: 3236 2421 5c32 3131 5c33 3433 5c32 3330 26$!\211\343\230 │ │ │ -000045d0: 5c32 3033 5c32 3230 005c 3335 305c 3335 \203\220.\350\35 │ │ │ -000045e0: 3121 4a5c 3230 325c 3232 3500 5c33 3532 1!J\202\225.\352 │ │ │ -000045f0: 0103 5c22 4101 5c33 3330 5c32 3330 5c32 ..\"A.\330\230\2 │ │ │ -00004600: 3033 5c32 3337 0001 5c32 3032 5c32 3535 03\237..\202\255 │ │ │ -00004610: 0001 5c33 3533 5c32 3335 5c32 3033 5c32 ..\353\235\203\2 │ │ │ -00004620: 3531 005c 3335 345c 3230 325c 3235 3500 51.\354\202\255. │ │ │ -00004630: 5c33 3134 5c33 3535 035c 2205 0503 0346 \314\355.\"....F │ │ │ -00004640: 295c 3230 3722 205b 636f 6d70 6c65 7469 )\207" [completi │ │ │ -00004650: 6f6e 2d69 676e 6f72 652d 6361 7365 2063 on-ignore-case c │ │ │ -00004660: 616c 656e 6461 722d 686f 6c69 6461 7973 alendar-holidays │ │ │ -00004670: 2068 6f6c 6964 6179 2d67 656e 6572 616c holiday-general │ │ │ -00004680: 2d68 6f6c 6964 6179 7320 686f 6c69 6461 -holidays holida │ │ │ -00004690: 792d 6c6f 6361 6c2d 686f 6c69 6461 7973 y-local-holidays │ │ │ -000046a0: 2068 6f6c 6964 6179 2d6f 7468 6572 2d68 holiday-other-h │ │ │ -000046b0: 6f6c 6964 6179 7320 686f 6c69 6461 792d olidays holiday- │ │ │ -000046c0: 6368 7269 7374 6961 6e2d 686f 6c69 6461 christian-holida │ │ │ -000046d0: 7973 2063 616c 656e 6461 722d 7265 6164 ys calendar-read │ │ │ -000046e0: 2022 5374 6172 7469 6e67 2079 6561 7220 "Starting year │ │ │ -000046f0: 6f66 2068 6f6c 6964 6179 7320 283e 3029 of holidays (>0) │ │ │ -00004700: 3a20 2220 235b 3235 3720 225c 3231 315c : " #[257 "\211\ │ │ │ -00004710: 3330 3056 5c32 3037 2220 5b30 5d20 3320 300V\207" [0] 3 │ │ │ -00004720: 225c 6e5c 6e28 666e 2058 2922 5d20 6e75 "\n\n(fn X)"] nu │ │ │ -00004730: 6d62 6572 2d74 6f2d 7374 7269 6e67 2063 mber-to-string c │ │ │ -00004740: 616c 656e 6461 722d 6375 7272 656e 742d alendar-current- │ │ │ -00004750: 6461 7465 2032 2066 6f72 6d61 7420 2245 date 2 format "E │ │ │ -00004760: 6e64 696e 6720 7965 6172 2028 696e 636c nding year (incl │ │ │ -00004770: 7573 6976 6529 206f 6620 686f 6c69 6461 usive) of holida │ │ │ -00004780: 7973 2028 3e3d 2573 293a 2022 206d 616b ys (>=%s): " mak │ │ │ -00004790: 652d 6279 7465 2d63 6f64 6520 3235 3720 e-byte-code 257 │ │ │ -000047a0: 225c 3231 315c 3330 3059 5c32 3037 2220 "\211\300Y\207" │ │ │ -000047b0: 7663 6f6e 6361 7420 7665 6374 6f72 205b vconcat vector [ │ │ │ -000047c0: 5d20 3320 225c 6e5c 6e28 666e 2058 2922 ] 3 "\n\n(fn X)" │ │ │ -000047d0: 2074 2022 416c 6c22 2022 4571 7569 6e6f t "All" "Equino │ │ │ -000047e0: 7865 732f 536f 6c73 7469 6365 7322 2073 xes/Solstices" s │ │ │ -000047f0: 6f6c 6172 2d65 7175 696e 6f78 6573 2d73 olar-equinoxes-s │ │ │ -00004800: 6f6c 7374 6963 6573 2022 4765 6e65 7261 olstices "Genera │ │ │ -00004810: 6c22 2022 4c6f 6361 6c22 2022 4f74 6865 l" "Local" "Othe │ │ │ -00004820: 7222 2022 4368 7269 7374 6961 6e22 2022 r" "Christian" " │ │ │ -00004830: 4865 6272 6577 2220 2249 736c 616d 6963 Hebrew" "Islamic │ │ │ -00004840: 2220 2242 6168 c3a1 e280 99c3 ad22 2022 " "Bah......." " │ │ │ -00004850: 4f72 6965 6e74 616c 2220 2253 6f6c 6172 Oriental" "Solar │ │ │ -00004860: 2220 2241 736b 2220 6e69 6c20 6361 7069 " "Ask" nil capi │ │ │ -00004870: 7461 6c69 7a65 2063 6f6d 706c 6574 696e talize completin │ │ │ -00004880: 672d 7265 6164 2022 4c69 7374 2028 5441 g-read "List (TA │ │ │ -00004890: 4220 666f 7220 6368 6f69 6365 7329 3a20 B for choices): │ │ │ -000048a0: 2220 7265 6164 2d76 6172 6961 626c 6520 " read-variable │ │ │ -000048b0: 2245 6e74 6572 206c 6973 7420 6e61 6d65 "Enter list name │ │ │ -000048c0: 3a20 2220 6173 736f 6320 2822 4173 6b22 : " assoc ("Ask" │ │ │ -000048d0: 2022 2229 2022 486f 6c69 6461 7973 2220 "") "Holidays" │ │ │ -000048e0: 2225 7320 486f 6c69 6461 7973 2220 686f "%s Holidays" ho │ │ │ -000048f0: 6c69 6461 792d 6865 6272 6577 2d68 6f6c liday-hebrew-hol │ │ │ -00004900: 6964 6179 7320 686f 6c69 6461 792d 6973 idays holiday-is │ │ │ -00004910: 6c61 6d69 632d 686f 6c69 6461 7973 2068 lamic-holidays h │ │ │ -00004920: 6f6c 6964 6179 2d62 6168 6169 2d68 6f6c oliday-bahai-hol │ │ │ -00004930: 6964 6179 7320 686f 6c69 6461 792d 6f72 idays holiday-or │ │ │ -00004940: 6965 6e74 616c 2d68 6f6c 6964 6179 7320 iental-holidays │ │ │ -00004950: 686f 6c69 6461 792d 736f 6c61 722d 686f holiday-solar-ho │ │ │ -00004960: 6c69 6461 7973 5d20 3135 295d 290a 2864 lidays] 15)]).(d │ │ │ -00004970: 6566 616c 6961 7320 2768 6f6c 6964 6179 efalias 'holiday │ │ │ -00004980: 2d6c 6973 7420 276c 6973 742d 686f 6c69 -list 'list-holi │ │ │ -00004990: 6461 7973 290a 2340 3236 3820 4368 6563 days).#@268 Chec │ │ │ -000049a0: 6b20 7468 6520 6c69 7374 206f 6620 686f k the list of ho │ │ │ -000049b0: 6c69 6461 7973 2066 6f72 2061 6e79 2074 lidays for any t │ │ │ -000049c0: 6861 7420 6f63 6375 7220 6f6e 2044 4154 hat occur on DAT │ │ │ -000049d0: 452e 0a44 4154 4520 6973 2061 206c 6973 E..DATE is a lis │ │ │ -000049e0: 7420 286d 6f6e 7468 2064 6179 2079 6561 t (month day yea │ │ │ -000049f0: 7229 2e20 2054 6869 7320 6675 6e63 7469 r). This functi │ │ │ -00004a00: 6f6e 2063 6f6e 7369 6465 7273 2074 6865 on considers the │ │ │ -00004a10: 0a68 6f6c 6964 6179 7320 6672 6f6d 2074 .holidays from t │ │ │ -00004a20: 6865 206c 6973 7420 6063 616c 656e 6461 he list `calenda │ │ │ -00004a30: 722d 686f 6c69 6461 7973 272c 2061 6e64 r-holidays', and │ │ │ -00004a40: 2072 6574 7572 6e73 2061 206c 6973 7420 returns a list │ │ │ -00004a50: 6f66 0a73 7472 696e 6773 2064 6573 6372 of.strings descr │ │ │ -00004a60: 6962 696e 6720 7468 6f73 6520 686f 6c69 ibing those holi │ │ │ -00004a70: 6461 7973 2074 6861 7420 6170 706c 7920 days that apply │ │ │ -00004a80: 6f6e 2044 4154 452c 206f 7220 6e69 6c20 on DATE, or nil │ │ │ -00004a90: 6966 206e 6f6e 6520 646f 2e0a 0a28 666e if none do...(fn │ │ │ -00004aa0: 2044 4154 4529 1f0a 2864 6566 616c 6961 DATE)..(defalia │ │ │ -00004ab0: 7320 2763 616c 656e 6461 722d 6368 6563 s 'calendar-chec │ │ │ -00004ac0: 6b2d 686f 6c69 6461 7973 2023 5b32 3537 k-holidays #[257 │ │ │ -00004ad0: 2022 5c32 3131 5c32 3131 405c 3236 3201 "\211\211@\262. │ │ │ -00004ae0: 015c 3330 3201 385c 3236 3201 5c33 3033 .\302.8\262.\303 │ │ │ -00004af0: 0118 0219 5c33 3034 205c 3231 315c 3230 ....\304 \211\20 │ │ │ -00004b00: 332f 005c 3231 3140 5c33 3035 0606 0240 3/.\211@\305...@ │ │ │ -00004b10: 5c22 5c32 3033 2800 5c33 3036 0302 415c \"\203(.\306..A\ │ │ │ -00004b20: 225c 3236 3203 0141 5c32 3636 5c32 3032 "\262..A\266\202 │ │ │ -00004b30: 5c32 3032 1200 015c 3236 3201 2a5c 3230 \202...\262.*\20 │ │ │ -00004b40: 3722 205b 6469 7370 6c61 7965 642d 7965 7" [displayed-ye │ │ │ -00004b50: 6172 2064 6973 706c 6179 6564 2d6d 6f6e ar displayed-mon │ │ │ -00004b60: 7468 2032 206e 696c 2063 616c 656e 6461 th 2 nil calenda │ │ │ -00004b70: 722d 686f 6c69 6461 792d 6c69 7374 2063 r-holiday-list c │ │ │ -00004b80: 616c 656e 6461 722d 6461 7465 2d65 7175 alendar-date-equ │ │ │ -00004b90: 616c 2061 7070 656e 645d 2039 2028 2324 al append] 9 (#$ │ │ │ -00004ba0: 202e 2031 3838 3434 295d 290a 2340 3833 . 18844)]).#@83 │ │ │ -00004bb0: 2047 656e 6572 6174 6520 6120 6c69 7374 Generate a list │ │ │ -00004bc0: 206f 6620 616c 6c20 686f 6c69 6461 7973 of all holidays │ │ │ -00004bd0: 2069 6e20 7261 6e67 6520 6672 6f6d 2061 in range from a │ │ │ -00004be0: 6273 6f6c 7574 6520 6461 7465 2044 3120 bsolute date D1 │ │ │ -00004bf0: 746f 2044 322e 0a0a 2866 6e20 4431 2044 to D2...(fn D1 D │ │ │ -00004c00: 3229 1f0a 2864 6566 616c 6961 7320 2768 2)..(defalias 'h │ │ │ -00004c10: 6f6c 6964 6179 2d69 6e2d 7261 6e67 6520 oliday-in-range │ │ │ -00004c20: 235b 3531 3420 225c 3330 3202 215c 3231 #[514 "\302.!\21 │ │ │ -00004c30: 315c 3231 3140 5c32 3632 0118 5c32 3131 1\211@\262..\211 │ │ │ -00004c40: 5c33 3033 0138 5c32 3632 0119 5c33 3032 \303.8\262..\302 │ │ │ -00004c50: 0221 5c32 3131 5c32 3131 405c 3236 3201 .!\211\211@\262. │ │ │ -00004c60: 015c 3330 3301 385c 3236 3201 5c33 3034 .\303.8\262.\304 │ │ │ -00004c70: 0809 0404 245c 3330 355c 3234 3554 5c33 ....$\305\245T\3 │ │ │ -00004c80: 3036 5c32 3131 5c32 3131 5c33 3037 5c33 06\211\211\307\3 │ │ │ -00004c90: 3036 095c 3331 3057 5c32 3033 3500 0954 06.\310W\2035..T │ │ │ -00004ca0: 115c 3331 3109 035f 085c 3331 325c 3331 .\311.._.\312\31 │ │ │ -00004cb0: 3324 5c32 3632 015c 3331 3401 035c 2254 3$\262.\314..\"T │ │ │ -00004cc0: 105c 3231 3102 5c32 3435 115c 3231 315c .\211.\245.\211\ │ │ │ -00004cd0: 3331 3057 5c32 3033 5800 085c 3331 3356 310W\203X..\313V │ │ │ -00004ce0: 5c32 3033 5800 0953 1109 5c33 3133 575c \203X..S..\313W\ │ │ │ -00004cf0: 3230 3361 0009 5311 5c32 3636 0203 5c33 203a..S.\266..\3 │ │ │ -00004d00: 3130 5c32 3131 0257 5c32 3033 5c32 3634 10\211.W\203\264 │ │ │ -00004d10: 005c 3231 315c 3331 3506 065c 3331 3620 .\211\315..\316 │ │ │ -00004d20: 5c22 5c32 3632 065c 3330 375c 3330 3609 \"\262.\307\306. │ │ │ -00004d30: 5c33 3130 575c 3230 337f 0009 5411 5c33 \310W\203...T.\3 │ │ │ -00004d40: 3131 0903 5f08 5c33 3132 5c33 3035 245c 11.._.\312\305$\ │ │ │ -00004d50: 3236 3201 5c33 3134 0103 5c22 5410 5c32 262.\314..\"T.\2 │ │ │ -00004d60: 3131 025c 3234 3511 5c32 3131 5c33 3130 11.\245.\211\310 │ │ │ -00004d70: 575c 3230 335c 3234 3200 085c 3331 3356 W\203\242..\313V │ │ │ -00004d80: 5c32 3033 5c32 3432 0009 5311 095c 3331 \203\242..S..\31 │ │ │ -00004d90: 3357 5c32 3033 5c32 3533 0009 5311 5c32 3W\203\253..S.\2 │ │ │ -00004da0: 3636 035c 3231 3154 5c32 3632 015c 3230 66.\211T\262.\20 │ │ │ -00004db0: 3265 005c 3236 3602 025c 3231 315c 3230 2e.\266..\211\20 │ │ │ -00004dc0: 333d 025c 3231 3140 5c32 3131 405c 3230 3=.\211@\211@\20 │ │ │ -00004dd0: 3336 025c 3231 3140 5c32 3131 5c33 3033 36.\211@\211\303 │ │ │ -00004de0: 0138 5c32 3632 015c 3330 3601 5c33 3130 .8\262.\306.\310 │ │ │ -00004df0: 555c 3230 335c 3332 3700 5c33 3137 5c33 U\203\327.\317\3 │ │ │ -00004e00: 3230 215c 3230 3217 0201 5c33 3130 565c 20!\202...\310V\ │ │ │ -00004e10: 3230 334d 0101 535c 3236 3201 5c33 3131 203M..S\262.\311 │ │ │ -00004e20: 035c 3231 315c 3231 3140 5c32 3632 0101 .\211\211@\262.. │ │ │ -00004e30: 5c32 3131 4140 5c32 3632 0102 5c33 3033 \211A@\262..\303 │ │ │ -00004e40: 0138 5c32 3632 0101 5c33 3231 0453 5f5c .8\262..\321.S_\ │ │ │ -00004e50: 5c03 5c33 3033 565c 3230 3338 015c 3231 \.\303V\2038.\21 │ │ │ -00004e60: 315c 3332 325c 3332 3306 065f 5c5c 5c33 1\322\323.._\\\3 │ │ │ -00004e70: 3234 5c32 3435 5a5c 3236 3201 015c 3231 24\245Z\262..\21 │ │ │ -00004e80: 315c 3331 3057 5c32 3033 1901 5c33 3235 1\310W\203..\325 │ │ │ -00004e90: 0121 535c 3236 3201 5c32 3131 5c33 3233 .!S\262.\211\323 │ │ │ -00004ea0: 5c32 3436 5c33 3130 555c 3230 352f 015c \246\310U\205/.\ │ │ │ -00004eb0: 3231 315c 3332 365c 3234 365c 3331 3055 211\326\246\310U │ │ │ -00004ec0: 3f5c 3230 362f 015c 3231 315c 3332 375c ?\206/.\211\327\ │ │ │ -00004ed0: 3234 365c 3331 3055 5c32 3632 015c 3230 246\310U\262.\20 │ │ │ -00004ee0: 3338 015c 3231 3154 5c32 3632 015c 3236 38.\211T\262.\26 │ │ │ -00004ef0: 365c 3230 335c 3236 3201 5c33 3330 035f 6\203\262.\330._ │ │ │ -00004f00: 035c 3332 335c 3234 3504 5c33 3236 5c32 .\323\245.\326\2 │ │ │ -00004f10: 3435 5b05 5c33 3237 5c32 3435 255c 3230 45[.\327\245%\20 │ │ │ -00004f20: 3217 025c 3332 3502 5421 5c32 3632 015c 2..\325.T!\262.\ │ │ │ -00004f30: 3333 3103 5c32 3131 5c32 3131 405c 3236 331.\211\211@\26 │ │ │ -00004f40: 3201 015c 3231 3141 405c 3236 3201 025c 2..\211A@\262..\ │ │ │ -00004f50: 3330 3301 385c 3236 3201 015c 3332 3104 303.8\262..\321. │ │ │ -00004f60: 535f 5c5c 035c 3330 3356 5c32 3033 5c32 S_\\.\303V\203\2 │ │ │ -00004f70: 3532 015c 3231 315c 3332 325c 3332 3306 52.\211\322\323. │ │ │ -00004f80: 065f 5c5c 5c33 3234 5c32 3435 5a5c 3236 ._\\\324\245Z\26 │ │ │ -00004f90: 3201 015c 3231 315c 3331 3057 5c32 3033 2..\211\310W\203 │ │ │ -00004fa0: 5c32 3133 015c 3332 3501 2153 5c32 3632 \213.\325.!S\262 │ │ │ -00004fb0: 015c 3231 315c 3332 335c 3234 365c 3331 .\211\323\246\31 │ │ │ -00004fc0: 3055 5c32 3035 5c32 3431 015c 3231 315c 0U\205\241.\211\ │ │ │ -00004fd0: 3332 365c 3234 365c 3331 3055 3f5c 3230 326\246\310U?\20 │ │ │ -00004fe0: 365c 3234 3101 5c32 3131 5c33 3237 5c32 6\241.\211\327\2 │ │ │ -00004ff0: 3436 5c33 3130 555c 3236 3201 5c32 3033 46\310U\262.\203 │ │ │ -00005000: 5c32 3532 015c 3231 3154 5c32 3632 015c \252.\211T\262.\ │ │ │ -00005010: 3236 365c 3230 335c 3236 3201 5c33 3330 266\203\262.\330 │ │ │ -00005020: 035f 035c 3332 335c 3234 3504 5c33 3236 ._.\323\245.\326 │ │ │ -00005030: 5c32 3435 5b05 5c33 3237 5c32 3435 5c33 \245[.\327\245\3 │ │ │ -00005040: 3332 5c32 3131 5c32 3131 405c 3236 3201 32\211\211@\262. │ │ │ -00005050: 015c 3231 3141 405c 3236 3201 025c 3330 .\211A@\262..\30 │ │ │ -00005060: 3301 385c 3236 3201 015c 3332 3104 535f 3.8\262..\321.S_ │ │ │ -00005070: 5c5c 035c 3330 3356 5c32 3033 1102 5c32 \\.\303V\203..\2 │ │ │ -00005080: 3131 5c33 3232 5c33 3233 0606 5f5c 5c5c 11\322\323.._\\\ │ │ │ -00005090: 3332 345c 3234 355a 5c32 3632 0101 5c32 324\245Z\262..\2 │ │ │ -000050a0: 3131 5c33 3130 575c 3230 335c 3336 3201 11\310W\203\362. │ │ │ -000050b0: 5c33 3235 0121 535c 3236 3201 5c32 3131 \325.!S\262.\211 │ │ │ -000050c0: 5c33 3233 5c32 3436 5c33 3130 555c 3230 \323\246\310U\20 │ │ │ -000050d0: 3508 025c 3231 315c 3332 365c 3234 365c 5..\211\326\246\ │ │ │ -000050e0: 3331 3055 3f5c 3230 3608 025c 3231 315c 310U?\206..\211\ │ │ │ -000050f0: 3332 375c 3234 365c 3331 3055 5c32 3632 327\246\310U\262 │ │ │ -00005100: 015c 3230 3311 025c 3231 3154 5c32 3632 .\203..\211T\262 │ │ │ -00005110: 015c 3236 365c 3230 335c 3236 3201 2606 .\266\203\262.&. │ │ │ -00005120: 5c32 3636 5c32 3032 5c32 3632 015c 3231 \266\202\262.\21 │ │ │ -00005130: 315c 3236 3204 5c32 3033 3602 060b 0358 1\262.\2036....X │ │ │ -00005140: 5c32 3033 3602 0206 0b58 5c32 3033 3602 \2036....X\2036. │ │ │ -00005150: 5c33 3135 0143 055c 225c 3236 3204 0141 \315.C.\"\262..A │ │ │ -00005160: 5c32 3636 5c32 3032 5c32 3032 5c32 3637 \266\202\202\267 │ │ │ -00005170: 005c 3231 3001 2a5c 3230 3722 205b 6469 .\210.*\207" [di │ │ │ -00005180: 7370 6c61 7965 642d 6d6f 6e74 6820 6469 splayed-month di │ │ │ -00005190: 7370 6c61 7965 642d 7965 6172 2063 616c splayed-year cal │ │ │ -000051a0: 656e 6461 722d 6772 6567 6f72 6961 6e2d endar-gregorian- │ │ │ -000051b0: 6672 6f6d 2d61 6273 6f6c 7574 6520 3220 from-absolute 2 │ │ │ -000051c0: 6361 6c65 6e64 6172 2d69 6e74 6572 7661 calendar-interva │ │ │ -000051d0: 6c20 3320 6e69 6c20 3132 2030 202b 202d l 3 nil 12 0 + - │ │ │ -000051e0: 3120 3120 6d6f 6420 6170 7065 6e64 2063 1 1 mod append c │ │ │ -000051f0: 616c 656e 6461 722d 686f 6c69 6461 792d alendar-holiday- │ │ │ -00005200: 6c69 7374 2075 7365 722d 6572 726f 7220 list user-error │ │ │ -00005210: 2254 6865 7265 2077 6173 206e 6f20 7965 "There was no ye │ │ │ -00005220: 6172 207a 6572 6f22 2033 3120 3233 2034 ar zero" 31 23 4 │ │ │ -00005230: 2031 3020 6162 7320 3130 3020 3430 3020 10 abs 100 400 │ │ │ -00005240: 3336 3520 2d20 2831 3220 3331 202d 3129 365 - (12 31 -1) │ │ │ -00005250: 5d20 3330 2028 2324 202e 2031 3933 3737 ] 30 (#$ . 19377 │ │ │ -00005260: 295d 290a 2340 3233 3720 4669 6e64 2068 )]).#@237 Find h │ │ │ -00005270: 6f6c 6964 6179 7320 666f 7220 7468 6520 olidays for the │ │ │ -00005280: 6461 7465 2073 7065 6369 6669 6564 2062 date specified b │ │ │ -00005290: 7920 7468 6520 6375 7273 6f72 2069 6e20 y the cursor in │ │ │ -000052a0: 7468 6520 6361 6c65 6e64 6172 2077 696e the calendar win │ │ │ -000052b0: 646f 772e 0a4f 7074 696f 6e61 6c20 4441 dow..Optional DA │ │ │ -000052c0: 5445 2069 7320 6120 6c69 7374 2028 6d6f TE is a list (mo │ │ │ -000052d0: 6e74 6820 6461 7920 7965 6172 2920 746f nth day year) to │ │ │ -000052e0: 2075 7365 2069 6e73 7465 6164 206f 6620 use instead of │ │ │ -000052f0: 7468 650a 6375 7273 6f72 2070 6f73 6974 the.cursor posit │ │ │ -00005300: 696f 6e2e 2020 4556 454e 5420 7370 6563 ion. EVENT spec │ │ │ -00005310: 6966 6965 7320 6120 6275 6666 6572 2070 ifies a buffer p │ │ │ -00005320: 6f73 6974 696f 6e20 746f 2075 7365 2066 osition to use f │ │ │ -00005330: 6f72 2061 2064 6174 652e 0a0a 2866 6e20 or a date...(fn │ │ │ -00005340: 266f 7074 696f 6e61 6c20 4441 5445 2045 &optional DATE E │ │ │ -00005350: 5645 4e54 291f 0a28 6465 6661 6c69 6173 VENT)..(defalias │ │ │ -00005360: 2027 6361 6c65 6e64 6172 2d63 7572 736f 'calendar-curso │ │ │ -00005370: 722d 686f 6c69 6461 7973 2023 5b35 3132 r-holidays #[512 │ │ │ -00005380: 2022 5c33 3033 5c33 3034 215c 3231 3001 "\303\304!\210. │ │ │ -00005390: 5c32 3034 0e00 5c33 3035 5c33 3036 025c \204..\305\306.\ │ │ │ -000053a0: 225c 3236 3202 5c33 3037 0221 5c33 3130 "\262.\307.!\310 │ │ │ -000053b0: 0321 5c33 3131 5c32 3131 5c33 3132 0521 .!\311\211\312.! │ │ │ -000053c0: 5c32 3033 5200 5c33 3133 205c 3230 3343 \203R.\313 \203C │ │ │ -000053d0: 005c 3331 3405 5c33 3135 5c33 3136 0607 .\314.\315\316.. │ │ │ -000053e0: 5c22 5c33 3137 5c33 3135 5c33 3136 0609 \"\317\315\316.. │ │ │ -000053f0: 5c22 4306 075c 3230 333c 005c 3332 305c \"C..\203<.\320\ │ │ │ -00005400: 3332 3106 095c 225c 3230 323d 005c 3332 321..\"\202=.\32 │ │ │ -00005410: 325c 2244 5c22 5c32 3032 4600 5c33 3233 2\"D\"\202F.\323 │ │ │ -00005420: 5c33 3234 215c 3231 315c 3236 3203 5c32 \324!\211\262.\2 │ │ │ -00005430: 3035 5c32 3530 005c 3332 3502 215c 3230 05\250.\325.!\20 │ │ │ -00005440: 325c 3235 3000 025c 3230 345d 005c 3330 2\250..\204].\30 │ │ │ -00005450: 335c 3332 3605 5c22 5c32 3032 5c32 3530 3\326.\"\202\250 │ │ │ -00005460: 005c 3331 355c 3332 3705 5c33 3330 5c33 .\315\327.\330\3 │ │ │ -00005470: 3331 0607 5c33 3332 2323 5c32 3131 5c32 31..\332##\211\2 │ │ │ -00005480: 3632 0247 5c33 3333 2058 5c32 3033 7800 62.G\333 X\203x. │ │ │ -00005490: 5c33 3033 5c33 3334 025c 225c 3230 325c \303\334.\"\202\ │ │ │ -000054a0: 3235 3000 5c33 3335 0821 715c 3231 305c 250.\335.!q\210\ │ │ │ -000054b0: 3333 365c 3333 3721 5c32 3034 5c32 3036 336\337!\204\206 │ │ │ -000054c0: 005c 3333 3720 5c32 3130 5c33 3131 115c .\337 \210\311.\ │ │ │ -000054d0: 3330 3612 5c33 3430 205c 3231 305c 3334 306.\340 \210\34 │ │ │ -000054e0: 3108 215c 3231 305c 3334 3204 215c 3231 1.!\210\342.!\21 │ │ │ -000054f0: 305c 3333 305c 3333 3104 5c33 3433 2363 0\330\331.\343#c │ │ │ -00005500: 5c32 3130 6562 5c32 3130 5c33 3434 5c33 \210eb\210\344\3 │ │ │ -00005510: 3131 215c 3231 305c 3330 3611 5c33 3033 11!\210\306.\303 │ │ │ -00005520: 5c33 3435 215c 3230 3722 205b 686f 6c69 \345!\207" [holi │ │ │ -00005530: 6461 792d 6275 6666 6572 2062 7566 6665 day-buffer buffe │ │ │ -00005540: 722d 7265 6164 2d6f 6e6c 7920 6275 6666 r-read-only buff │ │ │ -00005550: 6572 2d75 6e64 6f2d 6c69 7374 206d 6573 er-undo-list mes │ │ │ -00005560: 7361 6765 2022 4368 6563 6b69 6e67 2068 sage "Checking h │ │ │ -00005570: 6f6c 6964 6179 732e 2e2e 2220 6361 6c65 olidays..." cale │ │ │ -00005580: 6e64 6172 2d63 7572 736f 722d 746f 2d64 ndar-cursor-to-d │ │ │ -00005590: 6174 6520 7420 6361 6c65 6e64 6172 2d64 ate t calendar-d │ │ │ -000055a0: 6174 652d 7374 7269 6e67 2063 616c 656e ate-string calen │ │ │ -000055b0: 6461 722d 6368 6563 6b2d 686f 6c69 6461 dar-check-holida │ │ │ -000055c0: 7973 206e 696c 206d 6f75 7365 2d65 7665 ys nil mouse-eve │ │ │ -000055d0: 6e74 2d70 2064 6973 706c 6179 2d70 6f70 nt-p display-pop │ │ │ -000055e0: 7570 2d6d 656e 7573 2d70 2078 2d70 6f70 up-menus-p x-pop │ │ │ -000055f0: 7570 2d6d 656e 7520 666f 726d 6174 2022 up-menu format " │ │ │ -00005600: 486f 6c69 6461 7973 2066 6f72 2025 7322 Holidays for %s" │ │ │ -00005610: 2061 7070 656e 6420 6d61 7063 6172 206c append mapcar l │ │ │ -00005620: 6973 7420 2822 4e6f 6e65 2229 2065 7272 ist ("None") err │ │ │ -00005630: 6f72 2022 506f 7075 7020 6d65 6e75 7320 or "Popup menus │ │ │ -00005640: 6172 6520 6e6f 7420 6176 6169 6c61 626c are not availabl │ │ │ -00005650: 6520 6f6e 2074 6869 7320 7379 7374 656d e on this system │ │ │ -00005660: 2220 6361 6c6c 2d69 6e74 6572 6163 7469 " call-interacti │ │ │ -00005670: 7665 6c79 2022 4e6f 2068 6f6c 6964 6179 vely "No holiday │ │ │ -00005680: 7320 6b6e 6f77 6e20 666f 7220 2573 2220 s known for %s" │ │ │ -00005690: 2225 733a 2020 2573 2220 6d61 7063 6f6e "%s: %s" mapcon │ │ │ -000056a0: 6361 7420 6964 656e 7469 7479 2022 3b20 cat identity "; │ │ │ -000056b0: 2022 2066 7261 6d65 2d77 6964 7468 2022 " frame-width " │ │ │ -000056c0: 2573 2220 6765 742d 6275 6666 6572 2d63 %s" get-buffer-c │ │ │ -000056d0: 7265 6174 6520 6465 7269 7665 642d 6d6f reate derived-mo │ │ │ -000056e0: 6465 2d70 2073 7065 6369 616c 2d6d 6f64 de-p special-mod │ │ │ -000056f0: 6520 6572 6173 652d 6275 6666 6572 2064 e erase-buffer d │ │ │ -00005700: 6973 706c 6179 2d62 7566 6665 7220 6361 isplay-buffer ca │ │ │ -00005710: 6c65 6e64 6172 2d73 6574 2d6d 6f64 652d lendar-set-mode- │ │ │ -00005720: 6c69 6e65 2022 5c6e 2220 7365 742d 6275 line "\n" set-bu │ │ │ -00005730: 6666 6572 2d6d 6f64 6966 6965 642d 7020 ffer-modified-p │ │ │ -00005740: 2243 6865 636b 696e 6720 686f 6c69 6461 "Checking holida │ │ │ -00005750: 7973 2e2e 2e64 6f6e 6522 5d20 3134 2028 ys...done"] 14 ( │ │ │ -00005760: 2324 202e 2032 3130 3938 2920 286c 6973 #$ . 21098) (lis │ │ │ -00005770: 7420 6e69 6c20 6c61 7374 2d6e 6f6e 6d65 t nil last-nonme │ │ │ -00005780: 6e75 2d65 7665 6e74 295d 290a 2340 3135 nu-event)]).#@15 │ │ │ -00005790: 3620 4d61 726b 206e 6f74 6162 6c65 2064 6 Mark notable d │ │ │ -000057a0: 6179 7320 696e 2074 6865 2063 616c 656e ays in the calen │ │ │ -000057b0: 6461 7220 7769 6e64 6f77 2e0a 4966 2045 dar window..If E │ │ │ -000057c0: 5645 4e54 2069 7320 6e6f 6e2d 6e69 6c2c VENT is non-nil, │ │ │ -000057d0: 2069 7427 7320 616e 2065 7665 6e74 2069 it's an event i │ │ │ -000057e0: 6e64 6963 6174 696e 6720 7468 6520 6275 ndicating the bu │ │ │ -000057f0: 6666 6572 2070 6f73 6974 696f 6e20 746f ffer position to │ │ │ -00005800: 0a75 7365 2069 6e73 7465 6164 206f 6620 .use instead of │ │ │ -00005810: 706f 696e 742e 0a0a 2866 6e20 266f 7074 point...(fn &opt │ │ │ -00005820: 696f 6e61 6c20 4556 454e 5429 1f0a 2864 ional EVENT)..(d │ │ │ -00005830: 6566 616c 6961 7320 2763 616c 656e 6461 efalias 'calenda │ │ │ -00005840: 722d 6d61 726b 2d68 6f6c 6964 6179 7320 r-mark-holidays │ │ │ -00005850: 235b 3235 3620 2272 5c32 3131 5c32 3033 #[256 "r\211\203 │ │ │ -00005860: 1100 5c33 3032 5c33 3033 0221 5c32 3131 ..\302\303.!\211 │ │ │ -00005870: 405c 3236 3201 215c 3230 3212 0070 715c @\262.!\202..pq\ │ │ │ -00005880: 3231 305c 3330 3410 5c33 3035 5c33 3036 210\304.\305\306 │ │ │ -00005890: 215c 3231 305c 3330 3720 5c32 3131 5c32 !\210\307 \211\2 │ │ │ -000058a0: 3033 2f00 5c32 3131 405c 3331 3001 4009 03/.\211@\310.@. │ │ │ -000058b0: 5c22 5c32 3130 0141 5c32 3636 5c32 3032 \"\210.A\266\202 │ │ │ -000058c0: 5c32 3032 1c00 5c32 3130 5c33 3035 5c33 \202..\210\305\3 │ │ │ -000058d0: 3131 2129 5c32 3037 2220 5b63 616c 656e 11!)\207" [calen │ │ │ -000058e0: 6461 722d 6d61 726b 2d68 6f6c 6964 6179 dar-mark-holiday │ │ │ -000058f0: 732d 666c 6167 2063 616c 656e 6461 722d s-flag calendar- │ │ │ -00005900: 686f 6c69 6461 792d 6d61 726b 6572 2077 holiday-marker w │ │ │ -00005910: 696e 646f 772d 6275 6666 6572 2065 7665 indow-buffer eve │ │ │ -00005920: 6e74 2d73 7461 7274 2074 206d 6573 7361 nt-start t messa │ │ │ -00005930: 6765 2022 4d61 726b 696e 6720 686f 6c69 ge "Marking holi │ │ │ -00005940: 6461 7973 2e2e 2e22 2063 616c 656e 6461 days..." calenda │ │ │ -00005950: 722d 686f 6c69 6461 792d 6c69 7374 2063 r-holiday-list c │ │ │ -00005960: 616c 656e 6461 722d 6d61 726b 2d76 6973 alendar-mark-vis │ │ │ -00005970: 6962 6c65 2d64 6174 6520 224d 6172 6b69 ible-date "Marki │ │ │ -00005980: 6e67 2068 6f6c 6964 6179 732e 2e2e 646f ng holidays...do │ │ │ -00005990: 6e65 225d 2036 2028 2324 202e 2032 3234 ne"] 6 (#$ . 224 │ │ │ -000059a0: 3138 2920 286c 6973 7420 6c61 7374 2d6e 18) (list last-n │ │ │ -000059b0: 6f6e 6d65 6e75 2d65 7665 6e74 295d 290a onmenu-event)]). │ │ │ -000059c0: 2340 3232 3520 486f 6c69 6461 7920 6f6e #@225 Holiday on │ │ │ -000059d0: 204d 4f4e 5448 2c20 4441 5920 2847 7265 MONTH, DAY (Gre │ │ │ -000059e0: 676f 7269 616e 2920 6361 6c6c 6564 2053 gorian) called S │ │ │ -000059f0: 5452 494e 472e 0a49 6620 4d4f 4e54 482c TRING..If MONTH, │ │ │ -00005a00: 2044 4159 2069 7320 7669 7369 626c 652c DAY is visible, │ │ │ -00005a10: 2074 6865 2076 616c 7565 2072 6574 7572 the value retur │ │ │ -00005a20: 6e65 6420 6973 2074 6865 206c 6973 7420 ned is the list │ │ │ -00005a30: 2828 284d 4f4e 5448 2044 4159 2079 6561 (((MONTH DAY yea │ │ │ -00005a40: 7229 0a53 5452 494e 4729 292e 2020 5265 r).STRING)). Re │ │ │ -00005a50: 7475 726e 7320 6e69 6c20 6966 2069 7420 turns nil if it │ │ │ -00005a60: 6973 206e 6f74 2076 6973 6962 6c65 2069 is not visible i │ │ │ -00005a70: 6e20 7468 6520 6375 7272 656e 7420 6361 n the current ca │ │ │ -00005a80: 6c65 6e64 6172 2077 696e 646f 772e 0a0a lendar window... │ │ │ -00005a90: 2866 6e20 4d4f 4e54 4820 4441 5920 5354 (fn MONTH DAY ST │ │ │ -00005aa0: 5249 4e47 291f 0a28 6465 6661 6c69 6173 RING)..(defalias │ │ │ -00005ab0: 2027 686f 6c69 6461 792d 6669 7865 6420 'holiday-fixed │ │ │ -00005ac0: 235b 3737 3120 2208 095c 3330 325c 3330 #[771 "..\302\30 │ │ │ -00005ad0: 3302 5c33 3034 575c 3230 330e 0002 545c 3.\304W\203...T\ │ │ │ -00005ae0: 3236 3203 5c33 3035 0303 5f05 5c33 3036 262.\305.._.\306 │ │ │ -00005af0: 5c33 3037 060b 5a24 5c32 3632 015c 3331 \307..Z$\262.\31 │ │ │ -00005b00: 3001 035c 2254 5c32 3632 045c 3231 3102 0..\"T\262.\211. │ │ │ -00005b10: 5c32 3435 5c32 3632 035c 3231 315c 3330 \245\262.\211\30 │ │ │ -00005b20: 3457 5c32 3033 3700 035c 3331 3156 5c32 4W\2037..\311V\2 │ │ │ -00005b30: 3033 3700 0253 5c32 3632 0302 5c33 3131 037..S\262..\311 │ │ │ -00005b40: 575c 3230 3341 0002 535c 3236 3203 5c32 W\203A..S\262.\2 │ │ │ -00005b50: 3636 0201 5c33 3132 565c 3230 3550 0004 66..\312V\205P.. │ │ │ -00005b60: 0402 4503 4443 5c32 3037 2220 5b64 6973 ..E.DC\207" [dis │ │ │ -00005b70: 706c 6179 6564 2d6d 6f6e 7468 2064 6973 played-month dis │ │ │ -00005b80: 706c 6179 6564 2d79 6561 7220 3132 206e played-year 12 n │ │ │ -00005b90: 696c 2030 202b 202d 3120 3131 206d 6f64 il 0 + -1 11 mod │ │ │ -00005ba0: 2031 2039 5d20 3133 2028 2324 202e 2032 1 9] 13 (#$ . 2 │ │ │ -00005bb0: 3239 3832 295d 290a 2340 3433 3520 486f 2982)]).#@435 Ho │ │ │ -00005bc0: 6c69 6461 7920 6361 6c6c 6564 2053 5452 liday called STR │ │ │ -00005bd0: 494e 4720 6f6e 2074 6865 204e 7468 2044 ING on the Nth D │ │ │ -00005be0: 4159 4e41 4d45 2061 6674 6572 2f62 6566 AYNAME after/bef │ │ │ -00005bf0: 6f72 6520 4d4f 4e54 4820 4441 592e 0a44 ore MONTH DAY..D │ │ │ -00005c00: 4159 4e41 4d45 3d30 206d 6561 6e73 2053 AYNAME=0 means S │ │ │ -00005c10: 756e 6461 792c 2044 4159 4e41 4d45 3d31 unday, DAYNAME=1 │ │ │ -00005c20: 206d 6561 6e73 204d 6f6e 6461 792c 2061 means Monday, a │ │ │ -00005c30: 6e64 2073 6f20 6f6e 2e0a 4966 204e 3e30 nd so on..If N>0 │ │ │ -00005c40: 2c20 7573 6520 7468 6520 4e74 6820 4441 , use the Nth DA │ │ │ -00005c50: 594e 414d 4520 6166 7465 7220 4d4f 4e54 YNAME after MONT │ │ │ -00005c60: 4820 4441 592e 0a49 6620 4e3c 302c 2075 H DAY..If N<0, u │ │ │ -00005c70: 7365 2074 6865 204e 7468 2044 4159 4e41 se the Nth DAYNA │ │ │ -00005c80: 4d45 2062 6566 6f72 6520 4d4f 4e54 4820 ME before MONTH │ │ │ -00005c90: 4441 592e 0a44 4159 2064 6566 6175 6c74 DAY..DAY default │ │ │ -00005ca0: 7320 746f 2031 2069 6620 4e3e 302c 2061 s to 1 if N>0, a │ │ │ -00005cb0: 6e64 204d 4f4e 5448 2773 206c 6173 7420 nd MONTH's last │ │ │ -00005cc0: 6461 7920 6f74 6865 7277 6973 652e 0a49 day otherwise..I │ │ │ -00005cd0: 6620 7468 6520 686f 6c69 6461 7920 6973 f the holiday is │ │ │ -00005ce0: 2076 6973 6962 6c65 2069 6e20 7468 6520 visible in the │ │ │ -00005cf0: 6361 6c65 6e64 6172 2077 696e 646f 772c calendar window, │ │ │ -00005d00: 2072 6574 7572 6e73 2061 0a6c 6973 7420 returns a.list │ │ │ -00005d10: 2828 286d 6f6e 7468 2064 6179 2079 6561 (((month day yea │ │ │ -00005d20: 7229 2053 5452 494e 4729 292e 2020 4f74 r) STRING)). Ot │ │ │ -00005d30: 6865 7277 6973 6520 7265 7475 726e 7320 herwise returns │ │ │ -00005d40: 6e69 6c2e 0a0a 2866 6e20 4d4f 4e54 4820 nil...(fn MONTH │ │ │ -00005d50: 4441 594e 414d 4520 4e20 5354 5249 4e47 DAYNAME N STRING │ │ │ -00005d60: 2026 6f70 7469 6f6e 616c 2044 4159 291f &optional DAY). │ │ │ -00005d70: 0a28 6465 6661 6c69 6173 2027 686f 6c69 .(defalias 'holi │ │ │ -00005d80: 6461 792d 666c 6f61 7420 235b 3132 3834 day-float #[1284 │ │ │ -00005d90: 2022 0809 0809 5c33 3032 5c33 3033 045c "....\302\303.\ │ │ │ -00005da0: 3330 3457 5c32 3033 1000 0454 5c32 3632 304W\203...T\262 │ │ │ -00005db0: 055c 3330 3505 035f 0607 5c33 3036 5c32 .\305.._..\306\2 │ │ │ -00005dc0: 3131 245c 3236 3201 5c33 3037 0103 5c22 11$\262.\307..\" │ │ │ -00005dd0: 545c 3236 3206 5c32 3131 025c 3234 355c T\262.\211.\245\ │ │ │ -00005de0: 3236 3205 5c32 3131 5c33 3034 575c 3230 262.\211\304W\20 │ │ │ -00005df0: 3337 0005 5c33 3130 565c 3230 3337 0004 37..\310V\2037.. │ │ │ -00005e00: 535c 3236 3205 045c 3331 3057 5c32 3033 S\262..\310W\203 │ │ │ -00005e10: 4100 0453 5c32 3632 055c 3236 3602 5c33 A..S\262.\266.\3 │ │ │ -00005e20: 3035 5c33 3131 5c33 3130 065c 6e06 0706 05\311\310.\n... │ │ │ -00005e30: 0724 5c33 3132 0609 5f06 095c 3330 3456 .$\312.._..\304V │ │ │ -00005e40: 5c32 3033 5c5c 005c 3331 305c 3230 325d \203\\.\310\202] │ │ │ -00005e50: 005c 3331 3223 5c33 3032 5c33 3033 035c .\312#\302\303.\ │ │ │ -00005e60: 3330 3457 5c32 3033 6a00 0354 5c32 3632 304W\203j..T\262 │ │ │ -00005e70: 045c 3330 3504 035f 0606 5c33 3036 5c33 .\305.._..\306\3 │ │ │ -00005e80: 3130 245c 3236 3201 5c33 3037 0103 5c22 10$\262.\307..\" │ │ │ -00005e90: 545c 3236 3205 5c32 3131 025c 3234 355c T\262.\211.\245\ │ │ │ -00005ea0: 3236 3204 5c32 3131 5c33 3034 575c 3230 262.\211\304W\20 │ │ │ -00005eb0: 335c 3232 3100 045c 3331 3056 5c32 3033 3\221..\310V\203 │ │ │ -00005ec0: 5c32 3231 0003 535c 3236 3204 035c 3331 \221..S\262..\31 │ │ │ -00005ed0: 3057 5c32 3033 5c32 3333 0003 535c 3236 0W\203\233..S\26 │ │ │ -00005ee0: 3204 5c32 3636 025c 3330 355c 3331 315c 2.\266.\305\311\ │ │ │ -00005ef0: 3330 3606 0b06 0606 0624 5c33 3132 065c 306......$\312.\ │ │ │ -00005f00: 6e5f 065c 6e5c 3330 3456 5c32 3033 5c32 n_.\n\304V\203\2 │ │ │ -00005f10: 3636 005c 3331 335c 3230 325c 3236 3700 66.\313\202\267. │ │ │ -00005f20: 5c33 3036 235c 3331 3402 215c 3331 3501 \306#\314.!\315. │ │ │ -00005f30: 385c 3236 3201 5c33 3134 0221 5c33 3135 8\262.\314.!\315 │ │ │ -00005f40: 0138 5c32 3632 0101 0155 5c32 3034 5c33 .8\262...U\204\3 │ │ │ -00005f50: 3235 0006 5c66 5c33 3136 565c 3230 335c 25..\f\316V\203\ │ │ │ -00005f60: 3333 3100 015c 3230 325c 3333 3200 5c32 331..\202\332.\2 │ │ │ -00005f70: 3131 0609 5c32 3036 2501 060b 5c33 3034 11..\206%...\304 │ │ │ -00005f80: 565c 3230 335c 3335 3200 5c33 3130 5c32 V\203\352.\310\2 │ │ │ -00005f90: 3032 2501 060d 0101 5c33 3135 555c 3230 02%.....\315U\20 │ │ │ -00005fa0: 331f 015c 3231 315c 3231 315c 3330 3457 3..\211\211\304W │ │ │ -00005fb0: 5c32 3033 0001 5c33 3137 0121 535c 3236 \203..\317.!S\26 │ │ │ -00005fc0: 3201 5c32 3131 5c33 3230 5c32 3436 5c33 2.\211\320\246\3 │ │ │ -00005fd0: 3034 555c 3230 3516 015c 3231 315c 3332 04U\205..\211\32 │ │ │ -00005fe0: 315c 3234 365c 3330 3455 3f5c 3230 3616 1\246\304U?\206. │ │ │ -00005ff0: 015c 3231 315c 3332 325c 3234 365c 3330 .\211\322\246\30 │ │ │ -00006000: 3455 5c32 3632 015c 3230 331f 015c 3332 4U\262.\203..\32 │ │ │ -00006010: 335c 3230 3223 015c 3332 3402 5348 5c32 3\202#.\324.SH\2 │ │ │ -00006020: 3636 5c32 3032 060e 0103 455c 3231 315c 66\202....E\211\ │ │ │ -00006030: 3331 3501 385c 3236 3201 5c33 3033 015c 315.8\262.\303.\ │ │ │ -00006040: 3330 3455 5c32 3033 3d01 5c33 3235 5c33 304U\203=.\325\3 │ │ │ -00006050: 3236 215c 3230 327d 0201 5c33 3034 565c 26!\202}..\304V\ │ │ │ -00006060: 3230 335c 3236 3301 0153 5c32 3632 015c 203\263..S\262.\ │ │ │ -00006070: 3330 3503 5c32 3131 5c32 3131 405c 3236 305.\211\211@\26 │ │ │ -00006080: 3201 015c 3231 3141 405c 3236 3201 025c 2..\211A@\262..\ │ │ │ -00006090: 3331 3501 385c 3236 3201 015c 3332 3704 315.8\262..\327. │ │ │ -000060a0: 535f 5c5c 035c 3331 3556 5c32 3033 5c32 S_\\.\315V\203\2 │ │ │ -000060b0: 3336 015c 3231 315c 3333 305c 3332 3006 36.\211\330\320. │ │ │ -000060c0: 065f 5c5c 5c33 3331 5c32 3435 5a5c 3236 ._\\\331\245Z\26 │ │ │ -000060d0: 3201 015c 3231 315c 3330 3457 5c32 3033 2..\211\304W\203 │ │ │ -000060e0: 7f01 5c33 3137 0121 535c 3236 3201 5c32 ..\317.!S\262.\2 │ │ │ -000060f0: 3131 5c33 3230 5c32 3436 5c33 3034 555c 11\320\246\304U\ │ │ │ -00006100: 3230 355c 3232 3501 5c32 3131 5c33 3231 205\225.\211\321 │ │ │ -00006110: 5c32 3436 5c33 3034 553f 5c32 3036 5c32 \246\304U?\206\2 │ │ │ -00006120: 3235 015c 3231 315c 3332 325c 3234 365c 25.\211\322\246\ │ │ │ -00006130: 3330 3455 5c32 3632 015c 3230 335c 3233 304U\262.\203\23 │ │ │ -00006140: 3601 5c32 3131 545c 3236 3201 5c32 3636 6.\211T\262.\266 │ │ │ -00006150: 5c32 3033 5c32 3632 015c 3333 3203 5f03 \203\262.\332._. │ │ │ -00006160: 5c33 3230 5c32 3435 045c 3332 315c 3234 \320\245.\321\24 │ │ │ -00006170: 355b 055c 3332 325c 3234 3525 5c32 3032 5[.\322\245%\202 │ │ │ -00006180: 7d02 5c33 3137 0254 215c 3236 3201 5c33 }.\317.T!\262.\3 │ │ │ -00006190: 3333 035c 3231 315c 3231 3140 5c32 3632 33.\211\211@\262 │ │ │ -000061a0: 0101 5c32 3131 4140 5c32 3632 0102 5c33 ..\211A@\262..\3 │ │ │ -000061b0: 3135 0138 5c32 3632 0101 5c33 3237 0453 15.8\262..\327.S │ │ │ -000061c0: 5f5c 5c03 5c33 3135 565c 3230 3310 025c _\\.\315V\203..\ │ │ │ -000061d0: 3231 315c 3333 305c 3332 3006 065f 5c5c 211\330\320.._\\ │ │ │ -000061e0: 5c33 3331 5c32 3435 5a5c 3236 3201 015c \331\245Z\262..\ │ │ │ -000061f0: 3231 315c 3330 3457 5c32 3033 5c33 3631 211\304W\203\361 │ │ │ -00006200: 015c 3331 3701 2153 5c32 3632 015c 3231 .\317.!S\262.\21 │ │ │ -00006210: 315c 3332 305c 3234 365c 3330 3455 5c32 1\320\246\304U\2 │ │ │ -00006220: 3035 0702 5c32 3131 5c33 3231 5c32 3436 05..\211\321\246 │ │ │ -00006230: 5c33 3034 553f 5c32 3036 0702 5c32 3131 \304U?\206..\211 │ │ │ -00006240: 5c33 3232 5c32 3436 5c33 3034 555c 3236 \322\246\304U\26 │ │ │ -00006250: 3201 5c32 3033 1002 5c32 3131 545c 3236 2.\203..\211T\26 │ │ │ -00006260: 3201 5c32 3636 5c32 3033 5c32 3632 015c 2.\266\203\262.\ │ │ │ -00006270: 3333 3203 5f03 5c33 3230 5c32 3435 045c 332._.\320\245.\ │ │ │ -00006280: 3332 315c 3234 355b 055c 3332 325c 3234 321\245[.\322\24 │ │ │ -00006290: 355c 3333 345c 3231 315c 3231 3140 5c32 5\334\211\211@\2 │ │ │ -000062a0: 3632 0101 5c32 3131 4140 5c32 3632 0102 62..\211A@\262.. │ │ │ -000062b0: 5c33 3135 0138 5c32 3632 0101 5c33 3237 \315.8\262..\327 │ │ │ -000062c0: 0453 5f5c 5c03 5c33 3135 565c 3230 3377 .S_\\.\315V\203w │ │ │ -000062d0: 025c 3231 315c 3333 305c 3332 3006 065f .\211\330\320.._ │ │ │ -000062e0: 5c5c 5c33 3331 5c32 3435 5a5c 3236 3201 \\\331\245Z\262. │ │ │ -000062f0: 015c 3231 315c 3330 3457 5c32 3033 5802 .\211\304W\203X. │ │ │ -00006300: 5c33 3137 0121 535c 3236 3201 5c32 3131 \317.!S\262.\211 │ │ │ -00006310: 5c33 3230 5c32 3436 5c33 3034 555c 3230 \320\246\304U\20 │ │ │ -00006320: 356e 025c 3231 315c 3332 315c 3234 365c 5n.\211\321\246\ │ │ │ -00006330: 3330 3455 3f5c 3230 366e 025c 3231 315c 304U?\206n.\211\ │ │ │ -00006340: 3332 325c 3234 365c 3330 3455 5c32 3632 322\246\304U\262 │ │ │ -00006350: 015c 3230 3377 025c 3231 3154 5c32 3632 .\203w.\211T\262 │ │ │ -00006360: 015c 3236 365c 3230 335c 3236 3201 2606 .\266\203\262.&. │ │ │ -00006370: 5c32 3636 5c32 3032 5c32 3632 0106 0601 \266\202\262.... │ │ │ -00006380: 585c 3230 355c 3233 3702 5c32 3131 0606 X\205\237.\211.. │ │ │ -00006390: 585c 3230 355c 3233 3702 5c33 3335 060e X\205\237.\335.. │ │ │ -000063a0: 0610 0612 0606 0606 2506 0d44 435c 3230 ........%..DC\20 │ │ │ -000063b0: 3722 205b 6469 7370 6c61 7965 642d 6d6f 7" [displayed-mo │ │ │ -000063c0: 6e74 6820 6469 7370 6c61 7965 642d 7965 nth displayed-ye │ │ │ -000063d0: 6172 2031 3220 6e69 6c20 3020 2b20 2d31 ar 12 nil 0 + -1 │ │ │ -000063e0: 206d 6f64 2031 2063 616c 656e 6461 722d mod 1 calendar- │ │ │ -000063f0: 6e74 682d 6e61 6d65 642d 6162 7364 6179 nth-named-absday │ │ │ -00006400: 202d 3720 3720 6361 6c65 6e64 6172 2d67 -7 7 calendar-g │ │ │ -00006410: 7265 676f 7269 616e 2d66 726f 6d2d 6162 regorian-from-ab │ │ │ -00006420: 736f 6c75 7465 2032 2039 2061 6273 2034 solute 2 9 abs 4 │ │ │ -00006430: 2031 3030 2034 3030 2032 3920 5b33 3120 100 400 29 [31 │ │ │ -00006440: 3238 2033 3120 3330 2033 3120 3330 2033 28 31 30 31 30 3 │ │ │ -00006450: 3120 3331 2033 3020 3331 2033 3020 3331 1 31 30 31 30 31 │ │ │ -00006460: 5d20 7573 6572 2d65 7272 6f72 2022 5468 ] user-error "Th │ │ │ -00006470: 6572 6520 7761 7320 6e6f 2079 6561 7220 ere was no year │ │ │ -00006480: 7a65 726f 2220 3331 2032 3320 3130 2033 zero" 31 23 10 3 │ │ │ -00006490: 3635 202d 2028 3132 2033 3120 2d31 2920 65 - (12 31 -1) │ │ │ -000064a0: 6361 6c65 6e64 6172 2d6e 7468 2d6e 616d calendar-nth-nam │ │ │ -000064b0: 6564 2d64 6179 5d20 3333 2028 2324 202e ed-day] 33 (#$ . │ │ │ -000064c0: 2032 3334 3836 295d 290a 2340 3133 3120 23486)]).#@131 │ │ │ -000064d0: 4669 6c74 6572 206c 6973 7420 6f66 2068 Filter list of h │ │ │ -000064e0: 6f6c 6964 6179 7320 484c 4953 542c 2061 olidays HLIST, a │ │ │ -000064f0: 6e64 2072 6574 7572 6e20 6f6e 6c79 2074 nd return only t │ │ │ -00006500: 6865 2076 6973 6962 6c65 206f 6e65 732e he visible ones. │ │ │ -00006510: 0a48 4c49 5354 2069 7320 6120 6c69 7374 .HLIST is a list │ │ │ -00006520: 206f 6620 656c 656d 656e 7473 206f 6620 of elements of │ │ │ -00006530: 7468 6520 666f 726d 2028 4441 5445 2920 the form (DATE) │ │ │ -00006540: 5445 5854 2e0a 0a28 666e 2048 4c49 5354 TEXT...(fn HLIST │ │ │ -00006550: 291f 0a28 6465 6661 6c69 6173 2027 686f )..(defalias 'ho │ │ │ -00006560: 6c69 6461 792d 6669 6c74 6572 2d76 6973 liday-filter-vis │ │ │ -00006570: 6962 6c65 2d63 616c 656e 6461 7220 235b ible-calendar #[ │ │ │ -00006580: 3235 3720 225c 3330 305c 3330 315c 3330 257 "\300\301\30 │ │ │ -00006590: 325c 3330 3304 5c22 5c22 5c32 3037 2220 2\303.\"\"\207" │ │ │ -000065a0: 5b64 656c 7120 6e69 6c20 6d61 7063 6172 [delq nil mapcar │ │ │ -000065b0: 2023 5b32 3537 2022 5c32 3131 405c 3230 #[257 "\211@\20 │ │ │ -000065c0: 350d 005c 3330 3001 4021 5c32 3035 0d00 5..\300.@!\205.. │ │ │ -000065d0: 5c32 3131 5c32 3037 2220 5b63 616c 656e \211\207" [calen │ │ │ -000065e0: 6461 722d 6461 7465 2d69 732d 7669 7369 dar-date-is-visi │ │ │ -000065f0: 626c 652d 705d 2033 2022 5c6e 5c6e 2866 ble-p] 3 "\n\n(f │ │ │ -00006600: 6e20 5029 225d 5d20 3620 2823 2420 2e20 n P)"]] 6 (#$ . │ │ │ -00006610: 3235 3830 3829 5d29 0a23 4033 3830 2053 25808)]).#@380 S │ │ │ -00006620: 6578 7020 686f 6c69 6461 7920 666f 7220 exp holiday for │ │ │ -00006630: 6461 7465 7320 696e 2074 6865 2063 616c dates in the cal │ │ │ -00006640: 656e 6461 7220 7769 6e64 6f77 2e0a 5345 endar window..SE │ │ │ -00006650: 5850 2069 7320 616e 2065 7870 7265 7373 XP is an express │ │ │ -00006660: 696f 6e20 696e 2076 6172 6961 626c 6520 ion in variable │ │ │ -00006670: 6079 6561 7227 2074 6861 7420 6973 2065 `year' that is e │ │ │ -00006680: 7661 6c75 6174 6564 2074 6f0a 6769 7665 valuated to.give │ │ │ -00006690: 2060 6461 7465 272e 2020 5354 5249 4e47 `date'. STRING │ │ │ -000066a0: 2069 7320 616e 2065 7870 7265 7373 696f is an expressio │ │ │ -000066b0: 6e20 696e 2060 6461 7465 2720 7468 6174 n in `date' that │ │ │ -000066c0: 2065 7661 6c75 6174 6573 2074 6f0a 7468 evaluates to.th │ │ │ -000066d0: 6520 686f 6c69 6461 7920 6465 7363 7269 e holiday descri │ │ │ -000066e0: 7074 696f 6e20 6f66 2060 6461 7465 272e ption of `date'. │ │ │ -000066f0: 2020 4966 2060 6461 7465 2720 6973 2076 If `date' is v │ │ │ -00006700: 6973 6962 6c65 2069 6e20 7468 650a 6361 isible in the.ca │ │ │ -00006710: 6c65 6e64 6172 2077 696e 646f 772c 2074 lendar window, t │ │ │ -00006720: 6865 2068 6f6c 6964 6179 2053 5452 494e he holiday STRIN │ │ │ -00006730: 4720 6973 206f 6e20 7468 6174 2064 6174 G is on that dat │ │ │ -00006740: 652e 2020 4966 2064 6174 6520 6973 0a6e e. If date is.n │ │ │ -00006750: 696c 2c20 6f72 2069 6620 7468 6520 6461 il, or if the da │ │ │ -00006760: 7465 2069 7320 6e6f 7420 7669 7369 626c te is not visibl │ │ │ -00006770: 652c 2074 6865 7265 2069 7320 6e6f 2068 e, there is no h │ │ │ -00006780: 6f6c 6964 6179 2e0a 0a28 666e 2053 4558 oliday...(fn SEX │ │ │ -00006790: 5020 5354 5249 4e47 291f 0a28 6465 6661 P STRING)..(defa │ │ │ -000067a0: 6c69 6173 2027 686f 6c69 6461 792d 7365 lias 'holiday-se │ │ │ -000067b0: 7870 2023 5b35 3134 2022 0809 5c33 3034 xp #[514 "..\304 │ │ │ -000067c0: 5c33 3035 025c 3330 3657 5c32 3033 0e00 \305.\306W\203.. │ │ │ -000067d0: 0254 5c32 3632 035c 3330 3703 035f 055c .T\262.\307.._.\ │ │ │ -000067e0: 3331 305c 3231 3124 5c32 3632 015c 3331 310\211$\262.\31 │ │ │ -000067f0: 3101 035c 2254 5c32 3632 045c 3231 3102 1..\"T\262.\211. │ │ │ -00006800: 5c32 3435 5c32 3632 035c 3231 315c 3330 \245\262.\211\30 │ │ │ -00006810: 3657 5c32 3033 3400 035c 3331 3256 5c32 6W\2034..\312V\2 │ │ │ -00006820: 3033 3400 0253 5c32 3632 0302 5c33 3132 034..S\262..\312 │ │ │ -00006830: 575c 3230 333e 0002 535c 3236 3203 5c32 W\203>..S\262.\2 │ │ │ -00006840: 3636 025c 3331 335c 3330 355c 3231 311a 66.\313\305\211. │ │ │ -00006850: 1b01 125c 3331 3405 5c33 3135 5c22 5c32 ...\314.\315\"\2 │ │ │ -00006860: 3131 135c 3231 315c 3230 3555 005c 3331 11.\211\205U.\31 │ │ │ -00006870: 3405 5c33 3135 5c22 4402 5412 5c33 3134 4.\315\"D.T.\314 │ │ │ -00006880: 0606 5c33 3135 5c22 5c32 3131 135c 3231 ..\315\"\211.\21 │ │ │ -00006890: 315c 3230 3569 005c 3331 3406 065c 3331 1\205i.\314..\31 │ │ │ -000068a0: 355c 222a 4444 215c 3230 3722 205b 6469 5\"*DD!\207" [di │ │ │ -000068b0: 7370 6c61 7965 642d 6d6f 6e74 6820 6469 splayed-month di │ │ │ -000068c0: 7370 6c61 7965 642d 7965 6172 2079 6561 splayed-year yea │ │ │ -000068d0: 7220 6461 7465 2031 3220 6e69 6c20 3020 r date 12 nil 0 │ │ │ -000068e0: 2b20 2d31 206d 6f64 2031 2068 6f6c 6964 + -1 mod 1 holid │ │ │ -000068f0: 6179 2d66 696c 7465 722d 7669 7369 626c ay-filter-visibl │ │ │ -00006900: 652d 6361 6c65 6e64 6172 2065 7661 6c20 e-calendar eval │ │ │ -00006910: 745d 2031 3220 2823 2420 2e20 3236 3134 t] 12 (#$ . 2614 │ │ │ -00006920: 3329 5d29 0a23 4034 3539 2044 6174 6520 3)]).#@459 Date │ │ │ -00006930: 6f66 204e 7468 2064 6179 2061 6674 6572 of Nth day after │ │ │ -00006940: 2061 6476 656e 7420 286e 616d 6564 2053 advent (named S │ │ │ -00006950: 5452 494e 4729 2c20 6966 2076 6973 6962 TRING), if visib │ │ │ -00006960: 6c65 2069 6e20 6361 6c65 6e64 6172 2077 le in calendar w │ │ │ -00006970: 696e 646f 772e 0a4e 6567 6174 6976 6520 indow..Negative │ │ │ -00006980: 7661 6c75 6573 206f 6620 4e20 6172 6520 values of N are │ │ │ -00006990: 696e 7465 7270 7265 7465 6420 6173 2064 interpreted as d │ │ │ -000069a0: 6179 7320 6265 666f 7265 2061 6476 656e ays before adven │ │ │ -000069b0: 742e 0a53 5452 494e 4720 6973 2075 7365 t..STRING is use │ │ │ -000069c0: 6420 7075 7265 6c79 2066 6f72 2064 6973 d purely for dis │ │ │ -000069d0: 706c 6179 2070 7572 706f 7365 732e 2020 play purposes. │ │ │ -000069e0: 5468 6520 7265 7475 726e 2076 616c 7565 The return value │ │ │ -000069f0: 2068 6173 0a74 6865 2066 6f72 6d20 2828 has.the form (( │ │ │ -00006a00: 4d4f 4e54 4820 4441 5920 5945 4152 2920 MONTH DAY YEAR) │ │ │ -00006a10: 5354 5249 4e47 292c 2077 6865 7265 2074 STRING), where t │ │ │ -00006a20: 6865 2064 6174 6520 6973 2074 6861 7420 he date is that │ │ │ -00006a30: 6f66 2074 6865 0a4e 7468 2064 6179 2062 of the.Nth day b │ │ │ -00006a40: 6566 6f72 6520 6f72 2061 6674 6572 2061 efore or after a │ │ │ -00006a50: 6476 656e 742e 0a0a 466f 7220 6261 636b dvent...For back │ │ │ -00006a60: 7761 7264 7320 636f 6d70 6174 6962 696c wards compatibil │ │ │ -00006a70: 6974 792c 2069 6620 7468 6973 2066 756e ity, if this fun │ │ │ -00006a80: 6374 696f 6e20 6973 2063 616c 6c65 6420 ction is called │ │ │ -00006a90: 7769 7468 206e 6f0a 6172 6775 6d65 6e74 with no.argument │ │ │ -00006aa0: 732c 2074 6865 6e20 6974 2072 6574 7572 s, then it retur │ │ │ -00006ab0: 6e73 2074 6865 2076 616c 7565 2061 7070 ns the value app │ │ │ -00006ac0: 726f 7072 6961 7465 2066 6f72 2061 6476 ropriate for adv │ │ │ -00006ad0: 656e 7420 6974 7365 6c66 2e0a 0a28 666e ent itself...(fn │ │ │ -00006ae0: 2026 6f70 7469 6f6e 616c 204e 2053 5452 &optional N STR │ │ │ -00006af0: 494e 4729 1f0a 2864 6566 616c 6961 7320 ING)..(defalias │ │ │ -00006b00: 2768 6f6c 6964 6179 2d61 6476 656e 7420 'holiday-advent │ │ │ -00006b10: 235b 3531 3220 2201 5c32 3034 0900 5c33 #[512 ".\204..\3 │ │ │ -00006b20: 3032 5c33 3033 5c33 3034 5c22 5c32 3037 02\303\304\"\207 │ │ │ -00006b30: 0809 5c33 3035 5c33 3036 035c 3330 3357 ..\305\306.\303W │ │ │ -00006b40: 5c32 3033 1700 0354 5c32 3632 045c 3330 \203...T\262.\30 │ │ │ -00006b50: 3704 035f 045c 3331 305c 3231 3124 5c32 7.._.\310\211$\2 │ │ │ -00006b60: 3632 015c 3331 3101 035c 2254 5c32 3632 62.\311..\"T\262 │ │ │ -00006b70: 035c 3231 3102 5c32 3435 5c32 3632 045c .\211.\245\262.\ │ │ │ -00006b80: 3231 315c 3330 3357 5c32 3033 3d00 025c 211\303W\203=..\ │ │ │ -00006b90: 3331 3256 5c32 3033 3d00 0353 5c32 3632 312V\203=..S\262 │ │ │ -00006ba0: 0403 5c33 3132 575c 3230 3347 0003 535c ..\312W\203G..S\ │ │ │ -00006bb0: 3236 3204 5c32 3636 025c 3331 3304 5c33 262.\266.\313.\3 │ │ │ -00006bc0: 3134 5c33 3033 5c33 3035 5c33 3135 0607 14\303\305\315.. │ │ │ -00006bd0: 455c 3231 315c 3331 3601 385c 3236 3201 E\211\316.8\262. │ │ │ -00006be0: 5c33 3036 015c 3330 3355 5c32 3033 6500 \306.\303U\203e. │ │ │ -00006bf0: 5c33 3137 5c33 3230 215c 3230 325c 3234 \317\320!\202\24 │ │ │ -00006c00: 3501 015c 3330 3356 5c32 3033 5c33 3333 5..\303V\203\333 │ │ │ -00006c10: 0001 535c 3236 3201 5c33 3037 035c 3231 ..S\262.\307.\21 │ │ │ -00006c20: 315c 3231 3140 5c32 3632 0101 5c32 3131 1\211@\262..\211 │ │ │ -00006c30: 4140 5c32 3632 0102 5c33 3136 0138 5c32 A@\262..\316.8\2 │ │ │ -00006c40: 3632 0101 5c33 3231 0453 5f5c 5c03 5c33 62..\321.S_\\.\3 │ │ │ -00006c50: 3136 565c 3230 335c 3330 3600 5c32 3131 16V\203\306.\211 │ │ │ -00006c60: 5c33 3232 5c33 3233 0606 5f5c 5c5c 3332 \322\323.._\\\32 │ │ │ -00006c70: 345c 3234 355a 5c32 3632 0101 5c32 3131 4\245Z\262..\211 │ │ │ -00006c80: 5c33 3033 575c 3230 335c 3234 3700 5c33 \303W\203\247.\3 │ │ │ -00006c90: 3235 0121 535c 3236 3201 5c32 3131 5c33 25.!S\262.\211\3 │ │ │ -00006ca0: 3233 5c32 3436 5c33 3033 555c 3230 355c 23\246\303U\205\ │ │ │ -00006cb0: 3237 3500 5c32 3131 5c33 3236 5c32 3436 275.\211\326\246 │ │ │ -00006cc0: 5c33 3033 553f 5c32 3036 5c32 3735 005c \303U?\206\275.\ │ │ │ -00006cd0: 3231 315c 3332 375c 3234 365c 3330 3355 211\327\246\303U │ │ │ -00006ce0: 5c32 3632 015c 3230 335c 3330 3600 5c32 \262.\203\306.\2 │ │ │ -00006cf0: 3131 545c 3236 3201 5c32 3636 5c32 3033 11T\262.\266\203 │ │ │ -00006d00: 5c32 3632 015c 3333 3003 5f03 5c33 3233 \262.\330._.\323 │ │ │ -00006d10: 5c32 3435 045c 3332 365c 3234 355b 055c \245.\326\245[.\ │ │ │ -00006d20: 3332 375c 3234 3525 5c32 3032 5c32 3435 327\245%\202\245 │ │ │ -00006d30: 015c 3332 3502 5421 5c32 3632 015c 3333 .\325.T!\262.\33 │ │ │ -00006d40: 3103 5c32 3131 5c32 3131 405c 3236 3201 1.\211\211@\262. │ │ │ -00006d50: 015c 3231 3141 405c 3236 3201 025c 3331 .\211A@\262..\31 │ │ │ -00006d60: 3601 385c 3236 3201 015c 3332 3104 535f 6.8\262..\321.S_ │ │ │ -00006d70: 5c5c 035c 3331 3656 5c32 3033 3801 5c32 \\.\316V\2038.\2 │ │ │ -00006d80: 3131 5c33 3232 5c33 3233 0606 5f5c 5c5c 11\322\323.._\\\ │ │ │ -00006d90: 3332 345c 3234 355a 5c32 3632 0101 5c32 324\245Z\262..\2 │ │ │ -00006da0: 3131 5c33 3033 575c 3230 3319 015c 3332 11\303W\203..\32 │ │ │ -00006db0: 3501 2153 5c32 3632 015c 3231 315c 3332 5.!S\262.\211\32 │ │ │ -00006dc0: 335c 3234 365c 3330 3355 5c32 3035 2f01 3\246\303U\205/. │ │ │ -00006dd0: 5c32 3131 5c33 3236 5c32 3436 5c33 3033 \211\326\246\303 │ │ │ -00006de0: 553f 5c32 3036 2f01 5c32 3131 5c33 3237 U?\206/.\211\327 │ │ │ -00006df0: 5c32 3436 5c33 3033 555c 3236 3201 5c32 \246\303U\262.\2 │ │ │ -00006e00: 3033 3801 5c32 3131 545c 3236 3201 5c32 038.\211T\262.\2 │ │ │ -00006e10: 3636 5c32 3033 5c32 3632 015c 3333 3003 66\203\262.\330. │ │ │ -00006e20: 5f03 5c33 3233 5c32 3435 045c 3332 365c _.\323\245.\326\ │ │ │ -00006e30: 3234 355b 055c 3332 375c 3234 355c 3333 245[.\327\245\33 │ │ │ -00006e40: 325c 3231 315c 3231 3140 5c32 3632 0101 2\211\211@\262.. │ │ │ -00006e50: 5c32 3131 4140 5c32 3632 0102 5c33 3136 \211A@\262..\316 │ │ │ -00006e60: 0138 5c32 3632 0101 5c33 3231 0453 5f5c .8\262..\321.S_\ │ │ │ -00006e70: 5c03 5c33 3136 565c 3230 335c 3233 3701 \.\316V\203\237. │ │ │ -00006e80: 5c32 3131 5c33 3232 5c33 3233 0606 5f5c \211\322\323.._\ │ │ │ -00006e90: 5c5c 3332 345c 3234 355a 5c32 3632 0101 \\324\245Z\262.. │ │ │ -00006ea0: 5c32 3131 5c33 3033 575c 3230 335c 3230 \211\303W\203\20 │ │ │ -00006eb0: 3001 5c33 3235 0121 535c 3236 3201 5c32 0.\325.!S\262.\2 │ │ │ -00006ec0: 3131 5c33 3233 5c32 3436 5c33 3033 555c 11\323\246\303U\ │ │ │ -00006ed0: 3230 355c 3232 3601 5c32 3131 5c33 3236 205\226.\211\326 │ │ │ -00006ee0: 5c32 3436 5c33 3033 553f 5c32 3036 5c32 \246\303U?\206\2 │ │ │ -00006ef0: 3236 015c 3231 315c 3332 375c 3234 365c 26.\211\327\246\ │ │ │ -00006f00: 3330 3355 5c32 3632 015c 3230 335c 3233 303U\262.\203\23 │ │ │ -00006f10: 3701 5c32 3131 545c 3236 3201 5c32 3636 7.\211T\262.\266 │ │ │ -00006f20: 5c32 3033 5c32 3632 0126 065c 3236 365c \203\262.&.\266\ │ │ │ -00006f30: 3230 325c 3236 3201 5c22 5c5c 215c 3333 202\262.\"\\!\33 │ │ │ -00006f40: 3301 215c 3230 355c 3236 3601 5c32 3131 3.!\205\266.\211 │ │ │ -00006f50: 0444 435c 3230 3722 205b 6469 7370 6c61 .DC\207" [displa │ │ │ -00006f60: 7965 642d 7965 6172 2064 6973 706c 6179 yed-year display │ │ │ -00006f70: 6564 2d6d 6f6e 7468 2068 6f6c 6964 6179 ed-month holiday │ │ │ -00006f80: 2d61 6476 656e 7420 3020 2241 6476 656e -advent 0 "Adven │ │ │ -00006f90: 7422 2031 3220 6e69 6c20 2b20 2d31 206d t" 12 nil + -1 m │ │ │ -00006fa0: 6f64 2031 2063 616c 656e 6461 722d 6772 od 1 calendar-gr │ │ │ -00006fb0: 6567 6f72 6961 6e2d 6672 6f6d 2d61 6273 egorian-from-abs │ │ │ -00006fc0: 6f6c 7574 6520 6361 6c65 6e64 6172 2d64 olute calendar-d │ │ │ -00006fd0: 6179 6e61 6d65 2d6f 6e2d 6f72 2d62 6566 ayname-on-or-bef │ │ │ -00006fe0: 6f72 6520 3320 3220 7573 6572 2d65 7272 ore 3 2 user-err │ │ │ -00006ff0: 6f72 2022 5468 6572 6520 7761 7320 6e6f or "There was no │ │ │ -00007000: 2079 6561 7220 7a65 726f 2220 3331 2032 year zero" 31 2 │ │ │ -00007010: 3320 3420 3130 2061 6273 2031 3030 2034 3 4 10 abs 100 4 │ │ │ -00007020: 3030 2033 3635 202d 2028 3132 2033 3120 00 365 - (12 31 │ │ │ -00007030: 2d31 2920 6361 6c65 6e64 6172 2d64 6174 -1) calendar-dat │ │ │ -00007040: 652d 6973 2d76 6973 6962 6c65 2d70 5d20 e-is-visible-p] │ │ │ -00007050: 3236 2028 2324 202e 2032 3639 3233 295d 26 (#$ . 26923)] │ │ │ -00007060: 290a 2340 3533 3720 4461 7465 206f 6620 ).#@537 Date of │ │ │ -00007070: 4e74 6820 6461 7920 6166 7465 7220 4561 Nth day after Ea │ │ │ -00007080: 7374 6572 2028 6e61 6d65 6420 5354 5249 ster (named STRI │ │ │ -00007090: 4e47 292c 2069 6620 7669 7369 626c 6520 NG), if visible │ │ │ -000070a0: 696e 2063 616c 656e 6461 7220 7769 6e64 in calendar wind │ │ │ -000070b0: 6f77 2e0a 4e65 6761 7469 7665 2076 616c ow..Negative val │ │ │ -000070c0: 7565 7320 6f66 204e 2061 7265 2069 6e74 ues of N are int │ │ │ -000070d0: 6572 7072 6574 6564 2061 7320 6461 7973 erpreted as days │ │ │ -000070e0: 2062 6566 6f72 6520 4561 7374 6572 2e0a before Easter.. │ │ │ -000070f0: 5354 5249 4e47 2069 7320 7573 6564 2070 STRING is used p │ │ │ -00007100: 7572 656c 7920 666f 7220 6469 7370 6c61 urely for displa │ │ │ -00007110: 7920 7075 7270 6f73 6573 2e20 2054 6865 y purposes. The │ │ │ -00007120: 2072 6574 7572 6e20 7661 6c75 6520 6861 return value ha │ │ │ -00007130: 730a 7468 6520 666f 726d 2028 284d 4f4e s.the form ((MON │ │ │ -00007140: 5448 2044 4159 2059 4541 5229 2053 5452 TH DAY YEAR) STR │ │ │ -00007150: 494e 4729 2c20 7768 6572 6520 7468 6520 ING), where the │ │ │ -00007160: 6461 7465 2069 7320 7468 6174 206f 6620 date is that of │ │ │ -00007170: 7468 650a 4e74 6820 6461 7920 6265 666f the.Nth day befo │ │ │ -00007180: 7265 206f 7220 6166 7465 7220 4561 7374 re or after East │ │ │ -00007190: 6572 2e0a 0a46 6f72 2062 6163 6b77 6172 er...For backwar │ │ │ -000071a0: 6473 2063 6f6d 7061 7469 6269 6c69 7479 ds compatibility │ │ │ -000071b0: 2c20 6966 2074 6869 7320 6675 6e63 7469 , if this functi │ │ │ -000071c0: 6f6e 2069 7320 6361 6c6c 6564 2077 6974 on is called wit │ │ │ -000071d0: 6820 6e6f 0a61 7267 756d 656e 7473 2c20 h no.arguments, │ │ │ -000071e0: 7468 656e 2069 7420 7265 7475 726e 7320 then it returns │ │ │ -000071f0: 6120 6c69 7374 206f 6620 2273 7461 6e64 a list of "stand │ │ │ -00007200: 6172 6422 2045 6173 7465 722d 7265 6c61 ard" Easter-rela │ │ │ -00007210: 7465 640a 686f 6c69 6461 7973 2028 7769 ted.holidays (wi │ │ │ -00007220: 7468 206d 6f72 6520 656e 7472 6965 7320 th more entries │ │ │ -00007230: 6966 2060 6361 6c65 6e64 6172 2d63 6872 if `calendar-chr │ │ │ -00007240: 6973 7469 616e 2d61 6c6c 2d68 6f6c 6964 istian-all-holid │ │ │ -00007250: 6179 732d 666c 6167 270a 6973 206e 6f6e ays-flag'.is non │ │ │ -00007260: 2d6e 696c 292e 0a0a 2866 6e20 266f 7074 -nil)...(fn &opt │ │ │ -00007270: 696f 6e61 6c20 4e20 5354 5249 4e47 291f ional N STRING). │ │ │ -00007280: 0a28 6465 6661 6c69 6173 2027 686f 6c69 .(defalias 'holi │ │ │ -00007290: 6461 792d 6561 7374 6572 2d65 7463 2023 day-easter-etc # │ │ │ -000072a0: 5b35 3132 2022 015c 3230 3413 005c 3330 [512 ".\204..\30 │ │ │ -000072b0: 325c 3330 335c 3330 345c 3330 355c 3330 2\303\304\305\30 │ │ │ -000072c0: 3308 5c32 3035 0e00 5c33 3036 5c33 3037 3.\205..\306\307 │ │ │ -000072d0: 5c22 5c22 5c22 5c32 3037 095c 3331 305c \"\"\"\207.\310\ │ │ │ -000072e0: 3234 3554 5c33 3131 5c33 3132 5c33 3133 245T\311\312\313 │ │ │ -000072f0: 095c 3331 345c 3234 365f 5c33 3135 045f .\314\246_\315._ │ │ │ -00007300: 5c33 3136 5c32 3435 5b5c 3331 375c 3332 \316\245[\317\32 │ │ │ -00007310: 3006 065f 5c5c 5c33 3231 5c32 3435 5c33 0.._\\\321\245\3 │ │ │ -00007320: 3232 0606 5f25 5c33 3232 5c32 3436 5c32 22.._%\322\246\2 │ │ │ -00007330: 3131 5c33 3233 555c 3230 3447 005c 3231 11\323U\204G.\21 │ │ │ -00007340: 315c 3332 3455 5c32 3033 4c00 5c33 3235 1\324U\203L.\325 │ │ │ -00007350: 095c 3331 345c 3234 3657 5c32 3033 4c00 .\314\246W\203L. │ │ │ -00007360: 5c32 3131 545c 3230 324d 005c 3231 315c \211T\202M.\211\ │ │ │ -00007370: 3331 365c 3331 3409 455c 3231 315c 3332 316\314.E\211\32 │ │ │ -00007380: 3601 385c 3236 3201 5c33 3237 015c 3332 6.8\262.\327.\32 │ │ │ -00007390: 3355 5c32 3033 6400 5c33 3330 5c33 3331 3U\203d.\330\331 │ │ │ -000073a0: 215c 3230 325c 3234 3401 015c 3332 3356 !\202\244..\323V │ │ │ -000073b0: 5c32 3033 5c33 3332 0001 535c 3236 3201 \203\332..S\262. │ │ │ -000073c0: 5c33 3131 035c 3231 315c 3231 3140 5c32 \311.\211\211@\2 │ │ │ -000073d0: 3632 0101 5c32 3131 4140 5c32 3632 0102 62..\211A@\262.. │ │ │ -000073e0: 5c33 3236 0138 5c32 3632 0101 5c33 3332 \326.8\262..\332 │ │ │ -000073f0: 0453 5f5c 5c03 5c33 3236 565c 3230 335c .S_\\.\326V\203\ │ │ │ -00007400: 3330 3500 5c32 3131 5c33 3333 5c33 3136 305.\211\333\316 │ │ │ -00007410: 0606 5f5c 5c5c 3332 355c 3234 355a 5c32 .._\\\325\245Z\2 │ │ │ -00007420: 3632 0101 5c32 3131 5c33 3233 575c 3230 62..\211\323W\20 │ │ │ -00007430: 335c 3234 3600 5c33 3334 0121 535c 3236 3\246.\334.!S\26 │ │ │ -00007440: 3201 5c32 3131 5c33 3136 5c32 3436 5c33 2.\211\316\246\3 │ │ │ -00007450: 3233 555c 3230 355c 3237 3400 5c32 3131 23U\205\274.\211 │ │ │ -00007460: 5c33 3130 5c32 3436 5c33 3233 553f 5c32 \310\246\323U?\2 │ │ │ -00007470: 3036 5c32 3734 005c 3231 315c 3333 355c 06\274.\211\335\ │ │ │ -00007480: 3234 365c 3332 3355 5c32 3632 015c 3230 246\323U\262.\20 │ │ │ -00007490: 335c 3330 3500 5c32 3131 545c 3236 3201 3\305.\211T\262. │ │ │ -000074a0: 5c32 3636 5c32 3033 5c32 3632 015c 3333 \266\203\262.\33 │ │ │ -000074b0: 3603 5f03 5c33 3136 5c32 3435 045c 3331 6._.\316\245.\31 │ │ │ -000074c0: 305c 3234 355b 055c 3333 355c 3234 3525 0\245[.\335\245% │ │ │ -000074d0: 5c32 3032 5c32 3434 015c 3333 3402 5421 \202\244.\334.T! │ │ │ -000074e0: 5c32 3632 015c 3333 3703 5c32 3131 5c32 \262.\337.\211\2 │ │ │ -000074f0: 3131 405c 3236 3201 015c 3231 3141 405c 11@\262..\211A@\ │ │ │ -00007500: 3236 3201 025c 3332 3601 385c 3236 3201 262..\326.8\262. │ │ │ -00007510: 015c 3333 3204 535f 5c5c 035c 3332 3656 .\332.S_\\.\326V │ │ │ -00007520: 5c32 3033 3701 5c32 3131 5c33 3333 5c33 \2037.\211\333\3 │ │ │ -00007530: 3136 0606 5f5c 5c5c 3332 355c 3234 355a 16.._\\\325\245Z │ │ │ -00007540: 5c32 3632 0101 5c32 3131 5c33 3233 575c \262..\211\323W\ │ │ │ -00007550: 3230 3318 015c 3333 3401 2153 5c32 3632 203..\334.!S\262 │ │ │ -00007560: 015c 3231 315c 3331 365c 3234 365c 3332 .\211\316\246\32 │ │ │ -00007570: 3355 5c32 3035 2e01 5c32 3131 5c33 3130 3U\205..\211\310 │ │ │ -00007580: 5c32 3436 5c33 3233 553f 5c32 3036 2e01 \246\323U?\206.. │ │ │ -00007590: 5c32 3131 5c33 3335 5c32 3436 5c33 3233 \211\335\246\323 │ │ │ -000075a0: 555c 3236 3201 5c32 3033 3701 5c32 3131 U\262.\2037.\211 │ │ │ -000075b0: 545c 3236 3201 5c32 3636 5c32 3033 5c32 T\262.\266\203\2 │ │ │ -000075c0: 3632 015c 3333 3603 5f03 5c33 3136 5c32 62.\336._.\316\2 │ │ │ -000075d0: 3435 045c 3331 305c 3234 355b 055c 3333 45.\310\245[.\33 │ │ │ -000075e0: 355c 3234 355c 3334 305c 3231 315c 3231 5\245\340\211\21 │ │ │ -000075f0: 3140 5c32 3632 0101 5c32 3131 4140 5c32 1@\262..\211A@\2 │ │ │ -00007600: 3632 0102 5c33 3236 0138 5c32 3632 0101 62..\326.8\262.. │ │ │ -00007610: 5c33 3332 0453 5f5c 5c03 5c33 3236 565c \332.S_\\.\326V\ │ │ │ -00007620: 3230 335c 3233 3601 5c32 3131 5c33 3333 203\236.\211\333 │ │ │ -00007630: 5c33 3136 0606 5f5c 5c5c 3332 355c 3234 \316.._\\\325\24 │ │ │ -00007640: 355a 5c32 3632 0101 5c32 3131 5c33 3233 5Z\262..\211\323 │ │ │ -00007650: 575c 3230 337f 015c 3333 3401 2153 5c32 W\203..\334.!S\2 │ │ │ -00007660: 3632 015c 3231 315c 3331 365c 3234 365c 62.\211\316\246\ │ │ │ -00007670: 3332 3355 5c32 3035 5c32 3235 015c 3231 323U\205\225.\21 │ │ │ -00007680: 315c 3331 305c 3234 365c 3332 3355 3f5c 1\310\246\323U?\ │ │ │ -00007690: 3230 365c 3232 3501 5c32 3131 5c33 3335 206\225.\211\335 │ │ │ -000076a0: 5c32 3436 5c33 3233 555c 3236 3201 5c32 \246\323U\262.\2 │ │ │ -000076b0: 3033 5c32 3336 015c 3231 3154 5c32 3632 03\236.\211T\262 │ │ │ -000076c0: 015c 3236 365c 3230 335c 3236 3201 2606 .\266\203\262.&. │ │ │ -000076d0: 5c32 3636 5c32 3032 5c32 3632 0101 5a5c \266\202\262..Z\ │ │ │ -000076e0: 3334 315c 3332 3302 5c33 3432 5c5c 5c22 341\323.\342\\\" │ │ │ -000076f0: 5c33 3433 0106 085c 5c21 5c33 3434 0121 \343...\\!\344.! │ │ │ -00007700: 5c32 3035 5c33 3031 015c 3231 3106 0744 \205\301.\211..D │ │ │ -00007710: 435c 3230 3722 205b 6361 6c65 6e64 6172 C\207" [calendar │ │ │ -00007720: 2d63 6872 6973 7469 616e 2d61 6c6c 2d68 -christian-all-h │ │ │ -00007730: 6f6c 6964 6179 732d 666c 6167 2064 6973 olidays-flag dis │ │ │ -00007740: 706c 6179 6564 2d79 6561 7220 6170 706c played-year appl │ │ │ -00007750: 7920 6170 7065 6e64 206d 6170 6361 7220 y append mapcar │ │ │ -00007760: 235b 3235 3720 225c 3330 305c 3330 3102 #[257 "\300\301. │ │ │ -00007770: 5c22 5c32 3037 2220 5b61 7070 6c79 2068 \"\207" [apply h │ │ │ -00007780: 6f6c 6964 6179 2d65 6173 7465 722d 6574 oliday-easter-et │ │ │ -00007790: 635d 2034 2022 5c6e 5c6e 2866 6e20 4529 c] 4 "\n\n(fn E) │ │ │ -000077a0: 225d 2028 282d 3633 2022 5365 7074 7561 "] ((-63 "Septua │ │ │ -000077b0: 6765 7369 6d61 2053 756e 6461 7922 2920 gesima Sunday") │ │ │ -000077c0: 282d 3536 2022 5365 7861 6765 7369 6d61 (-56 "Sexagesima │ │ │ -000077d0: 2053 756e 6461 7922 2920 282d 3439 2022 Sunday") (-49 " │ │ │ -000077e0: 5368 726f 7665 2053 756e 6461 7922 2920 Shrove Sunday") │ │ │ -000077f0: 282d 3438 2022 5368 726f 7665 204d 6f6e (-48 "Shrove Mon │ │ │ -00007800: 6461 7922 2920 282d 3437 2022 5368 726f day") (-47 "Shro │ │ │ -00007810: 7665 2054 7565 7364 6179 2229 2028 2d31 ve Tuesday") (-1 │ │ │ -00007820: 3420 2250 6173 7369 6f6e 2053 756e 6461 4 "Passion Sunda │ │ │ -00007830: 7922 2920 282d 3720 2250 616c 6d20 5375 y") (-7 "Palm Su │ │ │ -00007840: 6e64 6179 2229 2028 2d33 2022 4d61 756e nday") (-3 "Maun │ │ │ -00007850: 6479 2054 6875 7273 6461 7922 2920 2833 dy Thursday") (3 │ │ │ -00007860: 3520 2252 6f67 6174 696f 6e20 5375 6e64 5 "Rogation Sund │ │ │ -00007870: 6179 2229 2028 3339 2022 4173 6365 6e73 ay") (39 "Ascens │ │ │ -00007880: 696f 6e20 4461 7922 2920 2834 3920 2250 ion Day") (49 "P │ │ │ -00007890: 656e 7465 636f 7374 2028 5768 6974 7375 entecost (Whitsu │ │ │ -000078a0: 6e64 6179 2922 2920 2835 3020 2257 6869 nday)") (50 "Whi │ │ │ -000078b0: 746d 6f6e 6461 7922 2920 2835 3620 2254 tmonday") (56 "T │ │ │ -000078c0: 7269 6e69 7479 2053 756e 6461 7922 2920 rinity Sunday") │ │ │ -000078d0: 2836 3020 2243 6f72 7075 7320 4368 7269 (60 "Corpus Chri │ │ │ -000078e0: 7374 6922 2929 2028 282d 3436 2022 4173 sti")) ((-46 "As │ │ │ -000078f0: 6820 5765 646e 6573 6461 7922 2920 282d h Wednesday") (- │ │ │ -00007900: 3220 2247 6f6f 6420 4672 6964 6179 2229 2 "Good Friday") │ │ │ -00007910: 2028 3020 2245 6173 7465 7220 5375 6e64 (0 "Easter Sund │ │ │ -00007920: 6179 2229 2920 3130 3020 2b20 3134 2031 ay")) 100 + 14 1 │ │ │ -00007930: 3120 3139 2033 2034 2035 2038 2032 3520 1 19 3 4 5 8 25 │ │ │ -00007940: 3330 2030 2031 2031 3020 3220 6e69 6c20 30 0 1 10 2 nil │ │ │ -00007950: 7573 6572 2d65 7272 6f72 2022 5468 6572 user-error "Ther │ │ │ -00007960: 6520 7761 7320 6e6f 2079 6561 7220 7a65 e was no year ze │ │ │ -00007970: 726f 2220 3331 2032 3320 6162 7320 3430 ro" 31 23 abs 40 │ │ │ -00007980: 3020 3336 3520 2d20 2831 3220 3331 202d 0 365 - (12 31 - │ │ │ -00007990: 3129 2063 616c 656e 6461 722d 6461 796e 1) calendar-dayn │ │ │ -000079a0: 616d 652d 6f6e 2d6f 722d 6265 666f 7265 ame-on-or-before │ │ │ -000079b0: 2037 2063 616c 656e 6461 722d 6772 6567 7 calendar-greg │ │ │ -000079c0: 6f72 6961 6e2d 6672 6f6d 2d61 6273 6f6c orian-from-absol │ │ │ -000079d0: 7574 6520 6361 6c65 6e64 6172 2d64 6174 ute calendar-dat │ │ │ -000079e0: 652d 6973 2d76 6973 6962 6c65 2d70 5d20 e-is-visible-p] │ │ │ -000079f0: 3233 2028 2324 202e 2032 3837 3736 295d 23 (#$ . 28776)] │ │ │ -00007a00: 290a 2340 3532 3220 4461 7465 206f 6620 ).#@522 Date of │ │ │ -00007a10: 4e74 6820 6461 7920 6166 7465 7220 4561 Nth day after Ea │ │ │ -00007a20: 7374 6572 2028 6e61 6d65 6420 5354 5249 ster (named STRI │ │ │ -00007a30: 4e47 292c 2069 6620 7669 7369 626c 6520 NG), if visible │ │ │ -00007a40: 696e 2063 616c 656e 6461 7220 7769 6e64 in calendar wind │ │ │ -00007a50: 6f77 2e0a 4974 2069 7320 6361 6c63 756c ow..It is calcul │ │ │ -00007a60: 6174 6564 2061 6363 6f72 6469 6e67 2074 ated according t │ │ │ -00007a70: 6f20 7468 6520 7275 6c65 206f 6620 7468 o the rule of th │ │ │ -00007a80: 6520 436f 756e 6369 6c20 6f66 204e 6963 e Council of Nic │ │ │ -00007a90: 6165 612e 0a4e 6567 6174 6976 6520 7661 aea..Negative va │ │ │ -00007aa0: 6c75 6573 206f 6620 4e20 6172 6520 696e lues of N are in │ │ │ -00007ab0: 7465 7270 7265 7465 6420 6173 2064 6179 terpreted as day │ │ │ -00007ac0: 7320 6265 666f 7265 2045 6173 7465 722e s before Easter. │ │ │ -00007ad0: 0a53 5452 494e 4720 6973 2075 7365 6420 .STRING is used │ │ │ -00007ae0: 7075 7265 6c79 2066 6f72 2064 6973 706c purely for displ │ │ │ -00007af0: 6179 2070 7572 706f 7365 732e 2020 5468 ay purposes. Th │ │ │ -00007b00: 6520 7265 7475 726e 2076 616c 7565 2068 e return value h │ │ │ -00007b10: 6173 0a74 6865 2066 6f72 6d20 2828 4d4f as.the form ((MO │ │ │ -00007b20: 4e54 4820 4441 5920 5945 4152 2920 5354 NTH DAY YEAR) ST │ │ │ -00007b30: 5249 4e47 292c 2077 6865 7265 2074 6865 RING), where the │ │ │ -00007b40: 2064 6174 6520 6973 2074 6861 7420 6f66 date is that of │ │ │ -00007b50: 2074 6865 0a4e 7468 2064 6179 2062 6566 the.Nth day bef │ │ │ -00007b60: 6f72 6520 6f72 2061 6674 6572 2045 6173 ore or after Eas │ │ │ -00007b70: 7465 722e 0a0a 466f 7220 6261 636b 7761 ter...For backwa │ │ │ -00007b80: 7264 7320 636f 6d70 6174 6962 696c 6974 rds compatibilit │ │ │ -00007b90: 792c 2069 6620 7468 6973 2066 756e 6374 y, if this funct │ │ │ -00007ba0: 696f 6e20 6973 2063 616c 6c65 6420 7769 ion is called wi │ │ │ -00007bb0: 7468 206e 6f0a 6172 6775 6d65 6e74 732c th no.arguments, │ │ │ -00007bc0: 2069 7420 7265 7475 726e 7320 7468 6520 it returns the │ │ │ -00007bd0: 6461 7465 206f 6620 5061 7363 6861 2028 date of Pascha ( │ │ │ -00007be0: 4772 6565 6b20 4f72 7468 6f64 6f78 2045 Greek Orthodox E │ │ │ -00007bf0: 6173 7465 7229 2e0a 0a28 666e 2026 6f70 aster)...(fn &op │ │ │ -00007c00: 7469 6f6e 616c 204e 2053 5452 494e 4729 tional N STRING) │ │ │ -00007c10: 1f0a 2864 6566 616c 6961 7320 2768 6f6c ..(defalias 'hol │ │ │ -00007c20: 6964 6179 2d67 7265 656b 2d6f 7274 686f iday-greek-ortho │ │ │ -00007c30: 646f 782d 6561 7374 6572 2023 5b35 3132 dox-easter #[512 │ │ │ -00007c40: 2022 0809 5c33 3032 5c33 3033 025c 3330 "..\302\303.\30 │ │ │ -00007c50: 3457 5c32 3033 0e00 0254 5c32 3632 035c 4W\203...T\262.\ │ │ │ -00007c60: 3330 3503 035f 055c 3330 365c 3330 3724 305.._.\306\307$ │ │ │ -00007c70: 5c32 3632 015c 3331 3001 035c 2254 5c32 \262.\310..\"T\2 │ │ │ -00007c80: 3632 045c 3231 3102 5c32 3435 5c32 3632 62.\211.\245\262 │ │ │ -00007c90: 035c 3231 315c 3330 3457 5c32 3033 3400 .\211\304W\2034. │ │ │ -00007ca0: 035c 3330 3756 5c32 3033 3400 0253 5c32 .\307V\2034..S\2 │ │ │ -00007cb0: 3632 0302 5c33 3037 575c 3230 333e 0002 62..\307W\203>.. │ │ │ -00007cc0: 535c 3236 3203 5c32 3636 025c 3331 3102 S\262.\266.\311. │ │ │ -00007cd0: 5c32 3131 0301 5c33 3132 555c 3230 3376 \211..\312U\203v │ │ │ -00007ce0: 005c 3231 315c 3231 315c 3330 3457 5c32 .\211\211\304W\2 │ │ │ -00007cf0: 3033 5700 5c33 3133 0121 535c 3236 3201 03W.\313.!S\262. │ │ │ -00007d00: 5c32 3131 5c33 3134 5c32 3436 5c33 3034 \211\314\246\304 │ │ │ -00007d10: 555c 3230 356d 005c 3231 315c 3331 355c U\205m.\211\315\ │ │ │ -00007d20: 3234 365c 3330 3455 3f5c 3230 366d 005c 246\304U?\206m.\ │ │ │ -00007d30: 3231 315c 3331 365c 3234 365c 3330 3455 211\316\246\304U │ │ │ -00007d40: 5c32 3632 015c 3230 3376 005c 3331 375c \262.\203v.\317\ │ │ │ -00007d50: 3230 327a 005c 3332 3002 5348 5c32 3636 202z.\320.SH\266 │ │ │ -00007d60: 5c32 3032 0345 5c32 3131 5c33 3132 0138 \202.E\211\312.8 │ │ │ -00007d70: 5c32 3632 015c 3330 3301 5c33 3034 555c \262.\303.\304U\ │ │ │ -00007d80: 3230 335c 3232 3100 5c33 3231 5c33 3232 203\221.\321\322 │ │ │ -00007d90: 215c 3230 325c 3332 3101 015c 3330 3456 !\202\321..\304V │ │ │ -00007da0: 5c32 3033 0701 0153 5c32 3632 015c 3330 \203...S\262.\30 │ │ │ -00007db0: 3503 5c32 3131 5c32 3131 405c 3236 3201 5.\211\211@\262. │ │ │ -00007dc0: 015c 3231 3141 405c 3236 3201 025c 3331 .\211A@\262..\31 │ │ │ -00007dd0: 3201 385c 3236 3201 015c 3332 3304 535f 2.8\262..\323.S_ │ │ │ -00007de0: 5c5c 035c 3331 3256 5c32 3033 5c33 3632 \\.\312V\203\362 │ │ │ -00007df0: 005c 3231 315c 3332 345c 3331 3406 065f .\211\324\314.._ │ │ │ -00007e00: 5c5c 5c33 3235 5c32 3435 5a5c 3236 3201 \\\325\245Z\262. │ │ │ -00007e10: 015c 3231 315c 3330 3457 5c32 3033 5c33 .\211\304W\203\3 │ │ │ -00007e20: 3233 005c 3331 3301 2153 5c32 3632 015c 23.\313.!S\262.\ │ │ │ -00007e30: 3231 315c 3331 345c 3234 365c 3330 3455 211\314\246\304U │ │ │ -00007e40: 5c32 3035 5c33 3531 005c 3231 315c 3331 \205\351.\211\31 │ │ │ -00007e50: 355c 3234 365c 3330 3455 3f5c 3230 365c 5\246\304U?\206\ │ │ │ -00007e60: 3335 3100 5c32 3131 5c33 3136 5c32 3436 351.\211\316\246 │ │ │ -00007e70: 5c33 3034 555c 3236 3201 5c32 3033 5c33 \304U\262.\203\3 │ │ │ -00007e80: 3632 005c 3231 3154 5c32 3632 015c 3236 62.\211T\262.\26 │ │ │ -00007e90: 365c 3230 335c 3236 3201 5c33 3236 035f 6\203\262.\326._ │ │ │ -00007ea0: 035c 3331 345c 3234 3504 5c33 3135 5c32 .\314\245.\315\2 │ │ │ -00007eb0: 3435 5b05 5c33 3136 5c32 3435 255c 3230 45[.\316\245%\20 │ │ │ -00007ec0: 325c 3332 3101 5c33 3133 0254 215c 3236 2\321.\313.T!\26 │ │ │ -00007ed0: 3201 5c33 3237 035c 3231 315c 3231 3140 2.\327.\211\211@ │ │ │ -00007ee0: 5c32 3632 0101 5c32 3131 4140 5c32 3632 \262..\211A@\262 │ │ │ -00007ef0: 0102 5c33 3132 0138 5c32 3632 0101 5c33 ..\312.8\262..\3 │ │ │ -00007f00: 3233 0453 5f5c 5c03 5c33 3132 565c 3230 23.S_\\.\312V\20 │ │ │ -00007f10: 3364 015c 3231 315c 3332 345c 3331 3406 3d.\211\324\314. │ │ │ -00007f20: 065f 5c5c 5c33 3235 5c32 3435 5a5c 3236 ._\\\325\245Z\26 │ │ │ -00007f30: 3201 015c 3231 315c 3330 3457 5c32 3033 2..\211\304W\203 │ │ │ -00007f40: 4501 5c33 3133 0121 535c 3236 3201 5c32 E.\313.!S\262.\2 │ │ │ -00007f50: 3131 5c33 3134 5c32 3436 5c33 3034 555c 11\314\246\304U\ │ │ │ -00007f60: 3230 355b 015c 3231 315c 3331 355c 3234 205[.\211\315\24 │ │ │ -00007f70: 365c 3330 3455 3f5c 3230 365b 015c 3231 6\304U?\206[.\21 │ │ │ -00007f80: 315c 3331 365c 3234 365c 3330 3455 5c32 1\316\246\304U\2 │ │ │ -00007f90: 3632 015c 3230 3364 015c 3231 3154 5c32 62.\203d.\211T\2 │ │ │ -00007fa0: 3632 015c 3236 365c 3230 335c 3236 3201 62.\266\203\262. │ │ │ -00007fb0: 5c33 3236 035f 035c 3331 345c 3234 3504 \326._.\314\245. │ │ │ -00007fc0: 5c33 3135 5c32 3435 5b05 5c33 3136 5c32 \315\245[.\316\2 │ │ │ -00007fd0: 3435 5c33 3330 5c32 3131 5c32 3131 405c 45\330\211\211@\ │ │ │ -00007fe0: 3236 3201 015c 3231 3141 405c 3236 3201 262..\211A@\262. │ │ │ -00007ff0: 025c 3331 3201 385c 3236 3201 015c 3332 .\312.8\262..\32 │ │ │ -00008000: 3304 535f 5c5c 035c 3331 3256 5c32 3033 3.S_\\.\312V\203 │ │ │ -00008010: 5c33 3133 015c 3231 315c 3332 345c 3331 \313.\211\324\31 │ │ │ -00008020: 3406 065f 5c5c 5c33 3235 5c32 3435 5a5c 4.._\\\325\245Z\ │ │ │ -00008030: 3236 3201 015c 3231 315c 3330 3457 5c32 262..\211\304W\2 │ │ │ -00008040: 3033 5c32 3534 015c 3331 3301 2153 5c32 03\254.\313.!S\2 │ │ │ -00008050: 3632 015c 3231 315c 3331 345c 3234 365c 62.\211\314\246\ │ │ │ -00008060: 3330 3455 5c32 3035 5c33 3032 015c 3231 304U\205\302.\21 │ │ │ -00008070: 315c 3331 355c 3234 365c 3330 3455 3f5c 1\315\246\304U?\ │ │ │ -00008080: 3230 365c 3330 3201 5c32 3131 5c33 3136 206\302.\211\316 │ │ │ -00008090: 5c32 3436 5c33 3034 555c 3236 3201 5c32 \246\304U\262.\2 │ │ │ -000080a0: 3033 5c33 3133 015c 3231 3154 5c32 3632 03\313.\211T\262 │ │ │ -000080b0: 015c 3236 365c 3230 335c 3236 3201 2606 .\266\203\262.&. │ │ │ -000080c0: 5c32 3636 5c32 3032 5c32 3632 0121 5c33 \266\202\262.!\3 │ │ │ -000080d0: 3132 0138 5c32 3632 015c 3333 315c 3333 12.8\262.\331\33 │ │ │ -000080e0: 3202 5c33 3333 5c32 3436 5f5c 5c5c 3333 2.\333\246_\\\33 │ │ │ -000080f0: 345c 3234 365c 3333 355c 3331 345c 3333 4\246\335\314\33 │ │ │ -00008100: 3304 4521 015a 5c33 3336 5c33 3034 025c 3.E!.Z\336\304.\ │ │ │ -00008110: 3333 375c 5c5c 225c 3334 3001 0609 5c32 337\\\"\340...\2 │ │ │ -00008120: 3036 5c33 3732 015c 3330 345c 5c21 5c33 06\372.\304\\!\3 │ │ │ -00008130: 3431 0121 5c32 3035 0b02 5c32 3131 0608 41.!\205..\211.. │ │ │ -00008140: 5c32 3036 0902 5c33 3432 4443 5c32 3037 \206..\342DC\207 │ │ │ -00008150: 2220 5b64 6973 706c 6179 6564 2d6d 6f6e " [displayed-mon │ │ │ -00008160: 7468 2064 6973 706c 6179 6564 2d79 6561 th displayed-yea │ │ │ -00008170: 7220 3132 206e 696c 2030 202b 202d 3120 r 12 nil 0 + -1 │ │ │ -00008180: 3120 6d6f 6420 6361 6c65 6e64 6172 2d6a 1 mod calendar-j │ │ │ -00008190: 756c 6961 6e2d 6672 6f6d 2d61 6273 6f6c ulian-from-absol │ │ │ -000081a0: 7574 6520 3220 6162 7320 3420 3130 3020 ute 2 abs 4 100 │ │ │ -000081b0: 3430 3020 3239 205b 3331 2032 3820 3331 400 29 [31 28 31 │ │ │ -000081c0: 2033 3020 3331 2033 3020 3331 2033 3120 30 31 30 31 31 │ │ │ -000081d0: 3330 2033 3120 3330 2033 315d 2075 7365 30 31 30 31] use │ │ │ -000081e0: 722d 6572 726f 7220 2254 6865 7265 2077 r-error "There w │ │ │ -000081f0: 6173 206e 6f20 7965 6172 207a 6572 6f22 as no year zero" │ │ │ -00008200: 2033 3120 3233 2031 3020 3336 3520 2d20 31 23 10 365 - │ │ │ -00008210: 2831 3220 3331 202d 3129 2031 3420 3131 (12 31 -1) 14 11 │ │ │ -00008220: 2031 3920 3330 2063 616c 656e 6461 722d 19 30 calendar- │ │ │ -00008230: 6a75 6c69 616e 2d74 6f2d 6162 736f 6c75 julian-to-absolu │ │ │ -00008240: 7465 2063 616c 656e 6461 722d 6461 796e te calendar-dayn │ │ │ -00008250: 616d 652d 6f6e 2d6f 722d 6265 666f 7265 ame-on-or-before │ │ │ -00008260: 2037 2063 616c 656e 6461 722d 6772 6567 7 calendar-greg │ │ │ -00008270: 6f72 6961 6e2d 6672 6f6d 2d61 6273 6f6c orian-from-absol │ │ │ -00008280: 7574 6520 6361 6c65 6e64 6172 2d64 6174 ute calendar-dat │ │ │ -00008290: 652d 6973 2d76 6973 6962 6c65 2d70 2022 e-is-visible-p " │ │ │ -000082a0: 5061 7363 6861 2028 4772 6565 6b20 4f72 Pascha (Greek Or │ │ │ -000082b0: 7468 6f64 6f78 2045 6173 7465 7229 225d thodox Easter)"] │ │ │ -000082c0: 2032 3320 2823 2420 2e20 3331 3234 3029 23 (#$ . 31240) │ │ │ -000082d0: 5d29 0a28 7072 6f76 6964 6520 2768 6f6c ]).(provide 'hol │ │ │ -000082e0: 6964 6179 7329 0a idays). │ │ │ +000037f0: 365c 3230 345c 3332 3703 5f03 5c33 3232 6\204\327._.\322 │ │ │ +00003800: 5c32 3435 045c 3332 355c 3234 355b 055c \245.\325\245[.\ │ │ │ +00003810: 3332 365c 3234 3525 5c32 3032 6701 5c33 326\245%\202g.\3 │ │ │ +00003820: 3234 0254 215c 3236 3201 5c33 3330 035c 24.T!\262.\330.\ │ │ │ +00003830: 3231 315c 3231 3140 5c32 3632 0101 5c32 211\211@\262..\2 │ │ │ +00003840: 3131 4140 5c32 3632 0102 5c33 3131 0138 11A@\262..\311.8 │ │ │ +00003850: 5c32 3632 0101 5c33 3230 0453 5f5c 5c03 \262..\320.S_\\. │ │ │ +00003860: 5c33 3131 565c 3230 335c 3337 3600 5c32 \311V\203\376.\2 │ │ │ +00003870: 3131 5c33 3231 5c33 3232 0606 5f5c 5c5c 11\321\322.._\\\ │ │ │ +00003880: 3332 335c 3234 355a 5c32 3632 0101 5c32 323\245Z\262..\2 │ │ │ +00003890: 3131 5c33 3134 575c 3230 335c 3333 3700 11\314W\203\337. │ │ │ +000038a0: 5c33 3234 0121 535c 3236 3201 5c32 3131 \324.!S\262.\211 │ │ │ +000038b0: 5c33 3232 5c32 3436 5c33 3134 555c 3230 \322\246\314U\20 │ │ │ +000038c0: 355c 3336 3500 5c32 3131 5c33 3235 5c32 5\365.\211\325\2 │ │ │ +000038d0: 3436 5c33 3134 553f 5c32 3036 5c33 3635 46\314U?\206\365 │ │ │ +000038e0: 005c 3231 315c 3332 365c 3234 365c 3331 .\211\326\246\31 │ │ │ +000038f0: 3455 5c32 3632 015c 3230 335c 3337 3600 4U\262.\203\376. │ │ │ +00003900: 5c32 3131 545c 3236 3201 5c32 3636 5c32 \211T\262.\266\2 │ │ │ +00003910: 3034 5c33 3237 035f 035c 3332 325c 3234 04\327._.\322\24 │ │ │ +00003920: 3504 5c33 3235 5c32 3435 5b05 5c33 3236 5.\325\245[.\326 │ │ │ +00003930: 5c32 3435 5c33 3331 5c32 3131 5c32 3131 \245\331\211\211 │ │ │ +00003940: 405c 3236 3201 015c 3231 3141 405c 3236 @\262..\211A@\26 │ │ │ +00003950: 3201 025c 3331 3101 385c 3236 3201 015c 2..\311.8\262..\ │ │ │ +00003960: 3332 3004 535f 5c5c 035c 3331 3156 5c32 320.S_\\.\311V\2 │ │ │ +00003970: 3033 6301 5c32 3131 5c33 3231 5c33 3232 03c.\211\321\322 │ │ │ +00003980: 0606 5f5c 5c5c 3332 335c 3234 355a 5c32 .._\\\323\245Z\2 │ │ │ +00003990: 3632 0101 5c32 3131 5c33 3134 575c 3230 62..\211\314W\20 │ │ │ +000039a0: 3344 015c 3332 3401 2153 5c32 3632 015c 3D.\324.!S\262.\ │ │ │ +000039b0: 3231 315c 3332 325c 3234 365c 3331 3455 211\322\246\314U │ │ │ +000039c0: 5c32 3035 5a01 5c32 3131 5c33 3235 5c32 \205Z.\211\325\2 │ │ │ +000039d0: 3436 5c33 3134 553f 5c32 3036 5a01 5c32 46\314U?\206Z.\2 │ │ │ +000039e0: 3131 5c33 3236 5c32 3436 5c33 3134 555c 11\326\246\314U\ │ │ │ +000039f0: 3236 3201 5c32 3033 6301 5c32 3131 545c 262.\203c.\211T\ │ │ │ +00003a00: 3236 3201 5c32 3636 5c32 3034 2606 5c32 262.\266\204&.\2 │ │ │ +00003a10: 3636 5c32 3033 5c33 3332 5c33 3132 0607 66\203\332\312.. │ │ │ +00003a20: 455c 3231 315c 3331 3101 385c 3236 3201 E\211\311.8\262. │ │ │ +00003a30: 5c33 3133 015c 3331 3455 5c32 3033 5c32 \313.\314U\203\2 │ │ │ +00003a40: 3031 015c 3331 355c 3331 3621 5c32 3032 01.\315\316!\202 │ │ │ +00003a50: 5c32 3733 0201 5c33 3134 565c 3230 335c \273..\314V\203\ │ │ │ +00003a60: 3336 3501 0153 5c32 3632 015c 3331 3703 365..S\262.\317. │ │ │ +00003a70: 5c32 3131 5c32 3131 405c 3236 3201 015c \211\211@\262..\ │ │ │ +00003a80: 3231 3141 405c 3236 3201 025c 3331 3101 211A@\262..\311. │ │ │ +00003a90: 385c 3236 3201 015c 3332 3004 535f 5c5c 8\262..\320.S_\\ │ │ │ +00003aa0: 035c 3331 3156 5c32 3033 5c33 3432 015c .\311V\203\342.\ │ │ │ +00003ab0: 3231 315c 3332 315c 3332 3206 065f 5c5c 211\321\322.._\\ │ │ │ +00003ac0: 5c33 3233 5c32 3435 5a5c 3236 3201 015c \323\245Z\262..\ │ │ │ +00003ad0: 3231 315c 3331 3457 5c32 3033 5c33 3033 211\314W\203\303 │ │ │ +00003ae0: 015c 3332 3401 2153 5c32 3632 015c 3231 .\324.!S\262.\21 │ │ │ +00003af0: 315c 3332 325c 3234 365c 3331 3455 5c32 1\322\246\314U\2 │ │ │ +00003b00: 3035 5c33 3331 015c 3231 315c 3332 355c 05\331.\211\325\ │ │ │ +00003b10: 3234 365c 3331 3455 3f5c 3230 365c 3333 246\314U?\206\33 │ │ │ +00003b20: 3101 5c32 3131 5c33 3236 5c32 3436 5c33 1.\211\326\246\3 │ │ │ +00003b30: 3134 555c 3236 3201 5c32 3033 5c33 3432 14U\262.\203\342 │ │ │ +00003b40: 015c 3231 3154 5c32 3632 015c 3236 365c .\211T\262.\266\ │ │ │ +00003b50: 3230 345c 3332 3703 5f03 5c33 3232 5c32 204\327._.\322\2 │ │ │ +00003b60: 3435 045c 3332 355c 3234 355b 055c 3332 45.\325\245[.\32 │ │ │ +00003b70: 365c 3234 3525 5c32 3032 5c32 3733 025c 6\245%\202\273.\ │ │ │ +00003b80: 3332 3402 5421 5c32 3632 015c 3333 3003 324.T!\262.\330. │ │ │ +00003b90: 5c32 3131 5c32 3131 405c 3236 3201 015c \211\211@\262..\ │ │ │ +00003ba0: 3231 3141 405c 3236 3201 025c 3331 3101 211A@\262..\311. │ │ │ +00003bb0: 385c 3236 3201 015c 3332 3004 535f 5c5c 8\262..\320.S_\\ │ │ │ +00003bc0: 035c 3331 3156 5c32 3033 5202 5c32 3131 .\311V\203R.\211 │ │ │ +00003bd0: 5c33 3231 5c33 3232 0606 5f5c 5c5c 3332 \321\322.._\\\32 │ │ │ +00003be0: 335c 3234 355a 5c32 3632 0101 5c32 3131 3\245Z\262..\211 │ │ │ +00003bf0: 5c33 3134 575c 3230 3333 025c 3332 3401 \314W\2033.\324. │ │ │ +00003c00: 2153 5c32 3632 015c 3231 315c 3332 325c !S\262.\211\322\ │ │ │ +00003c10: 3234 365c 3331 3455 5c32 3035 4902 5c32 246\314U\205I.\2 │ │ │ +00003c20: 3131 5c33 3235 5c32 3436 5c33 3134 553f 11\325\246\314U? │ │ │ +00003c30: 5c32 3036 4902 5c32 3131 5c33 3236 5c32 \206I.\211\326\2 │ │ │ +00003c40: 3436 5c33 3134 555c 3236 3201 5c32 3033 46\314U\262.\203 │ │ │ +00003c50: 5202 5c32 3131 545c 3236 3201 5c32 3636 R.\211T\262.\266 │ │ │ +00003c60: 5c32 3034 5c33 3237 035f 035c 3332 325c \204\327._.\322\ │ │ │ +00003c70: 3234 3504 5c33 3235 5c32 3435 5b05 5c33 245.\325\245[.\3 │ │ │ +00003c80: 3236 5c32 3435 5c33 3331 5c32 3131 5c32 26\245\331\211\2 │ │ │ +00003c90: 3131 405c 3236 3201 015c 3231 3141 405c 11@\262..\211A@\ │ │ │ +00003ca0: 3236 3201 025c 3331 3101 385c 3236 3201 262..\311.8\262. │ │ │ +00003cb0: 015c 3332 3004 535f 5c5c 035c 3331 3156 .\320.S_\\.\311V │ │ │ +00003cc0: 5c32 3033 5c32 3637 025c 3231 315c 3332 \203\267.\211\32 │ │ │ +00003cd0: 315c 3332 3206 065f 5c5c 5c33 3233 5c32 1\322.._\\\323\2 │ │ │ +00003ce0: 3435 5a5c 3236 3201 015c 3231 315c 3331 45Z\262..\211\31 │ │ │ +00003cf0: 3457 5c32 3033 5c32 3330 025c 3332 3401 4W\203\230.\324. │ │ │ +00003d00: 2153 5c32 3632 015c 3231 315c 3332 325c !S\262.\211\322\ │ │ │ +00003d10: 3234 365c 3331 3455 5c32 3035 5c32 3536 246\314U\205\256 │ │ │ +00003d20: 025c 3231 315c 3332 355c 3234 365c 3331 .\211\325\246\31 │ │ │ +00003d30: 3455 3f5c 3230 365c 3235 3602 5c32 3131 4U?\206\256.\211 │ │ │ +00003d40: 5c33 3236 5c32 3436 5c33 3134 555c 3236 \326\246\314U\26 │ │ │ +00003d50: 3201 5c32 3033 5c32 3637 025c 3231 3154 2.\203\267.\211T │ │ │ +00003d60: 5c32 3632 015c 3236 365c 3230 3426 065c \262.\266\204&.\ │ │ │ +00003d70: 3236 365c 3230 335c 3331 3106 085c 3331 266\203\311..\31 │ │ │ +00003d80: 3301 1902 1a06 0618 0404 585c 3230 3366 3.........X\203f │ │ │ +00003d90: 045c 3333 3301 5c33 3334 205c 225c 3236 .\333.\334 \"\26 │ │ │ +00003da0: 3201 5c33 3335 5c33 3133 095c 3331 3457 2.\335\313.\314W │ │ │ +00003db0: 5c32 3033 5c33 3430 0209 5411 5c33 3137 \203\340..T.\317 │ │ │ +00003dc0: 0903 5f5c 6e5c 3333 365c 3333 3724 5c32 .._\n\336\337$\2 │ │ │ +00003dd0: 3632 015c 3334 3001 035c 2254 125c 3231 62.\340..\"T.\21 │ │ │ +00003de0: 3102 5c32 3435 115c 3231 315c 3331 3457 1.\245.\211\314W │ │ │ +00003df0: 5c32 3033 0303 5c6e 5c33 3132 565c 3230 \203..\n\312V\20 │ │ │ +00003e00: 3303 0309 5311 095c 3331 3257 5c32 3033 3...S..\312W\203 │ │ │ +00003e10: 5c66 0309 5311 5c32 3636 025c 6e5c 3331 \f..S.\266.\n\31 │ │ │ +00003e20: 3209 455c 3231 315c 3331 3101 385c 3236 2.E\211\311.8\26 │ │ │ +00003e30: 3201 5c33 3133 015c 3331 3455 5c32 3033 2.\313.\314U\203 │ │ │ +00003e40: 2503 5c33 3135 5c33 3136 215c 3230 325f %.\315\316!\202_ │ │ │ +00003e50: 0401 5c33 3134 565c 3230 335c 3233 3103 ..\314V\203\231. │ │ │ +00003e60: 0153 5c32 3632 015c 3331 3703 5c32 3131 .S\262.\317.\211 │ │ │ +00003e70: 5c32 3131 405c 3236 3201 015c 3231 3141 \211@\262..\211A │ │ │ +00003e80: 405c 3236 3201 025c 3331 3101 385c 3236 @\262..\311.8\26 │ │ │ +00003e90: 3201 015c 3332 3004 535f 5c5c 035c 3331 2..\320.S_\\.\31 │ │ │ +00003ea0: 3156 5c32 3033 5c32 3036 035c 3231 315c 1V\203\206.\211\ │ │ │ +00003eb0: 3332 315c 3332 3206 065f 5c5c 5c33 3233 321\322.._\\\323 │ │ │ +00003ec0: 5c32 3435 5a5c 3236 3201 015c 3231 315c \245Z\262..\211\ │ │ │ +00003ed0: 3331 3457 5c32 3033 6703 5c33 3234 0121 314W\203g.\324.! │ │ │ +00003ee0: 535c 3236 3201 5c32 3131 5c33 3232 5c32 S\262.\211\322\2 │ │ │ +00003ef0: 3436 5c33 3134 555c 3230 357d 035c 3231 46\314U\205}.\21 │ │ │ +00003f00: 315c 3332 355c 3234 365c 3331 3455 3f5c 1\325\246\314U?\ │ │ │ +00003f10: 3230 367d 035c 3231 315c 3332 365c 3234 206}.\211\326\24 │ │ │ +00003f20: 365c 3331 3455 5c32 3632 015c 3230 335c 6\314U\262.\203\ │ │ │ +00003f30: 3230 3603 5c32 3131 545c 3236 3201 5c32 206.\211T\262.\2 │ │ │ +00003f40: 3636 5c32 3034 5c33 3237 035f 035c 3332 66\204\327._.\32 │ │ │ +00003f50: 325c 3234 3504 5c33 3235 5c32 3435 5b05 2\245.\325\245[. │ │ │ +00003f60: 5c33 3236 5c32 3435 255c 3230 325f 045c \326\245%\202_.\ │ │ │ +00003f70: 3332 3402 5421 5c32 3632 015c 3333 3003 324.T!\262.\330. │ │ │ +00003f80: 5c32 3131 5c32 3131 405c 3236 3201 015c \211\211@\262..\ │ │ │ +00003f90: 3231 3141 405c 3236 3201 025c 3331 3101 211A@\262..\311. │ │ │ +00003fa0: 385c 3236 3201 015c 3332 3004 535f 5c5c 8\262..\320.S_\\ │ │ │ +00003fb0: 035c 3331 3156 5c32 3033 5c33 3636 035c .\311V\203\366.\ │ │ │ +00003fc0: 3231 315c 3332 315c 3332 3206 065f 5c5c 211\321\322.._\\ │ │ │ +00003fd0: 5c33 3233 5c32 3435 5a5c 3236 3201 015c \323\245Z\262..\ │ │ │ +00003fe0: 3231 315c 3331 3457 5c32 3033 5c33 3237 211\314W\203\327 │ │ │ +00003ff0: 035c 3332 3401 2153 5c32 3632 015c 3231 .\324.!S\262.\21 │ │ │ +00004000: 315c 3332 325c 3234 365c 3331 3455 5c32 1\322\246\314U\2 │ │ │ +00004010: 3035 5c33 3535 035c 3231 315c 3332 355c 05\355.\211\325\ │ │ │ +00004020: 3234 365c 3331 3455 3f5c 3230 365c 3335 246\314U?\206\35 │ │ │ +00004030: 3503 5c32 3131 5c33 3236 5c32 3436 5c33 5.\211\326\246\3 │ │ │ +00004040: 3134 555c 3236 3201 5c32 3033 5c33 3636 14U\262.\203\366 │ │ │ +00004050: 035c 3231 3154 5c32 3632 015c 3236 365c .\211T\262.\266\ │ │ │ +00004060: 3230 345c 3332 3703 5f03 5c33 3232 5c32 204\327._.\322\2 │ │ │ +00004070: 3435 045c 3332 355c 3234 355b 055c 3332 45.\325\245[.\32 │ │ │ +00004080: 365c 3234 355c 3333 315c 3231 315c 3231 6\245\331\211\21 │ │ │ +00004090: 3140 5c32 3632 0101 5c32 3131 4140 5c32 1@\262..\211A@\2 │ │ │ +000040a0: 3632 0102 5c33 3131 0138 5c32 3632 0101 62..\311.8\262.. │ │ │ +000040b0: 5c33 3230 0453 5f5c 5c03 5c33 3131 565c \320.S_\\.\311V\ │ │ │ +000040c0: 3230 335b 045c 3231 315c 3332 315c 3332 203[.\211\321\32 │ │ │ +000040d0: 3206 065f 5c5c 5c33 3233 5c32 3435 5a5c 2.._\\\323\245Z\ │ │ │ +000040e0: 3236 3201 015c 3231 315c 3331 3457 5c32 262..\211\314W\2 │ │ │ +000040f0: 3033 3c04 5c33 3234 0121 535c 3236 3201 03<.\324.!S\262. │ │ │ +00004100: 5c32 3131 5c33 3232 5c32 3436 5c33 3134 \211\322\246\314 │ │ │ +00004110: 555c 3230 3552 045c 3231 315c 3332 355c U\205R.\211\325\ │ │ │ +00004120: 3234 365c 3331 3455 3f5c 3230 3652 045c 246\314U?\206R.\ │ │ │ +00004130: 3231 315c 3332 365c 3234 365c 3331 3455 211\326\246\314U │ │ │ +00004140: 5c32 3632 015c 3230 335b 045c 3231 3154 \262.\203[.\211T │ │ │ +00004150: 5c32 3632 015c 3236 365c 3230 3426 065c \262.\266\204&.\ │ │ │ +00004160: 3236 365c 3230 335c 3236 3205 5c32 3032 266\203\262.\202 │ │ │ +00004170: 5c33 3130 025c 3231 325c 3334 310b 2171 \310.\212\341.!q │ │ │ +00004180: 5c32 3130 5c33 3432 5c33 3433 215c 3230 \210\342\343!\20 │ │ │ +00004190: 3475 045c 3334 3320 5c32 3130 5c33 3133 4u.\343 \210\313 │ │ │ +000041a0: 145c 3334 3415 5c33 3435 205c 3231 305c .\344.\345 \210\ │ │ │ +000041b0: 3334 360b 215c 3231 305c 3334 3706 0b06 346.!\210\347... │ │ │ +000041c0: 0b55 5c32 3033 5c32 3233 045c 3335 305c .U\203\223.\350\ │ │ │ +000041d0: 3335 3106 0806 0e23 5c32 3032 5c32 3334 351....#\202\234 │ │ │ +000041e0: 045c 3335 305c 3335 3206 0806 0e06 0e24 .\350\352......$ │ │ │ +000041f0: 215c 3231 305c 3335 335c 3335 3402 5c33 !\210\353\354.\3 │ │ │ +00004200: 3535 2363 5c32 3130 6562 5c32 3130 5c33 55#c\210eb\210\3 │ │ │ +00004210: 3536 5c33 3133 215c 3231 305c 3334 3414 56\313!\210\344. │ │ │ +00004220: 5c33 3036 5c33 3537 212c 5c32 3037 2220 \306\357!,\207" │ │ │ +00004230: 5b63 616c 656e 6461 722d 686f 6c69 6461 [calendar-holida │ │ │ +00004240: 7973 2064 6973 706c 6179 6564 2d79 6561 ys displayed-yea │ │ │ +00004250: 7220 6469 7370 6c61 7965 642d 6d6f 6e74 r displayed-mont │ │ │ +00004260: 6820 686f 6c69 6461 792d 6275 6666 6572 h holiday-buffer │ │ │ +00004270: 2062 7566 6665 722d 7265 6164 2d6f 6e6c buffer-read-onl │ │ │ +00004280: 7920 6275 6666 6572 2d75 6e64 6f2d 6c69 y buffer-undo-li │ │ │ +00004290: 7374 206d 6573 7361 6765 2022 436f 6d70 st message "Comp │ │ │ +000042a0: 7574 696e 6720 686f 6c69 6461 7973 2e2e uting holidays.. │ │ │ +000042b0: 2e22 2022 486f 6c69 6461 7973 2220 3220 ." "Holidays" 2 │ │ │ +000042c0: 3120 6e69 6c20 3020 7573 6572 2d65 7272 1 nil 0 user-err │ │ │ +000042d0: 6f72 2022 5468 6572 6520 7761 7320 6e6f or "There was no │ │ │ +000042e0: 2079 6561 7220 7a65 726f 2220 2b20 3331 year zero" + 31 │ │ │ +000042f0: 2032 3320 3420 3130 2061 6273 2031 3030 23 4 10 abs 100 │ │ │ +00004300: 2034 3030 2033 3635 202d 2028 3132 2033 400 365 - (12 3 │ │ │ +00004310: 3120 2d31 2920 3131 2061 7070 656e 6420 1 -1) 11 append │ │ │ +00004320: 6361 6c65 6e64 6172 2d68 6f6c 6964 6179 calendar-holiday │ │ │ +00004330: 2d6c 6973 7420 3132 202d 3120 3320 6d6f -list 12 -1 3 mo │ │ │ +00004340: 6420 6765 742d 6275 6666 6572 2d63 7265 d get-buffer-cre │ │ │ +00004350: 6174 6520 6465 7269 7665 642d 6d6f 6465 ate derived-mode │ │ │ +00004360: 2d70 2073 7065 6369 616c 2d6d 6f64 6520 -p special-mode │ │ │ +00004370: 7420 6572 6173 652d 6275 6666 6572 2064 t erase-buffer d │ │ │ +00004380: 6973 706c 6179 2d62 7566 6665 7220 6361 isplay-buffer ca │ │ │ +00004390: 6c65 6e64 6172 2d73 6574 2d6d 6f64 652d lendar-set-mode- │ │ │ +000043a0: 6c69 6e65 2066 6f72 6d61 7420 2225 7320 line format "%s │ │ │ +000043b0: 666f 7220 2573 2220 2225 7320 666f 7220 for %s" "%s for │ │ │ +000043c0: 2573 2d25 7322 206d 6170 636f 6e63 6174 %s-%s" mapconcat │ │ │ +000043d0: 2023 5b32 3537 2022 5c33 3030 0140 215c #[257 "\300.@!\ │ │ │ +000043e0: 3330 3102 4140 515c 3230 3722 205b 6361 301.A@Q\207" [ca │ │ │ +000043f0: 6c65 6e64 6172 2d64 6174 652d 7374 7269 lendar-date-stri │ │ │ +00004400: 6e67 2022 3a20 225d 2034 2022 5c6e 5c6e ng ": "] 4 "\n\n │ │ │ +00004410: 2866 6e20 5829 225d 2022 5c6e 2220 7365 (fn X)"] "\n" se │ │ │ +00004420: 742d 6275 6666 6572 2d6d 6f64 6966 6965 t-buffer-modifie │ │ │ +00004430: 642d 7020 2243 6f6d 7075 7469 6e67 2068 d-p "Computing h │ │ │ +00004440: 6f6c 6964 6179 732e 2e2e 646f 6e65 225d olidays...done"] │ │ │ +00004450: 2032 3920 2823 2420 2e20 3133 3136 3229 29 (#$ . 13162) │ │ │ +00004460: 2028 6279 7465 2d63 6f64 6520 225c 3330 (byte-code "\30 │ │ │ +00004470: 365c 3330 375c 3331 305c 3331 315c 3331 6\307\310\311\31 │ │ │ +00004480: 3220 5c33 3133 0138 5c32 3632 0121 235c 2 \313.8\262.!#\ │ │ │ +00004490: 3330 365c 3331 345c 3331 3503 5c22 5c33 306\314\315.\"\3 │ │ │ +000044a0: 3136 5c33 3137 5c33 3230 5c33 3231 5c33 16\317\320\321\3 │ │ │ +000044b0: 3232 0607 215c 3332 335c 225c 3332 345c 22..!\323\"\324\ │ │ │ +000044c0: 3332 3525 5c33 3131 0421 235c 3332 3618 325%\311.!#\326. │ │ │ +000044d0: 5c33 3237 0942 5c33 3330 5c33 3331 4343 \327.B\330\331CC │ │ │ +000044e0: 425c 6e5c 3230 3534 005c 3333 325c 6e42 B\n\2054.\332\nB │ │ │ +000044f0: 0b5c 3230 353b 005c 3333 330b 425c 665c .\205;.\333.B\f\ │ │ │ +00004500: 3230 3542 005c 3333 345c 6642 0d5c 3230 205B.\334\fB.\20 │ │ │ +00004510: 3549 005c 3333 350d 420e 2e5c 3230 3552 5I.\335.B..\205R │ │ │ +00004520: 005c 3333 360e 2e42 0e2f 5c32 3035 5b00 .\336..B./\205[. │ │ │ +00004530: 5c33 3337 0e2f 420e 305c 3230 3564 005c \337./B.0\205d.\ │ │ │ +00004540: 3334 300e 3042 0e31 5c32 3035 6d00 5c33 340.0B.1\205m.\3 │ │ │ +00004550: 3431 0e31 420e 325c 3230 3576 005c 3334 41.1B.2\205v.\34 │ │ │ +00004560: 320e 3242 5c33 3433 5c33 3434 425c 3235 2.2B\343\344B\25 │ │ │ +00004570: 375c 665c 3334 355c 3334 365c 3334 3703 7\f\345\346\347. │ │ │ +00004580: 5c33 3434 5c33 3236 2421 5c32 3131 5c33 \344\326$!\211\3 │ │ │ +00004590: 3433 5c32 3330 5c32 3033 5c32 3230 005c 43\230\203\220.\ │ │ │ +000045a0: 3335 305c 3335 3121 4a5c 3230 325c 3232 350\351!J\202\22 │ │ │ +000045b0: 3500 5c33 3532 0103 5c22 4101 5c33 3330 5.\352..\"A.\330 │ │ │ +000045c0: 5c32 3330 5c32 3033 5c32 3337 0001 5c32 \230\203\237..\2 │ │ │ +000045d0: 3032 5c32 3535 0001 5c33 3533 5c32 3335 02\255..\353\235 │ │ │ +000045e0: 5c32 3033 5c32 3531 005c 3335 345c 3230 \203\251.\354\20 │ │ │ +000045f0: 325c 3235 3500 5c33 3134 5c33 3535 035c 2\255.\314\355.\ │ │ │ +00004600: 2205 0503 0346 295c 3230 3722 205b 636f "....F)\207" [co │ │ │ +00004610: 6d70 6c65 7469 6f6e 2d69 676e 6f72 652d mpletion-ignore- │ │ │ +00004620: 6361 7365 2063 616c 656e 6461 722d 686f case calendar-ho │ │ │ +00004630: 6c69 6461 7973 2068 6f6c 6964 6179 2d67 lidays holiday-g │ │ │ +00004640: 656e 6572 616c 2d68 6f6c 6964 6179 7320 eneral-holidays │ │ │ +00004650: 686f 6c69 6461 792d 6c6f 6361 6c2d 686f holiday-local-ho │ │ │ +00004660: 6c69 6461 7973 2068 6f6c 6964 6179 2d6f lidays holiday-o │ │ │ +00004670: 7468 6572 2d68 6f6c 6964 6179 7320 686f ther-holidays ho │ │ │ +00004680: 6c69 6461 792d 6368 7269 7374 6961 6e2d liday-christian- │ │ │ +00004690: 686f 6c69 6461 7973 2063 616c 656e 6461 holidays calenda │ │ │ +000046a0: 722d 7265 6164 2022 5374 6172 7469 6e67 r-read "Starting │ │ │ +000046b0: 2079 6561 7220 6f66 2068 6f6c 6964 6179 year of holiday │ │ │ +000046c0: 7320 283e 3029 3a20 2220 235b 3235 3720 s (>0): " #[257 │ │ │ +000046d0: 225c 3231 315c 3330 3056 5c32 3037 2220 "\211\300V\207" │ │ │ +000046e0: 5b30 5d20 3320 225c 6e5c 6e28 666e 2058 [0] 3 "\n\n(fn X │ │ │ +000046f0: 2922 5d20 6e75 6d62 6572 2d74 6f2d 7374 )"] number-to-st │ │ │ +00004700: 7269 6e67 2063 616c 656e 6461 722d 6375 ring calendar-cu │ │ │ +00004710: 7272 656e 742d 6461 7465 2032 2066 6f72 rrent-date 2 for │ │ │ +00004720: 6d61 7420 2245 6e64 696e 6720 7965 6172 mat "Ending year │ │ │ +00004730: 2028 696e 636c 7573 6976 6529 206f 6620 (inclusive) of │ │ │ +00004740: 686f 6c69 6461 7973 2028 3e3d 2573 293a holidays (>=%s): │ │ │ +00004750: 2022 206d 616b 652d 6279 7465 2d63 6f64 " make-byte-cod │ │ │ +00004760: 6520 3235 3720 225c 3231 315c 3330 3059 e 257 "\211\300Y │ │ │ +00004770: 5c32 3037 2220 7663 6f6e 6361 7420 7665 \207" vconcat ve │ │ │ +00004780: 6374 6f72 205b 5d20 3320 225c 6e5c 6e28 ctor [] 3 "\n\n( │ │ │ +00004790: 666e 2058 2922 2074 2022 416c 6c22 2022 fn X)" t "All" " │ │ │ +000047a0: 4571 7569 6e6f 7865 732f 536f 6c73 7469 Equinoxes/Solsti │ │ │ +000047b0: 6365 7322 2073 6f6c 6172 2d65 7175 696e ces" solar-equin │ │ │ +000047c0: 6f78 6573 2d73 6f6c 7374 6963 6573 2022 oxes-solstices " │ │ │ +000047d0: 4765 6e65 7261 6c22 2022 4c6f 6361 6c22 General" "Local" │ │ │ +000047e0: 2022 4f74 6865 7222 2022 4368 7269 7374 "Other" "Christ │ │ │ +000047f0: 6961 6e22 2022 4865 6272 6577 2220 2249 ian" "Hebrew" "I │ │ │ +00004800: 736c 616d 6963 2220 2242 6168 c3a1 e280 slamic" "Bah.... │ │ │ +00004810: 99c3 ad22 2022 4f72 6965 6e74 616c 2220 ..." "Oriental" │ │ │ +00004820: 2253 6f6c 6172 2220 2241 736b 2220 6e69 "Solar" "Ask" ni │ │ │ +00004830: 6c20 6361 7069 7461 6c69 7a65 2063 6f6d l capitalize com │ │ │ +00004840: 706c 6574 696e 672d 7265 6164 2022 4c69 pleting-read "Li │ │ │ +00004850: 7374 2028 5441 4220 666f 7220 6368 6f69 st (TAB for choi │ │ │ +00004860: 6365 7329 3a20 2220 7265 6164 2d76 6172 ces): " read-var │ │ │ +00004870: 6961 626c 6520 2245 6e74 6572 206c 6973 iable "Enter lis │ │ │ +00004880: 7420 6e61 6d65 3a20 2220 6173 736f 6320 t name: " assoc │ │ │ +00004890: 2822 4173 6b22 2022 2229 2022 486f 6c69 ("Ask" "") "Holi │ │ │ +000048a0: 6461 7973 2220 2225 7320 486f 6c69 6461 days" "%s Holida │ │ │ +000048b0: 7973 2220 686f 6c69 6461 792d 6865 6272 ys" holiday-hebr │ │ │ +000048c0: 6577 2d68 6f6c 6964 6179 7320 686f 6c69 ew-holidays holi │ │ │ +000048d0: 6461 792d 6973 6c61 6d69 632d 686f 6c69 day-islamic-holi │ │ │ +000048e0: 6461 7973 2068 6f6c 6964 6179 2d62 6168 days holiday-bah │ │ │ +000048f0: 6169 2d68 6f6c 6964 6179 7320 686f 6c69 ai-holidays holi │ │ │ +00004900: 6461 792d 6f72 6965 6e74 616c 2d68 6f6c day-oriental-hol │ │ │ +00004910: 6964 6179 7320 686f 6c69 6461 792d 736f idays holiday-so │ │ │ +00004920: 6c61 722d 686f 6c69 6461 7973 5d20 3135 lar-holidays] 15 │ │ │ +00004930: 295d 290a 2864 6566 616c 6961 7320 2768 )]).(defalias 'h │ │ │ +00004940: 6f6c 6964 6179 2d6c 6973 7420 276c 6973 oliday-list 'lis │ │ │ +00004950: 742d 686f 6c69 6461 7973 290a 2340 3236 t-holidays).#@26 │ │ │ +00004960: 3820 4368 6563 6b20 7468 6520 6c69 7374 8 Check the list │ │ │ +00004970: 206f 6620 686f 6c69 6461 7973 2066 6f72 of holidays for │ │ │ +00004980: 2061 6e79 2074 6861 7420 6f63 6375 7220 any that occur │ │ │ +00004990: 6f6e 2044 4154 452e 0a44 4154 4520 6973 on DATE..DATE is │ │ │ +000049a0: 2061 206c 6973 7420 286d 6f6e 7468 2064 a list (month d │ │ │ +000049b0: 6179 2079 6561 7229 2e20 2054 6869 7320 ay year). This │ │ │ +000049c0: 6675 6e63 7469 6f6e 2063 6f6e 7369 6465 function conside │ │ │ +000049d0: 7273 2074 6865 0a68 6f6c 6964 6179 7320 rs the.holidays │ │ │ +000049e0: 6672 6f6d 2074 6865 206c 6973 7420 6063 from the list `c │ │ │ +000049f0: 616c 656e 6461 722d 686f 6c69 6461 7973 alendar-holidays │ │ │ +00004a00: 272c 2061 6e64 2072 6574 7572 6e73 2061 ', and returns a │ │ │ +00004a10: 206c 6973 7420 6f66 0a73 7472 696e 6773 list of.strings │ │ │ +00004a20: 2064 6573 6372 6962 696e 6720 7468 6f73 describing thos │ │ │ +00004a30: 6520 686f 6c69 6461 7973 2074 6861 7420 e holidays that │ │ │ +00004a40: 6170 706c 7920 6f6e 2044 4154 452c 206f apply on DATE, o │ │ │ +00004a50: 7220 6e69 6c20 6966 206e 6f6e 6520 646f r nil if none do │ │ │ +00004a60: 2e0a 0a28 666e 2044 4154 4529 1f0a 2864 ...(fn DATE)..(d │ │ │ +00004a70: 6566 616c 6961 7320 2763 616c 656e 6461 efalias 'calenda │ │ │ +00004a80: 722d 6368 6563 6b2d 686f 6c69 6461 7973 r-check-holidays │ │ │ +00004a90: 2023 5b32 3537 2022 5c32 3131 5c32 3131 #[257 "\211\211 │ │ │ +00004aa0: 405c 3236 3201 015c 3330 3201 385c 3236 @\262..\302.8\26 │ │ │ +00004ab0: 3201 5c33 3033 0118 0219 5c33 3034 205c 2.\303....\304 \ │ │ │ +00004ac0: 3231 315c 3230 332f 005c 3231 3140 5c33 211\203/.\211@\3 │ │ │ +00004ad0: 3035 0606 0240 5c22 5c32 3033 2800 5c33 05...@\"\203(.\3 │ │ │ +00004ae0: 3036 0302 415c 225c 3236 3203 0141 5c32 06..A\"\262..A\2 │ │ │ +00004af0: 3636 5c32 3032 5c32 3032 1200 015c 3236 66\202\202...\26 │ │ │ +00004b00: 3201 2a5c 3230 3722 205b 6469 7370 6c61 2.*\207" [displa │ │ │ +00004b10: 7965 642d 7965 6172 2064 6973 706c 6179 yed-year display │ │ │ +00004b20: 6564 2d6d 6f6e 7468 2032 206e 696c 2063 ed-month 2 nil c │ │ │ +00004b30: 616c 656e 6461 722d 686f 6c69 6461 792d alendar-holiday- │ │ │ +00004b40: 6c69 7374 2063 616c 656e 6461 722d 6461 list calendar-da │ │ │ +00004b50: 7465 2d65 7175 616c 2061 7070 656e 645d te-equal append] │ │ │ +00004b60: 2039 2028 2324 202e 2031 3837 3836 295d 9 (#$ . 18786)] │ │ │ +00004b70: 290a 2340 3833 2047 656e 6572 6174 6520 ).#@83 Generate │ │ │ +00004b80: 6120 6c69 7374 206f 6620 616c 6c20 686f a list of all ho │ │ │ +00004b90: 6c69 6461 7973 2069 6e20 7261 6e67 6520 lidays in range │ │ │ +00004ba0: 6672 6f6d 2061 6273 6f6c 7574 6520 6461 from absolute da │ │ │ +00004bb0: 7465 2044 3120 746f 2044 322e 0a0a 2866 te D1 to D2...(f │ │ │ +00004bc0: 6e20 4431 2044 3229 1f0a 2864 6566 616c n D1 D2)..(defal │ │ │ +00004bd0: 6961 7320 2768 6f6c 6964 6179 2d69 6e2d ias 'holiday-in- │ │ │ +00004be0: 7261 6e67 6520 235b 3531 3420 225c 3330 range #[514 "\30 │ │ │ +00004bf0: 3202 215c 3231 315c 3231 3140 5c32 3632 2.!\211\211@\262 │ │ │ +00004c00: 0118 5c32 3131 5c33 3033 0138 5c32 3632 ..\211\303.8\262 │ │ │ +00004c10: 0119 5c33 3032 0221 5c32 3131 5c32 3131 ..\302.!\211\211 │ │ │ +00004c20: 405c 3236 3201 015c 3330 3301 385c 3236 @\262..\303.8\26 │ │ │ +00004c30: 3201 5c33 3034 0809 0404 245c 3330 355c 2.\304....$\305\ │ │ │ +00004c40: 3234 3554 5c33 3036 5c32 3131 5c32 3131 245T\306\211\211 │ │ │ +00004c50: 5c33 3037 5c33 3036 095c 3331 3057 5c32 \307\306.\310W\2 │ │ │ +00004c60: 3033 3500 0954 115c 3331 3109 035f 085c 035..T.\311.._.\ │ │ │ +00004c70: 3331 325c 3331 3324 5c32 3632 015c 3331 312\313$\262.\31 │ │ │ +00004c80: 3401 035c 2254 105c 3231 3102 5c32 3435 4..\"T.\211.\245 │ │ │ +00004c90: 115c 3231 315c 3331 3057 5c32 3033 5800 .\211\310W\203X. │ │ │ +00004ca0: 085c 3331 3356 5c32 3033 5800 0953 1109 .\313V\203X..S.. │ │ │ +00004cb0: 5c33 3133 575c 3230 3361 0009 5311 5c32 \313W\203a..S.\2 │ │ │ +00004cc0: 3636 0203 5c33 3130 5c32 3131 0257 5c32 66..\310\211.W\2 │ │ │ +00004cd0: 3033 5c32 3634 005c 3231 315c 3331 3506 03\264.\211\315. │ │ │ +00004ce0: 065c 3331 3620 5c22 5c32 3632 065c 3330 .\316 \"\262.\30 │ │ │ +00004cf0: 375c 3330 3609 5c33 3130 575c 3230 337f 7\306.\310W\203. │ │ │ +00004d00: 0009 5411 5c33 3131 0903 5f08 5c33 3132 ..T.\311.._.\312 │ │ │ +00004d10: 5c33 3035 245c 3236 3201 5c33 3134 0103 \305$\262.\314.. │ │ │ +00004d20: 5c22 5410 5c32 3131 025c 3234 3511 5c32 \"T.\211.\245.\2 │ │ │ +00004d30: 3131 5c33 3130 575c 3230 335c 3234 3200 11\310W\203\242. │ │ │ +00004d40: 085c 3331 3356 5c32 3033 5c32 3432 0009 .\313V\203\242.. │ │ │ +00004d50: 5311 095c 3331 3357 5c32 3033 5c32 3533 S..\313W\203\253 │ │ │ +00004d60: 0009 5311 5c32 3636 035c 3231 3154 5c32 ..S.\266.\211T\2 │ │ │ +00004d70: 3632 015c 3230 3265 005c 3236 3602 025c 62.\202e.\266..\ │ │ │ +00004d80: 3231 315c 3230 3335 025c 3231 3140 5c32 211\2035.\211@\2 │ │ │ +00004d90: 3131 405c 3230 332e 025c 3231 3140 5c32 11@\203..\211@\2 │ │ │ +00004da0: 3131 5c33 3033 0138 5c32 3632 015c 3330 11\303.8\262.\30 │ │ │ +00004db0: 3601 5c33 3130 555c 3230 335c 3332 3700 6.\310U\203\327. │ │ │ +00004dc0: 5c33 3137 5c33 3230 215c 3230 3211 0201 \317\320!\202... │ │ │ +00004dd0: 5c33 3130 565c 3230 334b 0101 535c 3236 \310V\203K..S\26 │ │ │ +00004de0: 3201 5c33 3131 035c 3231 315c 3231 3140 2.\311.\211\211@ │ │ │ +00004df0: 5c32 3632 0101 5c32 3131 4140 5c32 3632 \262..\211A@\262 │ │ │ +00004e00: 0102 5c33 3033 0138 5c32 3632 0101 5c33 ..\303.8\262..\3 │ │ │ +00004e10: 3231 0453 5f5c 5c03 5c33 3033 565c 3230 21.S_\\.\303V\20 │ │ │ +00004e20: 3338 015c 3231 315c 3332 325c 3332 3306 38.\211\322\323. │ │ │ +00004e30: 065f 5c5c 5c33 3234 5c32 3435 5a5c 3236 ._\\\324\245Z\26 │ │ │ +00004e40: 3201 015c 3231 315c 3331 3057 5c32 3033 2..\211\310W\203 │ │ │ +00004e50: 1901 5c33 3235 0121 535c 3236 3201 5c32 ..\325.!S\262.\2 │ │ │ +00004e60: 3131 5c33 3233 5c32 3436 5c33 3130 555c 11\323\246\310U\ │ │ │ +00004e70: 3230 352f 015c 3231 315c 3332 365c 3234 205/.\211\326\24 │ │ │ +00004e80: 365c 3331 3055 3f5c 3230 362f 015c 3231 6\310U?\206/.\21 │ │ │ +00004e90: 315c 3332 375c 3234 365c 3331 3055 5c32 1\327\246\310U\2 │ │ │ +00004ea0: 3632 015c 3230 3338 015c 3231 3154 5c32 62.\2038.\211T\2 │ │ │ +00004eb0: 3632 015c 3236 365c 3230 345c 3333 3003 62.\266\204\330. │ │ │ +00004ec0: 5f03 5c33 3233 5c32 3435 045c 3332 365c _.\323\245.\326\ │ │ │ +00004ed0: 3234 355b 055c 3332 375c 3234 3525 5c32 245[.\327\245%\2 │ │ │ +00004ee0: 3032 1102 5c33 3235 0254 215c 3236 3201 02..\325.T!\262. │ │ │ +00004ef0: 5c33 3331 035c 3231 315c 3231 3140 5c32 \331.\211\211@\2 │ │ │ +00004f00: 3632 0101 5c32 3131 4140 5c32 3632 0102 62..\211A@\262.. │ │ │ +00004f10: 5c33 3033 0138 5c32 3632 0101 5c33 3231 \303.8\262..\321 │ │ │ +00004f20: 0453 5f5c 5c03 5c33 3033 565c 3230 335c .S_\\.\303V\203\ │ │ │ +00004f30: 3235 3001 5c32 3131 5c33 3232 5c33 3233 250.\211\322\323 │ │ │ +00004f40: 0606 5f5c 5c5c 3332 345c 3234 355a 5c32 .._\\\324\245Z\2 │ │ │ +00004f50: 3632 0101 5c32 3131 5c33 3130 575c 3230 62..\211\310W\20 │ │ │ +00004f60: 335c 3231 3101 5c33 3235 0121 535c 3236 3\211.\325.!S\26 │ │ │ +00004f70: 3201 5c32 3131 5c33 3233 5c32 3436 5c33 2.\211\323\246\3 │ │ │ +00004f80: 3130 555c 3230 355c 3233 3701 5c32 3131 10U\205\237.\211 │ │ │ +00004f90: 5c33 3236 5c32 3436 5c33 3130 553f 5c32 \326\246\310U?\2 │ │ │ +00004fa0: 3036 5c32 3337 015c 3231 315c 3332 375c 06\237.\211\327\ │ │ │ +00004fb0: 3234 365c 3331 3055 5c32 3632 015c 3230 246\310U\262.\20 │ │ │ +00004fc0: 335c 3235 3001 5c32 3131 545c 3236 3201 3\250.\211T\262. │ │ │ +00004fd0: 5c32 3636 5c32 3034 5c33 3330 035f 035c \266\204\330._.\ │ │ │ +00004fe0: 3332 335c 3234 3504 5c33 3236 5c32 3435 323\245.\326\245 │ │ │ +00004ff0: 5b05 5c33 3237 5c32 3435 5c33 3332 5c32 [.\327\245\332\2 │ │ │ +00005000: 3131 5c32 3131 405c 3236 3201 015c 3231 11\211@\262..\21 │ │ │ +00005010: 3141 405c 3236 3201 025c 3330 3301 385c 1A@\262..\303.8\ │ │ │ +00005020: 3236 3201 015c 3332 3104 535f 5c5c 035c 262..\321.S_\\.\ │ │ │ +00005030: 3330 3356 5c32 3033 0d02 5c32 3131 5c33 303V\203..\211\3 │ │ │ +00005040: 3232 5c33 3233 0606 5f5c 5c5c 3332 345c 22\323.._\\\324\ │ │ │ +00005050: 3234 355a 5c32 3632 0101 5c32 3131 5c33 245Z\262..\211\3 │ │ │ +00005060: 3130 575c 3230 335c 3335 3601 5c33 3235 10W\203\356.\325 │ │ │ +00005070: 0121 535c 3236 3201 5c32 3131 5c33 3233 .!S\262.\211\323 │ │ │ +00005080: 5c32 3436 5c33 3130 555c 3230 3504 025c \246\310U\205..\ │ │ │ +00005090: 3231 315c 3332 365c 3234 365c 3331 3055 211\326\246\310U │ │ │ +000050a0: 3f5c 3230 3604 025c 3231 315c 3332 375c ?\206..\211\327\ │ │ │ +000050b0: 3234 365c 3331 3055 5c32 3632 015c 3230 246\310U\262.\20 │ │ │ +000050c0: 330d 025c 3231 3154 5c32 3632 015c 3236 3..\211T\262.\26 │ │ │ +000050d0: 365c 3230 3426 065c 3236 365c 3230 335c 6\204&.\266\203\ │ │ │ +000050e0: 3231 315c 3236 3204 5c32 3033 2e02 060b 211\262.\203.... │ │ │ +000050f0: 0358 5c32 3033 2e02 0206 0b58 5c32 3033 .X\203.....X\203 │ │ │ +00005100: 2e02 5c33 3135 0143 055c 225c 3236 3204 ..\315.C.\"\262. │ │ │ +00005110: 0141 5c32 3636 5c32 3032 5c32 3032 5c32 .A\266\202\202\2 │ │ │ +00005120: 3637 005c 3231 3001 2a5c 3230 3722 205b 67.\210.*\207" [ │ │ │ +00005130: 6469 7370 6c61 7965 642d 6d6f 6e74 6820 displayed-month │ │ │ +00005140: 6469 7370 6c61 7965 642d 7965 6172 2063 displayed-year c │ │ │ +00005150: 616c 656e 6461 722d 6772 6567 6f72 6961 alendar-gregoria │ │ │ +00005160: 6e2d 6672 6f6d 2d61 6273 6f6c 7574 6520 n-from-absolute │ │ │ +00005170: 3220 6361 6c65 6e64 6172 2d69 6e74 6572 2 calendar-inter │ │ │ +00005180: 7661 6c20 3320 6e69 6c20 3132 2030 202b val 3 nil 12 0 + │ │ │ +00005190: 202d 3120 3120 6d6f 6420 6170 7065 6e64 -1 1 mod append │ │ │ +000051a0: 2063 616c 656e 6461 722d 686f 6c69 6461 calendar-holida │ │ │ +000051b0: 792d 6c69 7374 2075 7365 722d 6572 726f y-list user-erro │ │ │ +000051c0: 7220 2254 6865 7265 2077 6173 206e 6f20 r "There was no │ │ │ +000051d0: 7965 6172 207a 6572 6f22 2033 3120 3233 year zero" 31 23 │ │ │ +000051e0: 2034 2031 3020 6162 7320 3130 3020 3430 4 10 abs 100 40 │ │ │ +000051f0: 3020 3336 3520 2d20 2831 3220 3331 202d 0 365 - (12 31 - │ │ │ +00005200: 3129 5d20 3330 2028 2324 202e 2031 3933 1)] 30 (#$ . 193 │ │ │ +00005210: 3139 295d 290a 2340 3233 3720 4669 6e64 19)]).#@237 Find │ │ │ +00005220: 2068 6f6c 6964 6179 7320 666f 7220 7468 holidays for th │ │ │ +00005230: 6520 6461 7465 2073 7065 6369 6669 6564 e date specified │ │ │ +00005240: 2062 7920 7468 6520 6375 7273 6f72 2069 by the cursor i │ │ │ +00005250: 6e20 7468 6520 6361 6c65 6e64 6172 2077 n the calendar w │ │ │ +00005260: 696e 646f 772e 0a4f 7074 696f 6e61 6c20 indow..Optional │ │ │ +00005270: 4441 5445 2069 7320 6120 6c69 7374 2028 DATE is a list ( │ │ │ +00005280: 6d6f 6e74 6820 6461 7920 7965 6172 2920 month day year) │ │ │ +00005290: 746f 2075 7365 2069 6e73 7465 6164 206f to use instead o │ │ │ +000052a0: 6620 7468 650a 6375 7273 6f72 2070 6f73 f the.cursor pos │ │ │ +000052b0: 6974 696f 6e2e 2020 4556 454e 5420 7370 ition. EVENT sp │ │ │ +000052c0: 6563 6966 6965 7320 6120 6275 6666 6572 ecifies a buffer │ │ │ +000052d0: 2070 6f73 6974 696f 6e20 746f 2075 7365 position to use │ │ │ +000052e0: 2066 6f72 2061 2064 6174 652e 0a0a 2866 for a date...(f │ │ │ +000052f0: 6e20 266f 7074 696f 6e61 6c20 4441 5445 n &optional DATE │ │ │ +00005300: 2045 5645 4e54 291f 0a28 6465 6661 6c69 EVENT)..(defali │ │ │ +00005310: 6173 2027 6361 6c65 6e64 6172 2d63 7572 as 'calendar-cur │ │ │ +00005320: 736f 722d 686f 6c69 6461 7973 2023 5b35 sor-holidays #[5 │ │ │ +00005330: 3132 2022 5c33 3033 5c33 3034 215c 3231 12 "\303\304!\21 │ │ │ +00005340: 3001 5c32 3034 0e00 5c33 3035 5c33 3036 0.\204..\305\306 │ │ │ +00005350: 025c 225c 3236 3202 5c33 3037 0221 5c33 .\"\262.\307.!\3 │ │ │ +00005360: 3130 0321 5c33 3131 5c32 3131 5c33 3132 10.!\311\211\312 │ │ │ +00005370: 0521 5c32 3033 5200 5c33 3133 205c 3230 .!\203R.\313 \20 │ │ │ +00005380: 3343 005c 3331 3405 5c33 3135 5c33 3136 3C.\314.\315\316 │ │ │ +00005390: 0607 5c22 5c33 3137 5c33 3135 5c33 3136 ..\"\317\315\316 │ │ │ +000053a0: 0609 5c22 4306 075c 3230 333c 005c 3332 ..\"C..\203<.\32 │ │ │ +000053b0: 305c 3332 3106 095c 225c 3230 323d 005c 0\321..\"\202=.\ │ │ │ +000053c0: 3332 325c 2244 5c22 5c32 3032 4600 5c33 322\"D\"\202F.\3 │ │ │ +000053d0: 3233 5c33 3234 215c 3231 315c 3236 3203 23\324!\211\262. │ │ │ +000053e0: 5c32 3035 5c32 3530 005c 3332 3502 215c \205\250.\325.!\ │ │ │ +000053f0: 3230 325c 3235 3000 025c 3230 345d 005c 202\250..\204].\ │ │ │ +00005400: 3330 335c 3332 3605 5c22 5c32 3032 5c32 303\326.\"\202\2 │ │ │ +00005410: 3530 005c 3331 355c 3332 3705 5c33 3330 50.\315\327.\330 │ │ │ +00005420: 5c33 3331 0607 5c33 3332 2323 5c32 3131 \331..\332##\211 │ │ │ +00005430: 5c32 3632 0247 5c33 3333 2058 5c32 3033 \262.G\333 X\203 │ │ │ +00005440: 7800 5c33 3033 5c33 3334 025c 225c 3230 x.\303\334.\"\20 │ │ │ +00005450: 325c 3235 3000 5c33 3335 0821 715c 3231 2\250.\335.!q\21 │ │ │ +00005460: 305c 3333 365c 3333 3721 5c32 3034 5c32 0\336\337!\204\2 │ │ │ +00005470: 3036 005c 3333 3720 5c32 3130 5c33 3131 06.\337 \210\311 │ │ │ +00005480: 115c 3330 3612 5c33 3430 205c 3231 305c .\306.\340 \210\ │ │ │ +00005490: 3334 3108 215c 3231 305c 3334 3204 215c 341.!\210\342.!\ │ │ │ +000054a0: 3231 305c 3333 305c 3333 3104 5c33 3433 210\330\331.\343 │ │ │ +000054b0: 2363 5c32 3130 6562 5c32 3130 5c33 3434 #c\210eb\210\344 │ │ │ +000054c0: 5c33 3131 215c 3231 305c 3330 3611 5c33 \311!\210\306.\3 │ │ │ +000054d0: 3033 5c33 3435 215c 3230 3722 205b 686f 03\345!\207" [ho │ │ │ +000054e0: 6c69 6461 792d 6275 6666 6572 2062 7566 liday-buffer buf │ │ │ +000054f0: 6665 722d 7265 6164 2d6f 6e6c 7920 6275 fer-read-only bu │ │ │ +00005500: 6666 6572 2d75 6e64 6f2d 6c69 7374 206d ffer-undo-list m │ │ │ +00005510: 6573 7361 6765 2022 4368 6563 6b69 6e67 essage "Checking │ │ │ +00005520: 2068 6f6c 6964 6179 732e 2e2e 2220 6361 holidays..." ca │ │ │ +00005530: 6c65 6e64 6172 2d63 7572 736f 722d 746f lendar-cursor-to │ │ │ +00005540: 2d64 6174 6520 7420 6361 6c65 6e64 6172 -date t calendar │ │ │ +00005550: 2d64 6174 652d 7374 7269 6e67 2063 616c -date-string cal │ │ │ +00005560: 656e 6461 722d 6368 6563 6b2d 686f 6c69 endar-check-holi │ │ │ +00005570: 6461 7973 206e 696c 206d 6f75 7365 2d65 days nil mouse-e │ │ │ +00005580: 7665 6e74 2d70 2064 6973 706c 6179 2d70 vent-p display-p │ │ │ +00005590: 6f70 7570 2d6d 656e 7573 2d70 2078 2d70 opup-menus-p x-p │ │ │ +000055a0: 6f70 7570 2d6d 656e 7520 666f 726d 6174 opup-menu format │ │ │ +000055b0: 2022 486f 6c69 6461 7973 2066 6f72 2025 "Holidays for % │ │ │ +000055c0: 7322 2061 7070 656e 6420 6d61 7063 6172 s" append mapcar │ │ │ +000055d0: 206c 6973 7420 2822 4e6f 6e65 2229 2065 list ("None") e │ │ │ +000055e0: 7272 6f72 2022 506f 7075 7020 6d65 6e75 rror "Popup menu │ │ │ +000055f0: 7320 6172 6520 6e6f 7420 6176 6169 6c61 s are not availa │ │ │ +00005600: 626c 6520 6f6e 2074 6869 7320 7379 7374 ble on this syst │ │ │ +00005610: 656d 2220 6361 6c6c 2d69 6e74 6572 6163 em" call-interac │ │ │ +00005620: 7469 7665 6c79 2022 4e6f 2068 6f6c 6964 tively "No holid │ │ │ +00005630: 6179 7320 6b6e 6f77 6e20 666f 7220 2573 ays known for %s │ │ │ +00005640: 2220 2225 733a 2020 2573 2220 6d61 7063 " "%s: %s" mapc │ │ │ +00005650: 6f6e 6361 7420 6964 656e 7469 7479 2022 oncat identity " │ │ │ +00005660: 3b20 2022 2066 7261 6d65 2d77 6964 7468 ; " frame-width │ │ │ +00005670: 2022 2573 2220 6765 742d 6275 6666 6572 "%s" get-buffer │ │ │ +00005680: 2d63 7265 6174 6520 6465 7269 7665 642d -create derived- │ │ │ +00005690: 6d6f 6465 2d70 2073 7065 6369 616c 2d6d mode-p special-m │ │ │ +000056a0: 6f64 6520 6572 6173 652d 6275 6666 6572 ode erase-buffer │ │ │ +000056b0: 2064 6973 706c 6179 2d62 7566 6665 7220 display-buffer │ │ │ +000056c0: 6361 6c65 6e64 6172 2d73 6574 2d6d 6f64 calendar-set-mod │ │ │ +000056d0: 652d 6c69 6e65 2022 5c6e 2220 7365 742d e-line "\n" set- │ │ │ +000056e0: 6275 6666 6572 2d6d 6f64 6966 6965 642d buffer-modified- │ │ │ +000056f0: 7020 2243 6865 636b 696e 6720 686f 6c69 p "Checking holi │ │ │ +00005700: 6461 7973 2e2e 2e64 6f6e 6522 5d20 3134 days...done"] 14 │ │ │ +00005710: 2028 2324 202e 2032 3130 3230 2920 286c (#$ . 21020) (l │ │ │ +00005720: 6973 7420 6e69 6c20 6c61 7374 2d6e 6f6e ist nil last-non │ │ │ +00005730: 6d65 6e75 2d65 7665 6e74 295d 290a 2340 menu-event)]).#@ │ │ │ +00005740: 3135 3620 4d61 726b 206e 6f74 6162 6c65 156 Mark notable │ │ │ +00005750: 2064 6179 7320 696e 2074 6865 2063 616c days in the cal │ │ │ +00005760: 656e 6461 7220 7769 6e64 6f77 2e0a 4966 endar window..If │ │ │ +00005770: 2045 5645 4e54 2069 7320 6e6f 6e2d 6e69 EVENT is non-ni │ │ │ +00005780: 6c2c 2069 7427 7320 616e 2065 7665 6e74 l, it's an event │ │ │ +00005790: 2069 6e64 6963 6174 696e 6720 7468 6520 indicating the │ │ │ +000057a0: 6275 6666 6572 2070 6f73 6974 696f 6e20 buffer position │ │ │ +000057b0: 746f 0a75 7365 2069 6e73 7465 6164 206f to.use instead o │ │ │ +000057c0: 6620 706f 696e 742e 0a0a 2866 6e20 266f f point...(fn &o │ │ │ +000057d0: 7074 696f 6e61 6c20 4556 454e 5429 1f0a ptional EVENT).. │ │ │ +000057e0: 2864 6566 616c 6961 7320 2763 616c 656e (defalias 'calen │ │ │ +000057f0: 6461 722d 6d61 726b 2d68 6f6c 6964 6179 dar-mark-holiday │ │ │ +00005800: 7320 235b 3235 3620 2272 5c32 3131 5c32 s #[256 "r\211\2 │ │ │ +00005810: 3033 1100 5c33 3032 5c33 3033 0221 5c32 03..\302\303.!\2 │ │ │ +00005820: 3131 405c 3236 3201 215c 3230 3212 0070 11@\262.!\202..p │ │ │ +00005830: 715c 3231 305c 3330 3410 5c33 3035 5c33 q\210\304.\305\3 │ │ │ +00005840: 3036 215c 3231 305c 3330 3720 5c32 3131 06!\210\307 \211 │ │ │ +00005850: 5c32 3033 2f00 5c32 3131 405c 3331 3001 \203/.\211@\310. │ │ │ +00005860: 4009 5c22 5c32 3130 0141 5c32 3636 5c32 @.\"\210.A\266\2 │ │ │ +00005870: 3032 5c32 3032 1c00 5c32 3130 5c33 3035 02\202..\210\305 │ │ │ +00005880: 5c33 3131 2129 5c32 3037 2220 5b63 616c \311!)\207" [cal │ │ │ +00005890: 656e 6461 722d 6d61 726b 2d68 6f6c 6964 endar-mark-holid │ │ │ +000058a0: 6179 732d 666c 6167 2063 616c 656e 6461 ays-flag calenda │ │ │ +000058b0: 722d 686f 6c69 6461 792d 6d61 726b 6572 r-holiday-marker │ │ │ +000058c0: 2077 696e 646f 772d 6275 6666 6572 2065 window-buffer e │ │ │ +000058d0: 7665 6e74 2d73 7461 7274 2074 206d 6573 vent-start t mes │ │ │ +000058e0: 7361 6765 2022 4d61 726b 696e 6720 686f sage "Marking ho │ │ │ +000058f0: 6c69 6461 7973 2e2e 2e22 2063 616c 656e lidays..." calen │ │ │ +00005900: 6461 722d 686f 6c69 6461 792d 6c69 7374 dar-holiday-list │ │ │ +00005910: 2063 616c 656e 6461 722d 6d61 726b 2d76 calendar-mark-v │ │ │ +00005920: 6973 6962 6c65 2d64 6174 6520 224d 6172 isible-date "Mar │ │ │ +00005930: 6b69 6e67 2068 6f6c 6964 6179 732e 2e2e king holidays... │ │ │ +00005940: 646f 6e65 225d 2036 2028 2324 202e 2032 done"] 6 (#$ . 2 │ │ │ +00005950: 3233 3430 2920 286c 6973 7420 6c61 7374 2340) (list last │ │ │ +00005960: 2d6e 6f6e 6d65 6e75 2d65 7665 6e74 295d -nonmenu-event)] │ │ │ +00005970: 290a 2340 3232 3520 486f 6c69 6461 7920 ).#@225 Holiday │ │ │ +00005980: 6f6e 204d 4f4e 5448 2c20 4441 5920 2847 on MONTH, DAY (G │ │ │ +00005990: 7265 676f 7269 616e 2920 6361 6c6c 6564 regorian) called │ │ │ +000059a0: 2053 5452 494e 472e 0a49 6620 4d4f 4e54 STRING..If MONT │ │ │ +000059b0: 482c 2044 4159 2069 7320 7669 7369 626c H, DAY is visibl │ │ │ +000059c0: 652c 2074 6865 2076 616c 7565 2072 6574 e, the value ret │ │ │ +000059d0: 7572 6e65 6420 6973 2074 6865 206c 6973 urned is the lis │ │ │ +000059e0: 7420 2828 284d 4f4e 5448 2044 4159 2079 t (((MONTH DAY y │ │ │ +000059f0: 6561 7229 0a53 5452 494e 4729 292e 2020 ear).STRING)). │ │ │ +00005a00: 5265 7475 726e 7320 6e69 6c20 6966 2069 Returns nil if i │ │ │ +00005a10: 7420 6973 206e 6f74 2076 6973 6962 6c65 t is not visible │ │ │ +00005a20: 2069 6e20 7468 6520 6375 7272 656e 7420 in the current │ │ │ +00005a30: 6361 6c65 6e64 6172 2077 696e 646f 772e calendar window. │ │ │ +00005a40: 0a0a 2866 6e20 4d4f 4e54 4820 4441 5920 ..(fn MONTH DAY │ │ │ +00005a50: 5354 5249 4e47 291f 0a28 6465 6661 6c69 STRING)..(defali │ │ │ +00005a60: 6173 2027 686f 6c69 6461 792d 6669 7865 as 'holiday-fixe │ │ │ +00005a70: 6420 235b 3737 3120 2208 095c 3330 325c d #[771 "..\302\ │ │ │ +00005a80: 3330 3302 5c33 3034 575c 3230 330e 0002 303.\304W\203... │ │ │ +00005a90: 545c 3236 3203 5c33 3035 0303 5f05 5c33 T\262.\305.._.\3 │ │ │ +00005aa0: 3036 5c33 3037 060b 5a24 5c32 3632 015c 06\307..Z$\262.\ │ │ │ +00005ab0: 3331 3001 035c 2254 5c32 3632 045c 3231 310..\"T\262.\21 │ │ │ +00005ac0: 3102 5c32 3435 5c32 3632 035c 3231 315c 1.\245\262.\211\ │ │ │ +00005ad0: 3330 3457 5c32 3033 3700 035c 3331 3156 304W\2037..\311V │ │ │ +00005ae0: 5c32 3033 3700 0253 5c32 3632 0302 5c33 \2037..S\262..\3 │ │ │ +00005af0: 3131 575c 3230 3341 0002 535c 3236 3203 11W\203A..S\262. │ │ │ +00005b00: 5c32 3636 0201 5c33 3132 565c 3230 3550 \266..\312V\205P │ │ │ +00005b10: 0004 0402 4503 4443 5c32 3037 2220 5b64 ....E.DC\207" [d │ │ │ +00005b20: 6973 706c 6179 6564 2d6d 6f6e 7468 2064 isplayed-month d │ │ │ +00005b30: 6973 706c 6179 6564 2d79 6561 7220 3132 isplayed-year 12 │ │ │ +00005b40: 206e 696c 2030 202b 202d 3120 3131 206d nil 0 + -1 11 m │ │ │ +00005b50: 6f64 2031 2039 5d20 3133 2028 2324 202e od 1 9] 13 (#$ . │ │ │ +00005b60: 2032 3239 3034 295d 290a 2340 3433 3520 22904)]).#@435 │ │ │ +00005b70: 486f 6c69 6461 7920 6361 6c6c 6564 2053 Holiday called S │ │ │ +00005b80: 5452 494e 4720 6f6e 2074 6865 204e 7468 TRING on the Nth │ │ │ +00005b90: 2044 4159 4e41 4d45 2061 6674 6572 2f62 DAYNAME after/b │ │ │ +00005ba0: 6566 6f72 6520 4d4f 4e54 4820 4441 592e efore MONTH DAY. │ │ │ +00005bb0: 0a44 4159 4e41 4d45 3d30 206d 6561 6e73 .DAYNAME=0 means │ │ │ +00005bc0: 2053 756e 6461 792c 2044 4159 4e41 4d45 Sunday, DAYNAME │ │ │ +00005bd0: 3d31 206d 6561 6e73 204d 6f6e 6461 792c =1 means Monday, │ │ │ +00005be0: 2061 6e64 2073 6f20 6f6e 2e0a 4966 204e and so on..If N │ │ │ +00005bf0: 3e30 2c20 7573 6520 7468 6520 4e74 6820 >0, use the Nth │ │ │ +00005c00: 4441 594e 414d 4520 6166 7465 7220 4d4f DAYNAME after MO │ │ │ +00005c10: 4e54 4820 4441 592e 0a49 6620 4e3c 302c NTH DAY..If N<0, │ │ │ +00005c20: 2075 7365 2074 6865 204e 7468 2044 4159 use the Nth DAY │ │ │ +00005c30: 4e41 4d45 2062 6566 6f72 6520 4d4f 4e54 NAME before MONT │ │ │ +00005c40: 4820 4441 592e 0a44 4159 2064 6566 6175 H DAY..DAY defau │ │ │ +00005c50: 6c74 7320 746f 2031 2069 6620 4e3e 302c lts to 1 if N>0, │ │ │ +00005c60: 2061 6e64 204d 4f4e 5448 2773 206c 6173 and MONTH's las │ │ │ +00005c70: 7420 6461 7920 6f74 6865 7277 6973 652e t day otherwise. │ │ │ +00005c80: 0a49 6620 7468 6520 686f 6c69 6461 7920 .If the holiday │ │ │ +00005c90: 6973 2076 6973 6962 6c65 2069 6e20 7468 is visible in th │ │ │ +00005ca0: 6520 6361 6c65 6e64 6172 2077 696e 646f e calendar windo │ │ │ +00005cb0: 772c 2072 6574 7572 6e73 2061 0a6c 6973 w, returns a.lis │ │ │ +00005cc0: 7420 2828 286d 6f6e 7468 2064 6179 2079 t (((month day y │ │ │ +00005cd0: 6561 7229 2053 5452 494e 4729 292e 2020 ear) STRING)). │ │ │ +00005ce0: 4f74 6865 7277 6973 6520 7265 7475 726e Otherwise return │ │ │ +00005cf0: 7320 6e69 6c2e 0a0a 2866 6e20 4d4f 4e54 s nil...(fn MONT │ │ │ +00005d00: 4820 4441 594e 414d 4520 4e20 5354 5249 H DAYNAME N STRI │ │ │ +00005d10: 4e47 2026 6f70 7469 6f6e 616c 2044 4159 NG &optional DAY │ │ │ +00005d20: 291f 0a28 6465 6661 6c69 6173 2027 686f )..(defalias 'ho │ │ │ +00005d30: 6c69 6461 792d 666c 6f61 7420 235b 3132 liday-float #[12 │ │ │ +00005d40: 3834 2022 0809 0809 5c33 3032 5c33 3033 84 "....\302\303 │ │ │ +00005d50: 045c 3330 3457 5c32 3033 1000 0454 5c32 .\304W\203...T\2 │ │ │ +00005d60: 3632 055c 3330 3505 035f 0607 5c33 3036 62.\305.._..\306 │ │ │ +00005d70: 5c32 3131 245c 3236 3201 5c33 3037 0103 \211$\262.\307.. │ │ │ +00005d80: 5c22 545c 3236 3206 5c32 3131 025c 3234 \"T\262.\211.\24 │ │ │ +00005d90: 355c 3236 3205 5c32 3131 5c33 3034 575c 5\262.\211\304W\ │ │ │ +00005da0: 3230 3337 0005 5c33 3130 565c 3230 3337 2037..\310V\2037 │ │ │ +00005db0: 0004 535c 3236 3205 045c 3331 3057 5c32 ..S\262..\310W\2 │ │ │ +00005dc0: 3033 4100 0453 5c32 3632 055c 3236 3602 03A..S\262.\266. │ │ │ +00005dd0: 5c33 3035 5c33 3131 5c33 3130 065c 6e06 \305\311\310.\n. │ │ │ +00005de0: 0706 0724 5c33 3132 0609 5f06 095c 3330 ...$\312.._..\30 │ │ │ +00005df0: 3456 5c32 3033 5c5c 005c 3331 305c 3230 4V\203\\.\310\20 │ │ │ +00005e00: 325d 005c 3331 3223 5c33 3032 5c33 3033 2].\312#\302\303 │ │ │ +00005e10: 035c 3330 3457 5c32 3033 6a00 0354 5c32 .\304W\203j..T\2 │ │ │ +00005e20: 3632 045c 3330 3504 035f 0606 5c33 3036 62.\305.._..\306 │ │ │ +00005e30: 5c33 3130 245c 3236 3201 5c33 3037 0103 \310$\262.\307.. │ │ │ +00005e40: 5c22 545c 3236 3205 5c32 3131 025c 3234 \"T\262.\211.\24 │ │ │ +00005e50: 355c 3236 3204 5c32 3131 5c33 3034 575c 5\262.\211\304W\ │ │ │ +00005e60: 3230 335c 3232 3100 045c 3331 3056 5c32 203\221..\310V\2 │ │ │ +00005e70: 3033 5c32 3231 0003 535c 3236 3204 035c 03\221..S\262..\ │ │ │ +00005e80: 3331 3057 5c32 3033 5c32 3333 0003 535c 310W\203\233..S\ │ │ │ +00005e90: 3236 3204 5c32 3636 025c 3330 355c 3331 262.\266.\305\31 │ │ │ +00005ea0: 315c 3330 3606 0b06 0606 0624 5c33 3132 1\306......$\312 │ │ │ +00005eb0: 065c 6e5f 065c 6e5c 3330 3456 5c32 3033 .\n_.\n\304V\203 │ │ │ +00005ec0: 5c32 3636 005c 3331 335c 3230 325c 3236 \266.\313\202\26 │ │ │ +00005ed0: 3700 5c33 3036 235c 3331 3402 215c 3331 7.\306#\314.!\31 │ │ │ +00005ee0: 3501 385c 3236 3201 5c33 3134 0221 5c33 5.8\262.\314.!\3 │ │ │ +00005ef0: 3135 0138 5c32 3632 0101 0155 5c32 3034 15.8\262...U\204 │ │ │ +00005f00: 5c33 3235 0006 5c66 5c33 3136 565c 3230 \325..\f\316V\20 │ │ │ +00005f10: 335c 3333 3100 015c 3230 325c 3333 3200 3\331..\202\332. │ │ │ +00005f20: 5c32 3131 0609 5c32 3036 2701 060b 5c33 \211..\206'...\3 │ │ │ +00005f30: 3034 565c 3230 335c 3335 3200 5c33 3130 04V\203\352.\310 │ │ │ +00005f40: 5c32 3032 2701 060d 0101 5c33 3135 555c \202'.....\315U\ │ │ │ +00005f50: 3230 3321 015c 3231 315c 3231 315c 3330 203!.\211\211\30 │ │ │ +00005f60: 3457 5c32 3033 0001 5c33 3137 0121 535c 4W\203..\317.!S\ │ │ │ +00005f70: 3236 3201 5c32 3131 5c33 3230 5c32 3436 262.\211\320\246 │ │ │ +00005f80: 5c33 3034 555c 3230 3516 015c 3231 315c \304U\205..\211\ │ │ │ +00005f90: 3332 315c 3234 365c 3330 3455 3f5c 3230 321\246\304U?\20 │ │ │ +00005fa0: 3616 015c 3231 315c 3332 325c 3234 365c 6..\211\322\246\ │ │ │ +00005fb0: 3330 3455 5c32 3632 015c 3230 3321 015c 304U\262.\203!.\ │ │ │ +00005fc0: 3332 335c 3236 365c 3230 325c 3230 3227 323\266\202\202' │ │ │ +00005fd0: 015c 3332 3402 5348 5c32 3636 5c32 3032 .\324.SH\266\202 │ │ │ +00005fe0: 060e 0103 455c 3231 315c 3331 3501 385c ....E\211\315.8\ │ │ │ +00005ff0: 3236 3201 5c33 3033 015c 3330 3455 5c32 262.\303.\304U\2 │ │ │ +00006000: 3033 3f01 5c33 3235 5c33 3236 215c 3230 03?.\325\326!\20 │ │ │ +00006010: 3279 0201 5c33 3034 565c 3230 335c 3236 2y..\304V\203\26 │ │ │ +00006020: 3301 0153 5c32 3632 015c 3330 3503 5c32 3..S\262.\305.\2 │ │ │ +00006030: 3131 5c32 3131 405c 3236 3201 015c 3231 11\211@\262..\21 │ │ │ +00006040: 3141 405c 3236 3201 025c 3331 3501 385c 1A@\262..\315.8\ │ │ │ +00006050: 3236 3201 015c 3332 3704 535f 5c5c 035c 262..\327.S_\\.\ │ │ │ +00006060: 3331 3556 5c32 3033 5c32 3430 015c 3231 315V\203\240.\21 │ │ │ +00006070: 315c 3333 305c 3332 3006 065f 5c5c 5c33 1\330\320.._\\\3 │ │ │ +00006080: 3331 5c32 3435 5a5c 3236 3201 015c 3231 31\245Z\262..\21 │ │ │ +00006090: 315c 3330 3457 5c32 3033 5c32 3031 015c 1\304W\203\201.\ │ │ │ +000060a0: 3331 3701 2153 5c32 3632 015c 3231 315c 317.!S\262.\211\ │ │ │ +000060b0: 3332 305c 3234 365c 3330 3455 5c32 3035 320\246\304U\205 │ │ │ +000060c0: 5c32 3237 015c 3231 315c 3332 315c 3234 \227.\211\321\24 │ │ │ +000060d0: 365c 3330 3455 3f5c 3230 365c 3232 3701 6\304U?\206\227. │ │ │ +000060e0: 5c32 3131 5c33 3232 5c32 3436 5c33 3034 \211\322\246\304 │ │ │ +000060f0: 555c 3236 3201 5c32 3033 5c32 3430 015c U\262.\203\240.\ │ │ │ +00006100: 3231 3154 5c32 3632 015c 3236 365c 3230 211T\262.\266\20 │ │ │ +00006110: 345c 3333 3203 5f03 5c33 3230 5c32 3435 4\332._.\320\245 │ │ │ +00006120: 045c 3332 315c 3234 355b 055c 3332 325c .\321\245[.\322\ │ │ │ +00006130: 3234 3525 5c32 3032 7902 5c33 3137 0254 245%\202y.\317.T │ │ │ +00006140: 215c 3236 3201 5c33 3333 035c 3231 315c !\262.\333.\211\ │ │ │ +00006150: 3231 3140 5c32 3632 0101 5c32 3131 4140 211@\262..\211A@ │ │ │ +00006160: 5c32 3632 0102 5c33 3135 0138 5c32 3632 \262..\315.8\262 │ │ │ +00006170: 0101 5c33 3237 0453 5f5c 5c03 5c33 3135 ..\327.S_\\.\315 │ │ │ +00006180: 565c 3230 3310 025c 3231 315c 3333 305c V\203..\211\330\ │ │ │ +00006190: 3332 3006 065f 5c5c 5c33 3331 5c32 3435 320.._\\\331\245 │ │ │ +000061a0: 5a5c 3236 3201 015c 3231 315c 3330 3457 Z\262..\211\304W │ │ │ +000061b0: 5c32 3033 5c33 3631 015c 3331 3701 2153 \203\361.\317.!S │ │ │ +000061c0: 5c32 3632 015c 3231 315c 3332 305c 3234 \262.\211\320\24 │ │ │ +000061d0: 365c 3330 3455 5c32 3035 0702 5c32 3131 6\304U\205..\211 │ │ │ +000061e0: 5c33 3231 5c32 3436 5c33 3034 553f 5c32 \321\246\304U?\2 │ │ │ +000061f0: 3036 0702 5c32 3131 5c33 3232 5c32 3436 06..\211\322\246 │ │ │ +00006200: 5c33 3034 555c 3236 3201 5c32 3033 1002 \304U\262.\203.. │ │ │ +00006210: 5c32 3131 545c 3236 3201 5c32 3636 5c32 \211T\262.\266\2 │ │ │ +00006220: 3034 5c33 3332 035f 035c 3332 305c 3234 04\332._.\320\24 │ │ │ +00006230: 3504 5c33 3231 5c32 3435 5b05 5c33 3232 5.\321\245[.\322 │ │ │ +00006240: 5c32 3435 5c33 3334 5c32 3131 5c32 3131 \245\334\211\211 │ │ │ +00006250: 405c 3236 3201 015c 3231 3141 405c 3236 @\262..\211A@\26 │ │ │ +00006260: 3201 025c 3331 3501 385c 3236 3201 015c 2..\315.8\262..\ │ │ │ +00006270: 3332 3704 535f 5c5c 035c 3331 3556 5c32 327.S_\\.\315V\2 │ │ │ +00006280: 3033 7502 5c32 3131 5c33 3330 5c33 3230 03u.\211\330\320 │ │ │ +00006290: 0606 5f5c 5c5c 3333 315c 3234 355a 5c32 .._\\\331\245Z\2 │ │ │ +000062a0: 3632 0101 5c32 3131 5c33 3034 575c 3230 62..\211\304W\20 │ │ │ +000062b0: 3356 025c 3331 3701 2153 5c32 3632 015c 3V.\317.!S\262.\ │ │ │ +000062c0: 3231 315c 3332 305c 3234 365c 3330 3455 211\320\246\304U │ │ │ +000062d0: 5c32 3035 6c02 5c32 3131 5c33 3231 5c32 \205l.\211\321\2 │ │ │ +000062e0: 3436 5c33 3034 553f 5c32 3036 6c02 5c32 46\304U?\206l.\2 │ │ │ +000062f0: 3131 5c33 3232 5c32 3436 5c33 3034 555c 11\322\246\304U\ │ │ │ +00006300: 3236 3201 5c32 3033 7502 5c32 3131 545c 262.\203u.\211T\ │ │ │ +00006310: 3236 3201 5c32 3636 5c32 3034 2606 5c32 262.\266\204&.\2 │ │ │ +00006320: 3636 5c32 3033 0606 0158 5c32 3035 5c32 66\203...X\205\2 │ │ │ +00006330: 3331 025c 3231 3106 0658 5c32 3035 5c32 31.\211..X\205\2 │ │ │ +00006340: 3331 025c 3333 3506 0e06 1006 1206 0606 31.\335......... │ │ │ +00006350: 0625 060d 4443 5c32 3037 2220 5b64 6973 .%..DC\207" [dis │ │ │ +00006360: 706c 6179 6564 2d6d 6f6e 7468 2064 6973 played-month dis │ │ │ +00006370: 706c 6179 6564 2d79 6561 7220 3132 206e played-year 12 n │ │ │ +00006380: 696c 2030 202b 202d 3120 6d6f 6420 3120 il 0 + -1 mod 1 │ │ │ +00006390: 6361 6c65 6e64 6172 2d6e 7468 2d6e 616d calendar-nth-nam │ │ │ +000063a0: 6564 2d61 6273 6461 7920 2d37 2037 2063 ed-absday -7 7 c │ │ │ +000063b0: 616c 656e 6461 722d 6772 6567 6f72 6961 alendar-gregoria │ │ │ +000063c0: 6e2d 6672 6f6d 2d61 6273 6f6c 7574 6520 n-from-absolute │ │ │ +000063d0: 3220 3920 6162 7320 3420 3130 3020 3430 2 9 abs 4 100 40 │ │ │ +000063e0: 3020 3239 205b 3331 2032 3820 3331 2033 0 29 [31 28 31 3 │ │ │ +000063f0: 3020 3331 2033 3020 3331 2033 3120 3330 0 31 30 31 31 30 │ │ │ +00006400: 2033 3120 3330 2033 315d 2075 7365 722d 31 30 31] user- │ │ │ +00006410: 6572 726f 7220 2254 6865 7265 2077 6173 error "There was │ │ │ +00006420: 206e 6f20 7965 6172 207a 6572 6f22 2033 no year zero" 3 │ │ │ +00006430: 3120 3233 2031 3020 3336 3520 2d20 2831 1 23 10 365 - (1 │ │ │ +00006440: 3220 3331 202d 3129 2063 616c 656e 6461 2 31 -1) calenda │ │ │ +00006450: 722d 6e74 682d 6e61 6d65 642d 6461 795d r-nth-named-day] │ │ │ +00006460: 2033 3320 2823 2420 2e20 3233 3430 3829 33 (#$ . 23408) │ │ │ +00006470: 5d29 0a23 4031 3331 2046 696c 7465 7220 ]).#@131 Filter │ │ │ +00006480: 6c69 7374 206f 6620 686f 6c69 6461 7973 list of holidays │ │ │ +00006490: 2048 4c49 5354 2c20 616e 6420 7265 7475 HLIST, and retu │ │ │ +000064a0: 726e 206f 6e6c 7920 7468 6520 7669 7369 rn only the visi │ │ │ +000064b0: 626c 6520 6f6e 6573 2e0a 484c 4953 5420 ble ones..HLIST │ │ │ +000064c0: 6973 2061 206c 6973 7420 6f66 2065 6c65 is a list of ele │ │ │ +000064d0: 6d65 6e74 7320 6f66 2074 6865 2066 6f72 ments of the for │ │ │ +000064e0: 6d20 2844 4154 4529 2054 4558 542e 0a0a m (DATE) TEXT... │ │ │ +000064f0: 2866 6e20 484c 4953 5429 1f0a 2864 6566 (fn HLIST)..(def │ │ │ +00006500: 616c 6961 7320 2768 6f6c 6964 6179 2d66 alias 'holiday-f │ │ │ +00006510: 696c 7465 722d 7669 7369 626c 652d 6361 ilter-visible-ca │ │ │ +00006520: 6c65 6e64 6172 2023 5b32 3537 2022 5c33 lendar #[257 "\3 │ │ │ +00006530: 3030 5c33 3031 5c33 3032 5c33 3033 045c 00\301\302\303.\ │ │ │ +00006540: 225c 225c 3230 3722 205b 6465 6c71 206e "\"\207" [delq n │ │ │ +00006550: 696c 206d 6170 6361 7220 235b 3235 3720 il mapcar #[257 │ │ │ +00006560: 225c 3231 3140 5c32 3035 0d00 5c33 3030 "\211@\205..\300 │ │ │ +00006570: 0140 215c 3230 350d 005c 3231 315c 3230 .@!\205..\211\20 │ │ │ +00006580: 3722 205b 6361 6c65 6e64 6172 2d64 6174 7" [calendar-dat │ │ │ +00006590: 652d 6973 2d76 6973 6962 6c65 2d70 5d20 e-is-visible-p] │ │ │ +000065a0: 3320 225c 6e5c 6e28 666e 2050 2922 5d5d 3 "\n\n(fn P)"]] │ │ │ +000065b0: 2036 2028 2324 202e 2032 3537 3231 295d 6 (#$ . 25721)] │ │ │ +000065c0: 290a 2340 3338 3020 5365 7870 2068 6f6c ).#@380 Sexp hol │ │ │ +000065d0: 6964 6179 2066 6f72 2064 6174 6573 2069 iday for dates i │ │ │ +000065e0: 6e20 7468 6520 6361 6c65 6e64 6172 2077 n the calendar w │ │ │ +000065f0: 696e 646f 772e 0a53 4558 5020 6973 2061 indow..SEXP is a │ │ │ +00006600: 6e20 6578 7072 6573 7369 6f6e 2069 6e20 n expression in │ │ │ +00006610: 7661 7269 6162 6c65 2060 7965 6172 2720 variable `year' │ │ │ +00006620: 7468 6174 2069 7320 6576 616c 7561 7465 that is evaluate │ │ │ +00006630: 6420 746f 0a67 6976 6520 6064 6174 6527 d to.give `date' │ │ │ +00006640: 2e20 2053 5452 494e 4720 6973 2061 6e20 . STRING is an │ │ │ +00006650: 6578 7072 6573 7369 6f6e 2069 6e20 6064 expression in `d │ │ │ +00006660: 6174 6527 2074 6861 7420 6576 616c 7561 ate' that evalua │ │ │ +00006670: 7465 7320 746f 0a74 6865 2068 6f6c 6964 tes to.the holid │ │ │ +00006680: 6179 2064 6573 6372 6970 7469 6f6e 206f ay description o │ │ │ +00006690: 6620 6064 6174 6527 2e20 2049 6620 6064 f `date'. If `d │ │ │ +000066a0: 6174 6527 2069 7320 7669 7369 626c 6520 ate' is visible │ │ │ +000066b0: 696e 2074 6865 0a63 616c 656e 6461 7220 in the.calendar │ │ │ +000066c0: 7769 6e64 6f77 2c20 7468 6520 686f 6c69 window, the holi │ │ │ +000066d0: 6461 7920 5354 5249 4e47 2069 7320 6f6e day STRING is on │ │ │ +000066e0: 2074 6861 7420 6461 7465 2e20 2049 6620 that date. If │ │ │ +000066f0: 6461 7465 2069 730a 6e69 6c2c 206f 7220 date is.nil, or │ │ │ +00006700: 6966 2074 6865 2064 6174 6520 6973 206e if the date is n │ │ │ +00006710: 6f74 2076 6973 6962 6c65 2c20 7468 6572 ot visible, ther │ │ │ +00006720: 6520 6973 206e 6f20 686f 6c69 6461 792e e is no holiday. │ │ │ +00006730: 0a0a 2866 6e20 5345 5850 2053 5452 494e ..(fn SEXP STRIN │ │ │ +00006740: 4729 1f0a 2864 6566 616c 6961 7320 2768 G)..(defalias 'h │ │ │ +00006750: 6f6c 6964 6179 2d73 6578 7020 235b 3531 oliday-sexp #[51 │ │ │ +00006760: 3420 2208 095c 3330 345c 3330 3502 5c33 4 "..\304\305.\3 │ │ │ +00006770: 3036 575c 3230 330e 0002 545c 3236 3203 06W\203...T\262. │ │ │ +00006780: 5c33 3037 0303 5f05 5c33 3130 5c32 3131 \307.._.\310\211 │ │ │ +00006790: 245c 3236 3201 5c33 3131 0103 5c22 545c $\262.\311..\"T\ │ │ │ +000067a0: 3236 3204 5c32 3131 025c 3234 355c 3236 262.\211.\245\26 │ │ │ +000067b0: 3203 5c32 3131 5c33 3036 575c 3230 3334 2.\211\306W\2034 │ │ │ +000067c0: 0003 5c33 3132 565c 3230 3334 0002 535c ..\312V\2034..S\ │ │ │ +000067d0: 3236 3203 025c 3331 3257 5c32 3033 3e00 262..\312W\203>. │ │ │ +000067e0: 0253 5c32 3632 035c 3236 3602 5c33 3133 .S\262.\266.\313 │ │ │ +000067f0: 5c33 3035 5c32 3131 1a1b 0112 5c33 3134 \305\211....\314 │ │ │ +00006800: 055c 3331 355c 225c 3231 3113 5c32 3131 .\315\"\211.\211 │ │ │ +00006810: 5c32 3035 5500 5c33 3134 055c 3331 355c \205U.\314.\315\ │ │ │ +00006820: 2244 0254 125c 3331 3406 065c 3331 355c "D.T.\314..\315\ │ │ │ +00006830: 225c 3231 3113 5c32 3131 5c32 3035 6900 "\211.\211\205i. │ │ │ +00006840: 5c33 3134 0606 5c33 3135 5c22 2a44 4421 \314..\315\"*DD! │ │ │ +00006850: 5c32 3037 2220 5b64 6973 706c 6179 6564 \207" [displayed │ │ │ +00006860: 2d6d 6f6e 7468 2064 6973 706c 6179 6564 -month displayed │ │ │ +00006870: 2d79 6561 7220 7965 6172 2064 6174 6520 -year year date │ │ │ +00006880: 3132 206e 696c 2030 202b 202d 3120 6d6f 12 nil 0 + -1 mo │ │ │ +00006890: 6420 3120 686f 6c69 6461 792d 6669 6c74 d 1 holiday-filt │ │ │ +000068a0: 6572 2d76 6973 6962 6c65 2d63 616c 656e er-visible-calen │ │ │ +000068b0: 6461 7220 6576 616c 2074 5d20 3132 2028 dar eval t] 12 ( │ │ │ +000068c0: 2324 202e 2032 3630 3536 295d 290a 2340 #$ . 26056)]).#@ │ │ │ +000068d0: 3435 3920 4461 7465 206f 6620 4e74 6820 459 Date of Nth │ │ │ +000068e0: 6461 7920 6166 7465 7220 6164 7665 6e74 day after advent │ │ │ +000068f0: 2028 6e61 6d65 6420 5354 5249 4e47 292c (named STRING), │ │ │ +00006900: 2069 6620 7669 7369 626c 6520 696e 2063 if visible in c │ │ │ +00006910: 616c 656e 6461 7220 7769 6e64 6f77 2e0a alendar window.. │ │ │ +00006920: 4e65 6761 7469 7665 2076 616c 7565 7320 Negative values │ │ │ +00006930: 6f66 204e 2061 7265 2069 6e74 6572 7072 of N are interpr │ │ │ +00006940: 6574 6564 2061 7320 6461 7973 2062 6566 eted as days bef │ │ │ +00006950: 6f72 6520 6164 7665 6e74 2e0a 5354 5249 ore advent..STRI │ │ │ +00006960: 4e47 2069 7320 7573 6564 2070 7572 656c NG is used purel │ │ │ +00006970: 7920 666f 7220 6469 7370 6c61 7920 7075 y for display pu │ │ │ +00006980: 7270 6f73 6573 2e20 2054 6865 2072 6574 rposes. The ret │ │ │ +00006990: 7572 6e20 7661 6c75 6520 6861 730a 7468 urn value has.th │ │ │ +000069a0: 6520 666f 726d 2028 284d 4f4e 5448 2044 e form ((MONTH D │ │ │ +000069b0: 4159 2059 4541 5229 2053 5452 494e 4729 AY YEAR) STRING) │ │ │ +000069c0: 2c20 7768 6572 6520 7468 6520 6461 7465 , where the date │ │ │ +000069d0: 2069 7320 7468 6174 206f 6620 7468 650a is that of the. │ │ │ +000069e0: 4e74 6820 6461 7920 6265 666f 7265 206f Nth day before o │ │ │ +000069f0: 7220 6166 7465 7220 6164 7665 6e74 2e0a r after advent.. │ │ │ +00006a00: 0a46 6f72 2062 6163 6b77 6172 6473 2063 .For backwards c │ │ │ +00006a10: 6f6d 7061 7469 6269 6c69 7479 2c20 6966 ompatibility, if │ │ │ +00006a20: 2074 6869 7320 6675 6e63 7469 6f6e 2069 this function i │ │ │ +00006a30: 7320 6361 6c6c 6564 2077 6974 6820 6e6f s called with no │ │ │ +00006a40: 0a61 7267 756d 656e 7473 2c20 7468 656e .arguments, then │ │ │ +00006a50: 2069 7420 7265 7475 726e 7320 7468 6520 it returns the │ │ │ +00006a60: 7661 6c75 6520 6170 7072 6f70 7269 6174 value appropriat │ │ │ +00006a70: 6520 666f 7220 6164 7665 6e74 2069 7473 e for advent its │ │ │ +00006a80: 656c 662e 0a0a 2866 6e20 266f 7074 696f elf...(fn &optio │ │ │ +00006a90: 6e61 6c20 4e20 5354 5249 4e47 291f 0a28 nal N STRING)..( │ │ │ +00006aa0: 6465 6661 6c69 6173 2027 686f 6c69 6461 defalias 'holida │ │ │ +00006ab0: 792d 6164 7665 6e74 2023 5b35 3132 2022 y-advent #[512 " │ │ │ +00006ac0: 015c 3230 3409 005c 3330 325c 3330 335c .\204..\302\303\ │ │ │ +00006ad0: 3330 345c 225c 3230 3708 095c 3330 355c 304\"\207..\305\ │ │ │ +00006ae0: 3330 3603 5c33 3033 575c 3230 3317 0003 306.\303W\203... │ │ │ +00006af0: 545c 3236 3204 5c33 3037 0403 5f04 5c33 T\262.\307.._.\3 │ │ │ +00006b00: 3130 5c32 3131 245c 3236 3201 5c33 3131 10\211$\262.\311 │ │ │ +00006b10: 0103 5c22 545c 3236 3203 5c32 3131 025c ..\"T\262.\211.\ │ │ │ +00006b20: 3234 355c 3236 3204 5c32 3131 5c33 3033 245\262.\211\303 │ │ │ +00006b30: 575c 3230 333d 0002 5c33 3132 565c 3230 W\203=..\312V\20 │ │ │ +00006b40: 333d 0003 535c 3236 3204 035c 3331 3257 3=..S\262..\312W │ │ │ +00006b50: 5c32 3033 4700 0353 5c32 3632 045c 3236 \203G..S\262.\26 │ │ │ +00006b60: 3602 5c33 3133 045c 3331 345c 3330 335c 6.\313.\314\303\ │ │ │ +00006b70: 3330 355c 3331 3506 0745 5c32 3131 5c33 305\315..E\211\3 │ │ │ +00006b80: 3136 0138 5c32 3632 015c 3330 3601 5c33 16.8\262.\306.\3 │ │ │ +00006b90: 3033 555c 3230 3365 005c 3331 375c 3332 03U\203e.\317\32 │ │ │ +00006ba0: 3021 5c32 3032 5c32 3337 0101 5c33 3033 0!\202\237..\303 │ │ │ +00006bb0: 565c 3230 335c 3333 3100 0153 5c32 3632 V\203\331..S\262 │ │ │ +00006bc0: 015c 3330 3703 5c32 3131 5c32 3131 405c .\307.\211\211@\ │ │ │ +00006bd0: 3236 3201 015c 3231 3141 405c 3236 3201 262..\211A@\262. │ │ │ +00006be0: 025c 3331 3601 385c 3236 3201 015c 3332 .\316.8\262..\32 │ │ │ +00006bf0: 3104 535f 5c5c 035c 3331 3656 5c32 3033 1.S_\\.\316V\203 │ │ │ +00006c00: 5c33 3036 005c 3231 315c 3332 325c 3332 \306.\211\322\32 │ │ │ +00006c10: 3306 065f 5c5c 5c33 3234 5c32 3435 5a5c 3.._\\\324\245Z\ │ │ │ +00006c20: 3236 3201 015c 3231 315c 3330 3357 5c32 262..\211\303W\2 │ │ │ +00006c30: 3033 5c32 3437 005c 3332 3501 2153 5c32 03\247.\325.!S\2 │ │ │ +00006c40: 3632 015c 3231 315c 3332 335c 3234 365c 62.\211\323\246\ │ │ │ +00006c50: 3330 3355 5c32 3035 5c32 3735 005c 3231 303U\205\275.\21 │ │ │ +00006c60: 315c 3332 365c 3234 365c 3330 3355 3f5c 1\326\246\303U?\ │ │ │ +00006c70: 3230 365c 3237 3500 5c32 3131 5c33 3237 206\275.\211\327 │ │ │ +00006c80: 5c32 3436 5c33 3033 555c 3236 3201 5c32 \246\303U\262.\2 │ │ │ +00006c90: 3033 5c33 3036 005c 3231 3154 5c32 3632 03\306.\211T\262 │ │ │ +00006ca0: 015c 3236 365c 3230 345c 3333 3003 5f03 .\266\204\330._. │ │ │ +00006cb0: 5c33 3233 5c32 3435 045c 3332 365c 3234 \323\245.\326\24 │ │ │ +00006cc0: 355b 055c 3332 375c 3234 3525 5c32 3032 5[.\327\245%\202 │ │ │ +00006cd0: 5c32 3337 015c 3332 3502 5421 5c32 3632 \237.\325.T!\262 │ │ │ +00006ce0: 015c 3333 3103 5c32 3131 5c32 3131 405c .\331.\211\211@\ │ │ │ +00006cf0: 3236 3201 015c 3231 3141 405c 3236 3201 262..\211A@\262. │ │ │ +00006d00: 025c 3331 3601 385c 3236 3201 015c 3332 .\316.8\262..\32 │ │ │ +00006d10: 3104 535f 5c5c 035c 3331 3656 5c32 3033 1.S_\\.\316V\203 │ │ │ +00006d20: 3601 5c32 3131 5c33 3232 5c33 3233 0606 6.\211\322\323.. │ │ │ +00006d30: 5f5c 5c5c 3332 345c 3234 355a 5c32 3632 _\\\324\245Z\262 │ │ │ +00006d40: 0101 5c32 3131 5c33 3033 575c 3230 3317 ..\211\303W\203. │ │ │ +00006d50: 015c 3332 3501 2153 5c32 3632 015c 3231 .\325.!S\262.\21 │ │ │ +00006d60: 315c 3332 335c 3234 365c 3330 3355 5c32 1\323\246\303U\2 │ │ │ +00006d70: 3035 2d01 5c32 3131 5c33 3236 5c32 3436 05-.\211\326\246 │ │ │ +00006d80: 5c33 3033 553f 5c32 3036 2d01 5c32 3131 \303U?\206-.\211 │ │ │ +00006d90: 5c33 3237 5c32 3436 5c33 3033 555c 3236 \327\246\303U\26 │ │ │ +00006da0: 3201 5c32 3033 3601 5c32 3131 545c 3236 2.\2036.\211T\26 │ │ │ +00006db0: 3201 5c32 3636 5c32 3034 5c33 3330 035f 2.\266\204\330._ │ │ │ +00006dc0: 035c 3332 335c 3234 3504 5c33 3236 5c32 .\323\245.\326\2 │ │ │ +00006dd0: 3435 5b05 5c33 3237 5c32 3435 5c33 3332 45[.\327\245\332 │ │ │ +00006de0: 5c32 3131 5c32 3131 405c 3236 3201 015c \211\211@\262..\ │ │ │ +00006df0: 3231 3141 405c 3236 3201 025c 3331 3601 211A@\262..\316. │ │ │ +00006e00: 385c 3236 3201 015c 3332 3104 535f 5c5c 8\262..\321.S_\\ │ │ │ +00006e10: 035c 3331 3656 5c32 3033 5c32 3333 015c .\316V\203\233.\ │ │ │ +00006e20: 3231 315c 3332 325c 3332 3306 065f 5c5c 211\322\323.._\\ │ │ │ +00006e30: 5c33 3234 5c32 3435 5a5c 3236 3201 015c \324\245Z\262..\ │ │ │ +00006e40: 3231 315c 3330 3357 5c32 3033 7c01 5c33 211\303W\203|.\3 │ │ │ +00006e50: 3235 0121 535c 3236 3201 5c32 3131 5c33 25.!S\262.\211\3 │ │ │ +00006e60: 3233 5c32 3436 5c33 3033 555c 3230 355c 23\246\303U\205\ │ │ │ +00006e70: 3232 3201 5c32 3131 5c33 3236 5c32 3436 222.\211\326\246 │ │ │ +00006e80: 5c33 3033 553f 5c32 3036 5c32 3232 015c \303U?\206\222.\ │ │ │ +00006e90: 3231 315c 3332 375c 3234 365c 3330 3355 211\327\246\303U │ │ │ +00006ea0: 5c32 3632 015c 3230 335c 3233 3301 5c32 \262.\203\233.\2 │ │ │ +00006eb0: 3131 545c 3236 3201 5c32 3636 5c32 3034 11T\262.\266\204 │ │ │ +00006ec0: 2606 5c32 3636 5c32 3033 5c22 5c5c 215c &.\266\203\"\\!\ │ │ │ +00006ed0: 3333 3301 215c 3230 355c 3235 3601 5c32 333.!\205\256.\2 │ │ │ +00006ee0: 3131 0444 435c 3230 3722 205b 6469 7370 11.DC\207" [disp │ │ │ +00006ef0: 6c61 7965 642d 7965 6172 2064 6973 706c layed-year displ │ │ │ +00006f00: 6179 6564 2d6d 6f6e 7468 2068 6f6c 6964 ayed-month holid │ │ │ +00006f10: 6179 2d61 6476 656e 7420 3020 2241 6476 ay-advent 0 "Adv │ │ │ +00006f20: 656e 7422 2031 3220 6e69 6c20 2b20 2d31 ent" 12 nil + -1 │ │ │ +00006f30: 206d 6f64 2031 2063 616c 656e 6461 722d mod 1 calendar- │ │ │ +00006f40: 6772 6567 6f72 6961 6e2d 6672 6f6d 2d61 gregorian-from-a │ │ │ +00006f50: 6273 6f6c 7574 6520 6361 6c65 6e64 6172 bsolute calendar │ │ │ +00006f60: 2d64 6179 6e61 6d65 2d6f 6e2d 6f72 2d62 -dayname-on-or-b │ │ │ +00006f70: 6566 6f72 6520 3320 3220 7573 6572 2d65 efore 3 2 user-e │ │ │ +00006f80: 7272 6f72 2022 5468 6572 6520 7761 7320 rror "There was │ │ │ +00006f90: 6e6f 2079 6561 7220 7a65 726f 2220 3331 no year zero" 31 │ │ │ +00006fa0: 2032 3320 3420 3130 2061 6273 2031 3030 23 4 10 abs 100 │ │ │ +00006fb0: 2034 3030 2033 3635 202d 2028 3132 2033 400 365 - (12 3 │ │ │ +00006fc0: 3120 2d31 2920 6361 6c65 6e64 6172 2d64 1 -1) calendar-d │ │ │ +00006fd0: 6174 652d 6973 2d76 6973 6962 6c65 2d70 ate-is-visible-p │ │ │ +00006fe0: 5d20 3236 2028 2324 202e 2032 3638 3336 ] 26 (#$ . 26836 │ │ │ +00006ff0: 295d 290a 2340 3533 3720 4461 7465 206f )]).#@537 Date o │ │ │ +00007000: 6620 4e74 6820 6461 7920 6166 7465 7220 f Nth day after │ │ │ +00007010: 4561 7374 6572 2028 6e61 6d65 6420 5354 Easter (named ST │ │ │ +00007020: 5249 4e47 292c 2069 6620 7669 7369 626c RING), if visibl │ │ │ +00007030: 6520 696e 2063 616c 656e 6461 7220 7769 e in calendar wi │ │ │ +00007040: 6e64 6f77 2e0a 4e65 6761 7469 7665 2076 ndow..Negative v │ │ │ +00007050: 616c 7565 7320 6f66 204e 2061 7265 2069 alues of N are i │ │ │ +00007060: 6e74 6572 7072 6574 6564 2061 7320 6461 nterpreted as da │ │ │ +00007070: 7973 2062 6566 6f72 6520 4561 7374 6572 ys before Easter │ │ │ +00007080: 2e0a 5354 5249 4e47 2069 7320 7573 6564 ..STRING is used │ │ │ +00007090: 2070 7572 656c 7920 666f 7220 6469 7370 purely for disp │ │ │ +000070a0: 6c61 7920 7075 7270 6f73 6573 2e20 2054 lay purposes. T │ │ │ +000070b0: 6865 2072 6574 7572 6e20 7661 6c75 6520 he return value │ │ │ +000070c0: 6861 730a 7468 6520 666f 726d 2028 284d has.the form ((M │ │ │ +000070d0: 4f4e 5448 2044 4159 2059 4541 5229 2053 ONTH DAY YEAR) S │ │ │ +000070e0: 5452 494e 4729 2c20 7768 6572 6520 7468 TRING), where th │ │ │ +000070f0: 6520 6461 7465 2069 7320 7468 6174 206f e date is that o │ │ │ +00007100: 6620 7468 650a 4e74 6820 6461 7920 6265 f the.Nth day be │ │ │ +00007110: 666f 7265 206f 7220 6166 7465 7220 4561 fore or after Ea │ │ │ +00007120: 7374 6572 2e0a 0a46 6f72 2062 6163 6b77 ster...For backw │ │ │ +00007130: 6172 6473 2063 6f6d 7061 7469 6269 6c69 ards compatibili │ │ │ +00007140: 7479 2c20 6966 2074 6869 7320 6675 6e63 ty, if this func │ │ │ +00007150: 7469 6f6e 2069 7320 6361 6c6c 6564 2077 tion is called w │ │ │ +00007160: 6974 6820 6e6f 0a61 7267 756d 656e 7473 ith no.arguments │ │ │ +00007170: 2c20 7468 656e 2069 7420 7265 7475 726e , then it return │ │ │ +00007180: 7320 6120 6c69 7374 206f 6620 2273 7461 s a list of "sta │ │ │ +00007190: 6e64 6172 6422 2045 6173 7465 722d 7265 ndard" Easter-re │ │ │ +000071a0: 6c61 7465 640a 686f 6c69 6461 7973 2028 lated.holidays ( │ │ │ +000071b0: 7769 7468 206d 6f72 6520 656e 7472 6965 with more entrie │ │ │ +000071c0: 7320 6966 2060 6361 6c65 6e64 6172 2d63 s if `calendar-c │ │ │ +000071d0: 6872 6973 7469 616e 2d61 6c6c 2d68 6f6c hristian-all-hol │ │ │ +000071e0: 6964 6179 732d 666c 6167 270a 6973 206e idays-flag'.is n │ │ │ +000071f0: 6f6e 2d6e 696c 292e 0a0a 2866 6e20 266f on-nil)...(fn &o │ │ │ +00007200: 7074 696f 6e61 6c20 4e20 5354 5249 4e47 ptional N STRING │ │ │ +00007210: 291f 0a28 6465 6661 6c69 6173 2027 686f )..(defalias 'ho │ │ │ +00007220: 6c69 6461 792d 6561 7374 6572 2d65 7463 liday-easter-etc │ │ │ +00007230: 2023 5b35 3132 2022 015c 3230 3413 005c #[512 ".\204..\ │ │ │ +00007240: 3330 325c 3330 335c 3330 345c 3330 355c 302\303\304\305\ │ │ │ +00007250: 3330 3308 5c32 3035 0e00 5c33 3036 5c33 303.\205..\306\3 │ │ │ +00007260: 3037 5c22 5c22 5c22 5c32 3037 095c 3331 07\"\"\"\207.\31 │ │ │ +00007270: 305c 3234 3554 5c33 3131 5c33 3132 5c33 0\245T\311\312\3 │ │ │ +00007280: 3133 095c 3331 345c 3234 365f 5c33 3135 13.\314\246_\315 │ │ │ +00007290: 045f 5c33 3136 5c32 3435 5b5c 3331 375c ._\316\245[\317\ │ │ │ +000072a0: 3332 3006 065f 5c5c 5c33 3231 5c32 3435 320.._\\\321\245 │ │ │ +000072b0: 5c33 3232 0606 5f25 5c33 3232 5c32 3436 \322.._%\322\246 │ │ │ +000072c0: 5c32 3131 5c33 3233 555c 3230 3447 005c \211\323U\204G.\ │ │ │ +000072d0: 3231 315c 3332 3455 5c32 3033 4c00 5c33 211\324U\203L.\3 │ │ │ +000072e0: 3235 095c 3331 345c 3234 3657 5c32 3033 25.\314\246W\203 │ │ │ +000072f0: 4c00 5c32 3131 545c 3230 324d 005c 3231 L.\211T\202M.\21 │ │ │ +00007300: 315c 3331 365c 3331 3409 455c 3231 315c 1\316\314.E\211\ │ │ │ +00007310: 3332 3601 385c 3236 3201 5c33 3237 015c 326.8\262.\327.\ │ │ │ +00007320: 3332 3355 5c32 3033 6400 5c33 3330 5c33 323U\203d.\330\3 │ │ │ +00007330: 3331 215c 3230 325c 3233 3601 015c 3332 31!\202\236..\32 │ │ │ +00007340: 3356 5c32 3033 5c33 3330 0001 535c 3236 3V\203\330..S\26 │ │ │ +00007350: 3201 5c33 3131 035c 3231 315c 3231 3140 2.\311.\211\211@ │ │ │ +00007360: 5c32 3632 0101 5c32 3131 4140 5c32 3632 \262..\211A@\262 │ │ │ +00007370: 0102 5c33 3236 0138 5c32 3632 0101 5c33 ..\326.8\262..\3 │ │ │ +00007380: 3332 0453 5f5c 5c03 5c33 3236 565c 3230 32.S_\\.\326V\20 │ │ │ +00007390: 335c 3330 3500 5c32 3131 5c33 3333 5c33 3\305.\211\333\3 │ │ │ +000073a0: 3136 0606 5f5c 5c5c 3332 355c 3234 355a 16.._\\\325\245Z │ │ │ +000073b0: 5c32 3632 0101 5c32 3131 5c33 3233 575c \262..\211\323W\ │ │ │ +000073c0: 3230 335c 3234 3600 5c33 3334 0121 535c 203\246.\334.!S\ │ │ │ +000073d0: 3236 3201 5c32 3131 5c33 3136 5c32 3436 262.\211\316\246 │ │ │ +000073e0: 5c33 3233 555c 3230 355c 3237 3400 5c32 \323U\205\274.\2 │ │ │ +000073f0: 3131 5c33 3130 5c32 3436 5c33 3233 553f 11\310\246\323U? │ │ │ +00007400: 5c32 3036 5c32 3734 005c 3231 315c 3333 \206\274.\211\33 │ │ │ +00007410: 355c 3234 365c 3332 3355 5c32 3632 015c 5\246\323U\262.\ │ │ │ +00007420: 3230 335c 3330 3500 5c32 3131 545c 3236 203\305.\211T\26 │ │ │ +00007430: 3201 5c32 3636 5c32 3034 5c33 3336 035f 2.\266\204\336._ │ │ │ +00007440: 035c 3331 365c 3234 3504 5c33 3130 5c32 .\316\245.\310\2 │ │ │ +00007450: 3435 5b05 5c33 3335 5c32 3435 255c 3230 45[.\335\245%\20 │ │ │ +00007460: 325c 3233 3601 5c33 3334 0254 215c 3236 2\236.\334.T!\26 │ │ │ +00007470: 3201 5c33 3337 035c 3231 315c 3231 3140 2.\337.\211\211@ │ │ │ +00007480: 5c32 3632 0101 5c32 3131 4140 5c32 3632 \262..\211A@\262 │ │ │ +00007490: 0102 5c33 3236 0138 5c32 3632 0101 5c33 ..\326.8\262..\3 │ │ │ +000074a0: 3332 0453 5f5c 5c03 5c33 3236 565c 3230 32.S_\\.\326V\20 │ │ │ +000074b0: 3335 015c 3231 315c 3333 335c 3331 3606 35.\211\333\316. │ │ │ +000074c0: 065f 5c5c 5c33 3235 5c32 3435 5a5c 3236 ._\\\325\245Z\26 │ │ │ +000074d0: 3201 015c 3231 315c 3332 3357 5c32 3033 2..\211\323W\203 │ │ │ +000074e0: 1601 5c33 3334 0121 535c 3236 3201 5c32 ..\334.!S\262.\2 │ │ │ +000074f0: 3131 5c33 3136 5c32 3436 5c33 3233 555c 11\316\246\323U\ │ │ │ +00007500: 3230 352c 015c 3231 315c 3331 305c 3234 205,.\211\310\24 │ │ │ +00007510: 365c 3332 3355 3f5c 3230 362c 015c 3231 6\323U?\206,.\21 │ │ │ +00007520: 315c 3333 355c 3234 365c 3332 3355 5c32 1\335\246\323U\2 │ │ │ +00007530: 3632 015c 3230 3335 015c 3231 3154 5c32 62.\2035.\211T\2 │ │ │ +00007540: 3632 015c 3236 365c 3230 345c 3333 3603 62.\266\204\336. │ │ │ +00007550: 5f03 5c33 3136 5c32 3435 045c 3331 305c _.\316\245.\310\ │ │ │ +00007560: 3234 355b 055c 3333 355c 3234 355c 3334 245[.\335\245\34 │ │ │ +00007570: 305c 3231 315c 3231 3140 5c32 3632 0101 0\211\211@\262.. │ │ │ +00007580: 5c32 3131 4140 5c32 3632 0102 5c33 3236 \211A@\262..\326 │ │ │ +00007590: 0138 5c32 3632 0101 5c33 3332 0453 5f5c .8\262..\332.S_\ │ │ │ +000075a0: 5c03 5c33 3236 565c 3230 335c 3233 3201 \.\326V\203\232. │ │ │ +000075b0: 5c32 3131 5c33 3333 5c33 3136 0606 5f5c \211\333\316.._\ │ │ │ +000075c0: 5c5c 3332 355c 3234 355a 5c32 3632 0101 \\325\245Z\262.. │ │ │ +000075d0: 5c32 3131 5c33 3233 575c 3230 337b 015c \211\323W\203{.\ │ │ │ +000075e0: 3333 3401 2153 5c32 3632 015c 3231 315c 334.!S\262.\211\ │ │ │ +000075f0: 3331 365c 3234 365c 3332 3355 5c32 3035 316\246\323U\205 │ │ │ +00007600: 5c32 3231 015c 3231 315c 3331 305c 3234 \221.\211\310\24 │ │ │ +00007610: 365c 3332 3355 3f5c 3230 365c 3232 3101 6\323U?\206\221. │ │ │ +00007620: 5c32 3131 5c33 3335 5c32 3436 5c33 3233 \211\335\246\323 │ │ │ +00007630: 555c 3236 3201 5c32 3033 5c32 3332 015c U\262.\203\232.\ │ │ │ +00007640: 3231 3154 5c32 3632 015c 3236 365c 3230 211T\262.\266\20 │ │ │ +00007650: 3426 065c 3236 365c 3230 3301 5a5c 3334 4&.\266\203.Z\34 │ │ │ +00007660: 315c 3332 3302 5c33 3432 5c5c 5c22 5c33 1\323.\342\\\"\3 │ │ │ +00007670: 3433 0106 085c 5c21 5c33 3434 0121 5c32 43...\\!\344.!\2 │ │ │ +00007680: 3035 5c32 3731 015c 3231 3106 0744 435c 05\271.\211..DC\ │ │ │ +00007690: 3230 3722 205b 6361 6c65 6e64 6172 2d63 207" [calendar-c │ │ │ +000076a0: 6872 6973 7469 616e 2d61 6c6c 2d68 6f6c hristian-all-hol │ │ │ +000076b0: 6964 6179 732d 666c 6167 2064 6973 706c idays-flag displ │ │ │ +000076c0: 6179 6564 2d79 6561 7220 6170 706c 7920 ayed-year apply │ │ │ +000076d0: 6170 7065 6e64 206d 6170 6361 7220 235b append mapcar #[ │ │ │ +000076e0: 3235 3720 225c 3330 305c 3330 3102 5c22 257 "\300\301.\" │ │ │ +000076f0: 5c32 3037 2220 5b61 7070 6c79 2068 6f6c \207" [apply hol │ │ │ +00007700: 6964 6179 2d65 6173 7465 722d 6574 635d iday-easter-etc] │ │ │ +00007710: 2034 2022 5c6e 5c6e 2866 6e20 4529 225d 4 "\n\n(fn E)"] │ │ │ +00007720: 2028 282d 3633 2022 5365 7074 7561 6765 ((-63 "Septuage │ │ │ +00007730: 7369 6d61 2053 756e 6461 7922 2920 282d sima Sunday") (- │ │ │ +00007740: 3536 2022 5365 7861 6765 7369 6d61 2053 56 "Sexagesima S │ │ │ +00007750: 756e 6461 7922 2920 282d 3439 2022 5368 unday") (-49 "Sh │ │ │ +00007760: 726f 7665 2053 756e 6461 7922 2920 282d rove Sunday") (- │ │ │ +00007770: 3438 2022 5368 726f 7665 204d 6f6e 6461 48 "Shrove Monda │ │ │ +00007780: 7922 2920 282d 3437 2022 5368 726f 7665 y") (-47 "Shrove │ │ │ +00007790: 2054 7565 7364 6179 2229 2028 2d31 3420 Tuesday") (-14 │ │ │ +000077a0: 2250 6173 7369 6f6e 2053 756e 6461 7922 "Passion Sunday" │ │ │ +000077b0: 2920 282d 3720 2250 616c 6d20 5375 6e64 ) (-7 "Palm Sund │ │ │ +000077c0: 6179 2229 2028 2d33 2022 4d61 756e 6479 ay") (-3 "Maundy │ │ │ +000077d0: 2054 6875 7273 6461 7922 2920 2833 3520 Thursday") (35 │ │ │ +000077e0: 2252 6f67 6174 696f 6e20 5375 6e64 6179 "Rogation Sunday │ │ │ +000077f0: 2229 2028 3339 2022 4173 6365 6e73 696f ") (39 "Ascensio │ │ │ +00007800: 6e20 4461 7922 2920 2834 3920 2250 656e n Day") (49 "Pen │ │ │ +00007810: 7465 636f 7374 2028 5768 6974 7375 6e64 tecost (Whitsund │ │ │ +00007820: 6179 2922 2920 2835 3020 2257 6869 746d ay)") (50 "Whitm │ │ │ +00007830: 6f6e 6461 7922 2920 2835 3620 2254 7269 onday") (56 "Tri │ │ │ +00007840: 6e69 7479 2053 756e 6461 7922 2920 2836 nity Sunday") (6 │ │ │ +00007850: 3020 2243 6f72 7075 7320 4368 7269 7374 0 "Corpus Christ │ │ │ +00007860: 6922 2929 2028 282d 3436 2022 4173 6820 i")) ((-46 "Ash │ │ │ +00007870: 5765 646e 6573 6461 7922 2920 282d 3220 Wednesday") (-2 │ │ │ +00007880: 2247 6f6f 6420 4672 6964 6179 2229 2028 "Good Friday") ( │ │ │ +00007890: 3020 2245 6173 7465 7220 5375 6e64 6179 0 "Easter Sunday │ │ │ +000078a0: 2229 2920 3130 3020 2b20 3134 2031 3120 ")) 100 + 14 11 │ │ │ +000078b0: 3139 2033 2034 2035 2038 2032 3520 3330 19 3 4 5 8 25 30 │ │ │ +000078c0: 2030 2031 2031 3020 3220 6e69 6c20 7573 0 1 10 2 nil us │ │ │ +000078d0: 6572 2d65 7272 6f72 2022 5468 6572 6520 er-error "There │ │ │ +000078e0: 7761 7320 6e6f 2079 6561 7220 7a65 726f was no year zero │ │ │ +000078f0: 2220 3331 2032 3320 6162 7320 3430 3020 " 31 23 abs 400 │ │ │ +00007900: 3336 3520 2d20 2831 3220 3331 202d 3129 365 - (12 31 -1) │ │ │ +00007910: 2063 616c 656e 6461 722d 6461 796e 616d calendar-daynam │ │ │ +00007920: 652d 6f6e 2d6f 722d 6265 666f 7265 2037 e-on-or-before 7 │ │ │ +00007930: 2063 616c 656e 6461 722d 6772 6567 6f72 calendar-gregor │ │ │ +00007940: 6961 6e2d 6672 6f6d 2d61 6273 6f6c 7574 ian-from-absolut │ │ │ +00007950: 6520 6361 6c65 6e64 6172 2d64 6174 652d e calendar-date- │ │ │ +00007960: 6973 2d76 6973 6962 6c65 2d70 5d20 3233 is-visible-p] 23 │ │ │ +00007970: 2028 2324 202e 2032 3836 3636 295d 290a (#$ . 28666)]). │ │ │ +00007980: 2340 3532 3220 4461 7465 206f 6620 4e74 #@522 Date of Nt │ │ │ +00007990: 6820 6461 7920 6166 7465 7220 4561 7374 h day after East │ │ │ +000079a0: 6572 2028 6e61 6d65 6420 5354 5249 4e47 er (named STRING │ │ │ +000079b0: 292c 2069 6620 7669 7369 626c 6520 696e ), if visible in │ │ │ +000079c0: 2063 616c 656e 6461 7220 7769 6e64 6f77 calendar window │ │ │ +000079d0: 2e0a 4974 2069 7320 6361 6c63 756c 6174 ..It is calculat │ │ │ +000079e0: 6564 2061 6363 6f72 6469 6e67 2074 6f20 ed according to │ │ │ +000079f0: 7468 6520 7275 6c65 206f 6620 7468 6520 the rule of the │ │ │ +00007a00: 436f 756e 6369 6c20 6f66 204e 6963 6165 Council of Nicae │ │ │ +00007a10: 612e 0a4e 6567 6174 6976 6520 7661 6c75 a..Negative valu │ │ │ +00007a20: 6573 206f 6620 4e20 6172 6520 696e 7465 es of N are inte │ │ │ +00007a30: 7270 7265 7465 6420 6173 2064 6179 7320 rpreted as days │ │ │ +00007a40: 6265 666f 7265 2045 6173 7465 722e 0a53 before Easter..S │ │ │ +00007a50: 5452 494e 4720 6973 2075 7365 6420 7075 TRING is used pu │ │ │ +00007a60: 7265 6c79 2066 6f72 2064 6973 706c 6179 rely for display │ │ │ +00007a70: 2070 7572 706f 7365 732e 2020 5468 6520 purposes. The │ │ │ +00007a80: 7265 7475 726e 2076 616c 7565 2068 6173 return value has │ │ │ +00007a90: 0a74 6865 2066 6f72 6d20 2828 4d4f 4e54 .the form ((MONT │ │ │ +00007aa0: 4820 4441 5920 5945 4152 2920 5354 5249 H DAY YEAR) STRI │ │ │ +00007ab0: 4e47 292c 2077 6865 7265 2074 6865 2064 NG), where the d │ │ │ +00007ac0: 6174 6520 6973 2074 6861 7420 6f66 2074 ate is that of t │ │ │ +00007ad0: 6865 0a4e 7468 2064 6179 2062 6566 6f72 he.Nth day befor │ │ │ +00007ae0: 6520 6f72 2061 6674 6572 2045 6173 7465 e or after Easte │ │ │ +00007af0: 722e 0a0a 466f 7220 6261 636b 7761 7264 r...For backward │ │ │ +00007b00: 7320 636f 6d70 6174 6962 696c 6974 792c s compatibility, │ │ │ +00007b10: 2069 6620 7468 6973 2066 756e 6374 696f if this functio │ │ │ +00007b20: 6e20 6973 2063 616c 6c65 6420 7769 7468 n is called with │ │ │ +00007b30: 206e 6f0a 6172 6775 6d65 6e74 732c 2069 no.arguments, i │ │ │ +00007b40: 7420 7265 7475 726e 7320 7468 6520 6461 t returns the da │ │ │ +00007b50: 7465 206f 6620 5061 7363 6861 2028 4772 te of Pascha (Gr │ │ │ +00007b60: 6565 6b20 4f72 7468 6f64 6f78 2045 6173 eek Orthodox Eas │ │ │ +00007b70: 7465 7229 2e0a 0a28 666e 2026 6f70 7469 ter)...(fn &opti │ │ │ +00007b80: 6f6e 616c 204e 2053 5452 494e 4729 1f0a onal N STRING).. │ │ │ +00007b90: 2864 6566 616c 6961 7320 2768 6f6c 6964 (defalias 'holid │ │ │ +00007ba0: 6179 2d67 7265 656b 2d6f 7274 686f 646f ay-greek-orthodo │ │ │ +00007bb0: 782d 6561 7374 6572 2023 5b35 3132 2022 x-easter #[512 " │ │ │ +00007bc0: 0809 5c33 3032 5c33 3033 025c 3330 3457 ..\302\303.\304W │ │ │ +00007bd0: 5c32 3033 0e00 0254 5c32 3632 035c 3330 \203...T\262.\30 │ │ │ +00007be0: 3503 035f 055c 3330 365c 3330 3724 5c32 5.._.\306\307$\2 │ │ │ +00007bf0: 3632 015c 3331 3001 035c 2254 5c32 3632 62.\310..\"T\262 │ │ │ +00007c00: 045c 3231 3102 5c32 3435 5c32 3632 035c .\211.\245\262.\ │ │ │ +00007c10: 3231 315c 3330 3457 5c32 3033 3400 035c 211\304W\2034..\ │ │ │ +00007c20: 3330 3756 5c32 3033 3400 0253 5c32 3632 307V\2034..S\262 │ │ │ +00007c30: 0302 5c33 3037 575c 3230 333e 0002 535c ..\307W\203>..S\ │ │ │ +00007c40: 3236 3203 5c32 3636 025c 3331 3102 5c32 262.\266.\311.\2 │ │ │ +00007c50: 3131 0301 5c33 3132 555c 3230 3378 005c 11..\312U\203x.\ │ │ │ +00007c60: 3231 315c 3231 315c 3330 3457 5c32 3033 211\211\304W\203 │ │ │ +00007c70: 5700 5c33 3133 0121 535c 3236 3201 5c32 W.\313.!S\262.\2 │ │ │ +00007c80: 3131 5c33 3134 5c32 3436 5c33 3034 555c 11\314\246\304U\ │ │ │ +00007c90: 3230 356d 005c 3231 315c 3331 355c 3234 205m.\211\315\24 │ │ │ +00007ca0: 365c 3330 3455 3f5c 3230 366d 005c 3231 6\304U?\206m.\21 │ │ │ +00007cb0: 315c 3331 365c 3234 365c 3330 3455 5c32 1\316\246\304U\2 │ │ │ +00007cc0: 3632 015c 3230 3378 005c 3331 375c 3236 62.\203x.\317\26 │ │ │ +00007cd0: 365c 3230 325c 3230 327e 005c 3332 3002 6\202\202~.\320. │ │ │ +00007ce0: 5348 5c32 3636 5c32 3032 0345 5c32 3131 SH\266\202.E\211 │ │ │ +00007cf0: 5c33 3132 0138 5c32 3632 015c 3330 3301 \312.8\262.\303. │ │ │ +00007d00: 5c33 3034 555c 3230 335c 3232 3300 5c33 \304U\203\223.\3 │ │ │ +00007d10: 3231 5c33 3232 215c 3230 325c 3331 3501 21\322!\202\315. │ │ │ +00007d20: 015c 3330 3456 5c32 3033 0701 0153 5c32 .\304V\203...S\2 │ │ │ +00007d30: 3632 015c 3330 3503 5c32 3131 5c32 3131 62.\305.\211\211 │ │ │ +00007d40: 405c 3236 3201 015c 3231 3141 405c 3236 @\262..\211A@\26 │ │ │ +00007d50: 3201 025c 3331 3201 385c 3236 3201 015c 2..\312.8\262..\ │ │ │ +00007d60: 3332 3304 535f 5c5c 035c 3331 3256 5c32 323.S_\\.\312V\2 │ │ │ +00007d70: 3033 5c33 3634 005c 3231 315c 3332 345c 03\364.\211\324\ │ │ │ +00007d80: 3331 3406 065f 5c5c 5c33 3235 5c32 3435 314.._\\\325\245 │ │ │ +00007d90: 5a5c 3236 3201 015c 3231 315c 3330 3457 Z\262..\211\304W │ │ │ +00007da0: 5c32 3033 5c33 3235 005c 3331 3301 2153 \203\325.\313.!S │ │ │ +00007db0: 5c32 3632 015c 3231 315c 3331 345c 3234 \262.\211\314\24 │ │ │ +00007dc0: 365c 3330 3455 5c32 3035 5c33 3533 005c 6\304U\205\353.\ │ │ │ +00007dd0: 3231 315c 3331 355c 3234 365c 3330 3455 211\315\246\304U │ │ │ +00007de0: 3f5c 3230 365c 3335 3300 5c32 3131 5c33 ?\206\353.\211\3 │ │ │ +00007df0: 3136 5c32 3436 5c33 3034 555c 3236 3201 16\246\304U\262. │ │ │ +00007e00: 5c32 3033 5c33 3634 005c 3231 3154 5c32 \203\364.\211T\2 │ │ │ +00007e10: 3632 015c 3236 365c 3230 345c 3332 3603 62.\266\204\326. │ │ │ +00007e20: 5f03 5c33 3134 5c32 3435 045c 3331 355c _.\314\245.\315\ │ │ │ +00007e30: 3234 355b 055c 3331 365c 3234 3525 5c32 245[.\316\245%\2 │ │ │ +00007e40: 3032 5c33 3135 015c 3331 3302 5421 5c32 02\315.\313.T!\2 │ │ │ +00007e50: 3632 015c 3332 3703 5c32 3131 5c32 3131 62.\327.\211\211 │ │ │ +00007e60: 405c 3236 3201 015c 3231 3141 405c 3236 @\262..\211A@\26 │ │ │ +00007e70: 3201 025c 3331 3201 385c 3236 3201 015c 2..\312.8\262..\ │ │ │ +00007e80: 3332 3304 535f 5c5c 035c 3331 3256 5c32 323.S_\\.\312V\2 │ │ │ +00007e90: 3033 6401 5c32 3131 5c33 3234 5c33 3134 03d.\211\324\314 │ │ │ +00007ea0: 0606 5f5c 5c5c 3332 355c 3234 355a 5c32 .._\\\325\245Z\2 │ │ │ +00007eb0: 3632 0101 5c32 3131 5c33 3034 575c 3230 62..\211\304W\20 │ │ │ +00007ec0: 3345 015c 3331 3301 2153 5c32 3632 015c 3E.\313.!S\262.\ │ │ │ +00007ed0: 3231 315c 3331 345c 3234 365c 3330 3455 211\314\246\304U │ │ │ +00007ee0: 5c32 3035 5b01 5c32 3131 5c33 3135 5c32 \205[.\211\315\2 │ │ │ +00007ef0: 3436 5c33 3034 553f 5c32 3036 5b01 5c32 46\304U?\206[.\2 │ │ │ +00007f00: 3131 5c33 3136 5c32 3436 5c33 3034 555c 11\316\246\304U\ │ │ │ +00007f10: 3236 3201 5c32 3033 6401 5c32 3131 545c 262.\203d.\211T\ │ │ │ +00007f20: 3236 3201 5c32 3636 5c32 3034 5c33 3236 262.\266\204\326 │ │ │ +00007f30: 035f 035c 3331 345c 3234 3504 5c33 3135 ._.\314\245.\315 │ │ │ +00007f40: 5c32 3435 5b05 5c33 3136 5c32 3435 5c33 \245[.\316\245\3 │ │ │ +00007f50: 3330 5c32 3131 5c32 3131 405c 3236 3201 30\211\211@\262. │ │ │ +00007f60: 015c 3231 3141 405c 3236 3201 025c 3331 .\211A@\262..\31 │ │ │ +00007f70: 3201 385c 3236 3201 015c 3332 3304 535f 2.8\262..\323.S_ │ │ │ +00007f80: 5c5c 035c 3331 3256 5c32 3033 5c33 3131 \\.\312V\203\311 │ │ │ +00007f90: 015c 3231 315c 3332 345c 3331 3406 065f .\211\324\314.._ │ │ │ +00007fa0: 5c5c 5c33 3235 5c32 3435 5a5c 3236 3201 \\\325\245Z\262. │ │ │ +00007fb0: 015c 3231 315c 3330 3457 5c32 3033 5c32 .\211\304W\203\2 │ │ │ +00007fc0: 3532 015c 3331 3301 2153 5c32 3632 015c 52.\313.!S\262.\ │ │ │ +00007fd0: 3231 315c 3331 345c 3234 365c 3330 3455 211\314\246\304U │ │ │ +00007fe0: 5c32 3035 5c33 3030 015c 3231 315c 3331 \205\300.\211\31 │ │ │ +00007ff0: 355c 3234 365c 3330 3455 3f5c 3230 365c 5\246\304U?\206\ │ │ │ +00008000: 3330 3001 5c32 3131 5c33 3136 5c32 3436 300.\211\316\246 │ │ │ +00008010: 5c33 3034 555c 3236 3201 5c32 3033 5c33 \304U\262.\203\3 │ │ │ +00008020: 3131 015c 3231 3154 5c32 3632 015c 3236 11.\211T\262.\26 │ │ │ +00008030: 365c 3230 3426 065c 3236 365c 3230 3321 6\204&.\266\203! │ │ │ +00008040: 5c33 3132 0138 5c32 3632 015c 3333 315c \312.8\262.\331\ │ │ │ +00008050: 3333 3202 5c33 3333 5c32 3436 5f5c 5c5c 332.\333\246_\\\ │ │ │ +00008060: 3333 345c 3234 365c 3333 355c 3331 345c 334\246\335\314\ │ │ │ +00008070: 3333 3304 4521 015a 5c33 3336 5c33 3034 333.E!.Z\336\304 │ │ │ +00008080: 025c 3333 375c 5c5c 225c 3334 3001 0609 .\337\\\"\340... │ │ │ +00008090: 5c32 3036 5c33 3634 015c 3330 345c 5c21 \206\364.\304\\! │ │ │ +000080a0: 5c33 3431 0121 5c32 3035 0502 5c32 3131 \341.!\205..\211 │ │ │ +000080b0: 0608 5c32 3036 0302 5c33 3432 4443 5c32 ..\206..\342DC\2 │ │ │ +000080c0: 3037 2220 5b64 6973 706c 6179 6564 2d6d 07" [displayed-m │ │ │ +000080d0: 6f6e 7468 2064 6973 706c 6179 6564 2d79 onth displayed-y │ │ │ +000080e0: 6561 7220 3132 206e 696c 2030 202b 202d ear 12 nil 0 + - │ │ │ +000080f0: 3120 3120 6d6f 6420 6361 6c65 6e64 6172 1 1 mod calendar │ │ │ +00008100: 2d6a 756c 6961 6e2d 6672 6f6d 2d61 6273 -julian-from-abs │ │ │ +00008110: 6f6c 7574 6520 3220 6162 7320 3420 3130 olute 2 abs 4 10 │ │ │ +00008120: 3020 3430 3020 3239 205b 3331 2032 3820 0 400 29 [31 28 │ │ │ +00008130: 3331 2033 3020 3331 2033 3020 3331 2033 31 30 31 30 31 3 │ │ │ +00008140: 3120 3330 2033 3120 3330 2033 315d 2075 1 30 31 30 31] u │ │ │ +00008150: 7365 722d 6572 726f 7220 2254 6865 7265 ser-error "There │ │ │ +00008160: 2077 6173 206e 6f20 7965 6172 207a 6572 was no year zer │ │ │ +00008170: 6f22 2033 3120 3233 2031 3020 3336 3520 o" 31 23 10 365 │ │ │ +00008180: 2d20 2831 3220 3331 202d 3129 2031 3420 - (12 31 -1) 14 │ │ │ +00008190: 3131 2031 3920 3330 2063 616c 656e 6461 11 19 30 calenda │ │ │ +000081a0: 722d 6a75 6c69 616e 2d74 6f2d 6162 736f r-julian-to-abso │ │ │ +000081b0: 6c75 7465 2063 616c 656e 6461 722d 6461 lute calendar-da │ │ │ +000081c0: 796e 616d 652d 6f6e 2d6f 722d 6265 666f yname-on-or-befo │ │ │ +000081d0: 7265 2037 2063 616c 656e 6461 722d 6772 re 7 calendar-gr │ │ │ +000081e0: 6567 6f72 6961 6e2d 6672 6f6d 2d61 6273 egorian-from-abs │ │ │ +000081f0: 6f6c 7574 6520 6361 6c65 6e64 6172 2d64 olute calendar-d │ │ │ +00008200: 6174 652d 6973 2d76 6973 6962 6c65 2d70 ate-is-visible-p │ │ │ +00008210: 2022 5061 7363 6861 2028 4772 6565 6b20 "Pascha (Greek │ │ │ +00008220: 4f72 7468 6f64 6f78 2045 6173 7465 7229 Orthodox Easter) │ │ │ +00008230: 225d 2032 3320 2823 2420 2e20 3331 3131 "] 23 (#$ . 3111 │ │ │ +00008240: 3029 5d29 0a28 7072 6f76 6964 6520 2768 0)]).(provide 'h │ │ │ +00008250: 6f6c 6964 6179 7329 0a olidays). │ │ ├── ./usr/share/emacs/27.1/lisp/calendar/icalendar.elc │ │ │ @@ -914,2807 +914,2804 @@ │ │ │ 00003910: 210a 0a28 666e 2049 534f 4441 5445 5449 !..(fn ISODATETI │ │ │ 00003920: 4d45 5354 5249 4e47 2026 6f70 7469 6f6e MESTRING &option │ │ │ 00003930: 616c 2044 4159 2d53 4849 4654 205a 4f4e al DAY-SHIFT ZON │ │ │ 00003940: 4529 1f0a 2864 6566 616c 6961 7320 2769 E)..(defalias 'i │ │ │ 00003950: 6361 6c65 6e64 6172 2d2d 6465 636f 6465 calendar--decode │ │ │ 00003960: 2d69 736f 6461 7465 7469 6d65 2023 5b37 -isodatetime #[7 │ │ │ 00003970: 3639 2022 5c33 3030 0321 5c32 3130 025c 69 "\300.!\210.\ │ │ │ -00003980: 3230 3501 025c 3330 315c 3330 3204 5c33 205..\301\302.\3 │ │ │ -00003990: 3033 5c33 3034 2321 5c33 3031 5c33 3032 03\304#!\301\302 │ │ │ -000039a0: 055c 3330 345c 3330 3523 215c 3330 315c .\304\305#!\301\ │ │ │ -000039b0: 3330 3206 065c 3330 355c 3330 3623 215c 302..\305\306#!\ │ │ │ -000039c0: 3330 335c 3231 315c 3231 3106 0847 5c33 303\211\211..G\3 │ │ │ -000039d0: 3037 565c 3230 333d 005c 3330 315c 3330 07V\203=.\301\30 │ │ │ -000039e0: 3206 5c6e 5c33 3130 5c33 3131 2321 5c32 2.\n\310\311#!\2 │ │ │ -000039f0: 3632 035c 3330 315c 3330 3206 5c6e 5c33 62.\301\302.\n\3 │ │ │ -00003a00: 3131 5c33 3132 2321 5c32 3632 0206 0847 11\312#!\262...G │ │ │ -00003a10: 5c33 3133 565c 3230 334f 005c 3330 315c \313V\203O.\301\ │ │ │ -00003a20: 3330 3206 5c6e 5c33 3132 5c33 3134 2321 302.\n\312\314#! │ │ │ -00003a30: 5c32 3632 0106 0847 5c33 3134 565c 3230 \262...G\314V\20 │ │ │ -00003a40: 3364 005c 3331 355c 3331 3606 5c6e 5c33 3d.\315\316.\n\3 │ │ │ -00003a50: 3134 485c 225c 3230 3364 005c 3331 375c 14H\"\203d.\317\ │ │ │ -00003a60: 3236 3207 0607 5c32 3033 5c33 3331 015c 262...\203\331.\ │ │ │ -00003a70: 3332 3005 0506 0845 5c32 3131 5c33 3231 320....E\211\321 │ │ │ -00003a80: 0138 5c32 3632 015c 3332 3201 5c33 3033 .8\262.\322.\303 │ │ │ -00003a90: 555c 3230 335c 3230 3200 5c33 3233 5c33 U\203\202.\323\3 │ │ │ -00003aa0: 3234 215c 3230 325c 3330 3201 015c 3330 24!\202\302..\30 │ │ │ -00003ab0: 3356 5c32 3033 5c33 3730 0001 535c 3236 3V\203\370..S\26 │ │ │ -00003ac0: 3201 5c33 3235 035c 3231 315c 3231 3140 2.\325.\211\211@ │ │ │ -00003ad0: 5c32 3632 0101 5c32 3131 4140 5c32 3632 \262..\211A@\262 │ │ │ -00003ae0: 0102 5c33 3231 0138 5c32 3632 0101 5c33 ..\321.8\262..\3 │ │ │ -00003af0: 3236 0453 5f5c 5c03 5c33 3231 565c 3230 26.S_\\.\321V\20 │ │ │ -00003b00: 335c 3334 3300 5c32 3131 5c33 3237 5c33 3\343.\211\327\3 │ │ │ -00003b10: 3034 0606 5f5c 5c5c 3333 305c 3234 355a 04.._\\\330\245Z │ │ │ -00003b20: 5c32 3632 0101 5c32 3131 5c33 3033 575c \262..\211\303W\ │ │ │ -00003b30: 3230 335c 3330 3400 5c33 3331 0121 535c 203\304.\331.!S\ │ │ │ -00003b40: 3236 3201 5c32 3131 5c33 3034 5c32 3436 262.\211\304\246 │ │ │ -00003b50: 5c33 3033 555c 3230 355c 3333 3200 5c32 \303U\205\332.\2 │ │ │ -00003b60: 3131 5c33 3332 5c32 3436 5c33 3033 553f 11\332\246\303U? │ │ │ -00003b70: 5c32 3036 5c33 3332 005c 3231 315c 3333 \206\332.\211\33 │ │ │ -00003b80: 335c 3234 365c 3330 3355 5c32 3632 015c 3\246\303U\262.\ │ │ │ -00003b90: 3230 335c 3334 3300 5c32 3131 545c 3236 203\343.\211T\26 │ │ │ -00003ba0: 3201 5c32 3636 5c32 3033 5c32 3632 015c 2.\266\203\262.\ │ │ │ -00003bb0: 3333 3403 5f03 5c33 3034 5c32 3435 045c 334._.\304\245.\ │ │ │ -00003bc0: 3333 325c 3234 355b 055c 3333 335c 3234 332\245[.\333\24 │ │ │ -00003bd0: 3525 5c32 3032 5c33 3032 015c 3333 3102 5%\202\302.\331. │ │ │ -00003be0: 5421 5c32 3632 015c 3333 3503 5c32 3131 T!\262.\335.\211 │ │ │ -00003bf0: 5c32 3131 405c 3236 3201 015c 3231 3141 \211@\262..\211A │ │ │ -00003c00: 405c 3236 3201 025c 3332 3101 385c 3236 @\262..\321.8\26 │ │ │ -00003c10: 3201 015c 3332 3604 535f 5c5c 035c 3332 2..\326.S_\\.\32 │ │ │ -00003c20: 3156 5c32 3033 5501 5c32 3131 5c33 3237 1V\203U.\211\327 │ │ │ -00003c30: 5c33 3034 0606 5f5c 5c5c 3333 305c 3234 \304.._\\\330\24 │ │ │ -00003c40: 355a 5c32 3632 0101 5c32 3131 5c33 3033 5Z\262..\211\303 │ │ │ -00003c50: 575c 3230 3336 015c 3333 3101 2153 5c32 W\2036.\331.!S\2 │ │ │ -00003c60: 3632 015c 3231 315c 3330 345c 3234 365c 62.\211\304\246\ │ │ │ -00003c70: 3330 3355 5c32 3035 4c01 5c32 3131 5c33 303U\205L.\211\3 │ │ │ -00003c80: 3332 5c32 3436 5c33 3033 553f 5c32 3036 32\246\303U?\206 │ │ │ -00003c90: 4c01 5c32 3131 5c33 3333 5c32 3436 5c33 L.\211\333\246\3 │ │ │ -00003ca0: 3033 555c 3236 3201 5c32 3033 5501 5c32 03U\262.\203U.\2 │ │ │ -00003cb0: 3131 545c 3236 3201 5c32 3636 5c32 3033 11T\262.\266\203 │ │ │ -00003cc0: 5c32 3632 015c 3333 3403 5f03 5c33 3034 \262.\334._.\304 │ │ │ -00003cd0: 5c32 3435 045c 3333 325c 3234 355b 055c \245.\332\245[.\ │ │ │ -00003ce0: 3333 335c 3234 355c 3333 365c 3231 315c 333\245\336\211\ │ │ │ -00003cf0: 3231 3140 5c32 3632 0101 5c32 3131 4140 211@\262..\211A@ │ │ │ -00003d00: 5c32 3632 0102 5c33 3231 0138 5c32 3632 \262..\321.8\262 │ │ │ -00003d10: 0101 5c33 3236 0453 5f5c 5c03 5c33 3231 ..\326.S_\\.\321 │ │ │ -00003d20: 565c 3230 335c 3237 3401 5c32 3131 5c33 V\203\274.\211\3 │ │ │ -00003d30: 3237 5c33 3034 0606 5f5c 5c5c 3333 305c 27\304.._\\\330\ │ │ │ -00003d40: 3234 355a 5c32 3632 0101 5c32 3131 5c33 245Z\262..\211\3 │ │ │ -00003d50: 3033 575c 3230 335c 3233 3501 5c33 3331 03W\203\235.\331 │ │ │ -00003d60: 0121 535c 3236 3201 5c32 3131 5c33 3034 .!S\262.\211\304 │ │ │ -00003d70: 5c32 3436 5c33 3033 555c 3230 355c 3236 \246\303U\205\26 │ │ │ -00003d80: 3301 5c32 3131 5c33 3332 5c32 3436 5c33 3.\211\332\246\3 │ │ │ -00003d90: 3033 553f 5c32 3036 5c32 3633 015c 3231 03U?\206\263.\21 │ │ │ -00003da0: 315c 3333 335c 3234 365c 3330 3355 5c32 1\333\246\303U\2 │ │ │ -00003db0: 3632 015c 3230 335c 3237 3401 5c32 3131 62.\203\274.\211 │ │ │ -00003dc0: 545c 3236 3201 5c32 3636 5c32 3033 5c32 T\262.\266\203\2 │ │ │ -00003dd0: 3632 0126 065c 3236 365c 3230 325c 3236 62.&.\266\202\26 │ │ │ -00003de0: 3201 0609 5c5c 215c 3231 3140 5c32 3632 2...\\!\211@\262 │ │ │ -00003df0: 065c 3231 3141 405c 3236 3205 5c33 3231 .\211A@\262.\321 │ │ │ -00003e00: 0138 5c32 3632 075c 3231 305c 3231 3102 .8\262.\210\211. │ │ │ -00003e10: 0406 0606 0806 5c6e 5c33 3232 5c33 3337 ......\n\322\337 │ │ │ -00003e20: 060e 5c32 3537 095c 3334 3031 5c33 3635 ..\257.\3401\365 │ │ │ -00003e30: 015c 3334 315c 3334 3202 2121 305c 3230 .\341\342.!!0\20 │ │ │ -00003e40: 325c 3337 3501 5c32 3130 5c33 3433 5c33 2\375.\210\343\3 │ │ │ -00003e50: 3434 060b 5c22 5c32 3130 5c32 3131 5c32 44..\"\210\211\2 │ │ │ -00003e60: 3632 015c 3236 365c 3230 365c 3230 3722 62.\266\206\207" │ │ │ -00003e70: 205b 6963 616c 656e 6461 722d 2d64 6d73 [icalendar--dms │ │ │ -00003e80: 6720 7265 6164 2073 7562 7374 7269 6e67 g read substring │ │ │ -00003e90: 2030 2034 2036 2038 2031 3220 3920 3131 0 4 6 8 12 9 11 │ │ │ -00003ea0: 2031 3320 3134 2031 3520 6368 6172 2d65 13 14 15 char-e │ │ │ -00003eb0: 7175 616c 2039 3020 7420 6361 6c65 6e64 qual 90 t calend │ │ │ -00003ec0: 6172 2d67 7265 676f 7269 616e 2d66 726f ar-gregorian-fro │ │ │ -00003ed0: 6d2d 6162 736f 6c75 7465 2032 206e 696c m-absolute 2 nil │ │ │ -00003ee0: 2075 7365 722d 6572 726f 7220 2254 6865 user-error "The │ │ │ -00003ef0: 7265 2077 6173 206e 6f20 7965 6172 207a re was no year z │ │ │ -00003f00: 6572 6f22 202b 2033 3120 3233 2031 3020 ero" + 31 23 10 │ │ │ -00003f10: 6162 7320 3130 3020 3430 3020 3336 3520 abs 100 400 365 │ │ │ -00003f20: 2d20 2831 3220 3331 202d 3129 202d 3120 - (12 31 -1) -1 │ │ │ -00003f30: 2865 7272 6f72 2920 6465 636f 6465 2d74 (error) decode-t │ │ │ -00003f40: 696d 6520 656e 636f 6465 2d74 696d 6520 ime encode-time │ │ │ -00003f50: 6d65 7373 6167 6520 2243 616e 6e6f 7420 message "Cannot │ │ │ -00003f60: 6465 636f 6465 205c 2225 735c 2222 5d20 decode \"%s\""] │ │ │ -00003f70: 3238 2028 2324 202e 2031 3431 3733 295d 28 (#$ . 14173)] │ │ │ -00003f80: 290a 2340 3434 3520 436f 6e76 6572 7420 ).#@445 Convert │ │ │ -00003f90: 4953 4f44 5552 4154 494f 4e53 5452 494e ISODURATIONSTRIN │ │ │ -00003fa0: 4720 696e 746f 2066 6f72 6d61 7420 7072 G into format pr │ │ │ -00003fb0: 6f76 6964 6564 2062 7920 6064 6563 6f64 ovided by `decod │ │ │ -00003fc0: 652d 7469 6d65 272e 0a43 6f6e 7665 7274 e-time'..Convert │ │ │ -00003fd0: 7320 6672 6f6d 2049 534f 2d38 3630 3120 s from ISO-8601 │ │ │ -00003fe0: 746f 2045 6d61 6373 2072 6570 7265 7365 to Emacs represe │ │ │ -00003ff0: 6e74 6174 696f 6e2e 2020 4966 2049 534f ntation. If ISO │ │ │ -00004000: 4455 5241 5449 4f4e 5354 5249 4e47 0a73 DURATIONSTRING.s │ │ │ -00004010: 7065 6369 6669 6573 2055 5443 2074 696d pecifies UTC tim │ │ │ -00004020: 6520 2874 7261 696c 696e 6720 6c65 7474 e (trailing lett │ │ │ -00004030: 6572 205a 2920 7468 6520 6465 636f 6465 er Z) the decode │ │ │ -00004040: 6420 7469 6d65 2069 7320 6769 7665 6e20 d time is given │ │ │ -00004050: 696e 0a74 6865 206c 6f63 616c 2074 696d in.the local tim │ │ │ -00004060: 6520 7a6f 6e65 210a 0a4f 7074 696f 6e61 e zone!..Optiona │ │ │ -00004070: 6c20 6172 6775 6d65 6e74 2044 5552 4154 l argument DURAT │ │ │ -00004080: 494f 4e2d 434f 5252 4543 5449 4f4e 2073 ION-CORRECTION s │ │ │ -00004090: 686f 7274 656e 7320 7265 7375 6c74 2062 hortens result b │ │ │ -000040a0: 7920 6f6e 6520 6461 792e 0a0a 4649 584d y one day...FIXM │ │ │ -000040b0: 453a 2054 5a49 442d 6174 7472 6962 7574 E: TZID-attribut │ │ │ -000040c0: 6573 2061 7265 2069 676e 6f72 6564 2e2e es are ignored.. │ │ │ -000040d0: 2e2e 210a 4649 584d 453a 206d 756c 7469 ..!.FIXME: multi │ │ │ -000040e0: 706c 6520 636f 6d6d 612d 7365 7061 7261 ple comma-separa │ │ │ -000040f0: 7465 6420 7661 6c75 6573 2073 686f 756c ted values shoul │ │ │ -00004100: 6420 6265 2061 6c6c 6f77 6564 210a 0a28 d be allowed!..( │ │ │ -00004110: 666e 2049 534f 4455 5241 5449 4f4e 5354 fn ISODURATIONST │ │ │ -00004120: 5249 4e47 2026 6f70 7469 6f6e 616c 2044 RING &optional D │ │ │ -00004130: 5552 4154 494f 4e2d 434f 5252 4543 5449 URATION-CORRECTI │ │ │ -00004140: 4f4e 291f 0a28 6465 6661 6c69 6173 2027 ON)..(defalias ' │ │ │ -00004150: 6963 616c 656e 6461 722d 2d64 6563 6f64 icalendar--decod │ │ │ -00004160: 652d 6973 6f64 7572 6174 696f 6e20 235b e-isoduration #[ │ │ │ -00004170: 3531 3320 2201 5c32 3035 5c32 3530 005c 513 ".\205\250.\ │ │ │ -00004180: 3330 3020 5c33 3031 5c33 3032 5c33 3033 300 \301\302\303 │ │ │ -00004190: 5c33 3034 5c33 3035 0521 5c33 3036 5c22 \304\305.!\306\" │ │ │ -000041a0: 5c33 3037 245c 3231 365c 3331 305c 3331 \307$\216\310\31 │ │ │ -000041b0: 3104 5c22 5c32 3130 5c33 3032 5c32 3131 1.\"\210\302\211 │ │ │ -000041c0: 5c32 3131 5c32 3131 5c32 3131 5c32 3131 \211\211\211\211 │ │ │ -000041d0: 5c33 3132 5c32 3234 5c32 3033 3a00 5c33 \312\224\203:.\3 │ │ │ -000041e0: 3133 5c33 3134 065c 6e5c 3330 375c 3232 13\314.\n\307\22 │ │ │ -000041f0: 345c 3330 375c 3232 3523 215c 3236 3203 4\307\225#!\262. │ │ │ -00004200: 0607 5c32 3033 5c32 3333 0002 535c 3236 ..\203\233..S\26 │ │ │ -00004210: 3203 5c32 3032 5c32 3333 005c 3331 355c 2.\202\233.\315\ │ │ │ -00004220: 3232 345c 3230 335c 3231 3000 5c33 3136 224\203\210.\316 │ │ │ -00004230: 5c32 3234 5c32 3033 5200 5c33 3137 5c33 \224\203R.\317\3 │ │ │ -00004240: 3133 5c33 3134 060b 5c33 3230 5c32 3234 13\314..\320\224 │ │ │ -00004250: 5c33 3230 5c32 3235 2321 5f5c 3236 3203 \320\225#!_\262. │ │ │ -00004260: 5c33 3137 5c32 3234 5c32 3033 6300 5c33 \317\224\203c.\3 │ │ │ -00004270: 3133 5c33 3134 065c 6e5c 3332 315c 3232 13\314.\n\321\22 │ │ │ -00004280: 345c 3332 315c 3232 3523 215c 3236 3204 4\321\225#!\262. │ │ │ -00004290: 5c33 3232 5c32 3234 5c32 3033 7400 5c33 \322\224\203t.\3 │ │ │ -000042a0: 3133 5c33 3134 065c 6e5c 3332 335c 3232 13\314.\n\323\22 │ │ │ -000042b0: 345c 3332 335c 3232 3523 215c 3236 3205 4\323\225#!\262. │ │ │ -000042c0: 5c33 3234 5c32 3234 5c32 3033 5c32 3333 \324\224\203\233 │ │ │ -000042d0: 005c 3331 335c 3331 3406 5c6e 5c33 3235 .\313\314.\n\325 │ │ │ -000042e0: 5c32 3234 5c33 3235 5c32 3235 2321 5c32 \224\325\225#!\2 │ │ │ -000042f0: 3632 065c 3230 325c 3233 3300 5c33 3236 62.\202\233.\326 │ │ │ -00004300: 5c32 3234 5c32 3033 5c32 3333 005c 3331 \224\203\233.\31 │ │ │ -00004310: 375c 3331 335c 3331 3406 0b5c 3332 375c 7\313\314..\327\ │ │ │ -00004320: 3232 345c 3332 375c 3232 3523 215f 5c32 224\327\225#!_\2 │ │ │ -00004330: 3632 0305 0505 0505 055c 3235 3706 5c32 62.......\257.\2 │ │ │ -00004340: 3636 5c32 3036 295c 3236 3201 5c32 3037 66\206)\262.\207 │ │ │ -00004350: 2220 5b6d 6174 6368 2d64 6174 6120 6d61 " [match-data ma │ │ │ -00004360: 6b65 2d62 7974 652d 636f 6465 2030 2022 ke-byte-code 0 " │ │ │ -00004370: 5c33 3031 5c33 3030 5c33 3032 5c22 5c32 \301\300\302\"\2 │ │ │ -00004380: 3037 2220 7663 6f6e 6361 7420 7665 6374 07" vconcat vect │ │ │ -00004390: 6f72 205b 7365 742d 6d61 7463 682d 6461 or [set-match-da │ │ │ -000043a0: 7461 2065 7661 706f 7261 7465 5d20 3320 ta evaporate] 3 │ │ │ -000043b0: 7374 7269 6e67 2d6d 6174 6368 2022 5e50 string-match "^P │ │ │ -000043c0: 5b2b 2d5d 3f5c 5c28 5c5c 285c 5c28 5b30 [+-]?\\(\\(\\([0 │ │ │ -000043d0: 2d39 5d2b 5c5c 2944 5c5c 295c 5c7c 5c5c -9]+\\)D\\)\\|\\ │ │ │ -000043e0: 285c 5c28 5c5c 285b 302d 395d 2b5c 5c29 (\\(\\([0-9]+\\) │ │ │ -000043f0: 445c 5c29 3f54 5c5c 285c 5c28 5b30 2d39 D\\)?T\\(\\([0-9 │ │ │ -00004400: 5d2b 5c5c 2948 5c5c 293f 5c5c 285c 5c28 ]+\\)H\\)?\\(\\( │ │ │ -00004410: 5b30 2d39 5d2b 5c5c 294d 5c5c 293f 5c5c [0-9]+\\)M\\)?\\ │ │ │ -00004420: 285c 5c28 5b30 2d39 5d2b 5c5c 2953 5c5c (\\([0-9]+\\)S\\ │ │ │ -00004430: 293f 5c5c 295c 5c7c 5c5c 285c 5c28 5b30 )?\\)\\|\\(\\([0 │ │ │ -00004440: 2d39 5d2b 5c5c 2957 5c5c 295c 5c29 2422 -9]+\\)W\\)\\)$" │ │ │ -00004450: 2032 2072 6561 6420 7375 6273 7472 696e 2 read substrin │ │ │ -00004460: 6720 3420 3520 3720 3620 3820 3920 3130 g 4 5 7 6 8 9 10 │ │ │ -00004470: 2031 3120 3132 2031 3320 3134 5d20 3135 11 12 13 14] 15 │ │ │ -00004480: 2028 2324 202e 2031 3632 3634 295d 290a (#$ . 16264)]). │ │ │ -00004490: 2340 3134 3320 4164 6420 5449 4d45 3120 #@143 Add TIME1 │ │ │ -000044a0: 746f 2054 494d 4532 2e0a 426f 7468 2074 to TIME2..Both t │ │ │ -000044b0: 696d 6573 206d 7573 7420 6265 2067 6976 imes must be giv │ │ │ -000044c0: 656e 2069 6e20 6465 636f 6465 6420 666f en in decoded fo │ │ │ -000044d0: 726d 2e20 204f 6e65 206f 6620 7468 6573 rm. One of thes │ │ │ -000044e0: 6520 7469 6d65 7320 6d75 7374 2062 650a e times must be. │ │ │ -000044f0: 7661 6c69 6420 2879 6561 7220 3e20 3139 valid (year > 19 │ │ │ -00004500: 3030 206f 7220 736f 6d65 7468 696e 6729 00 or something) │ │ │ -00004510: 2e0a 0a28 666e 2054 494d 4531 2054 494d ...(fn TIME1 TIM │ │ │ -00004520: 4532 291f 0a28 6465 6661 6c69 6173 2027 E2)..(defalias ' │ │ │ -00004530: 6963 616c 656e 6461 722d 2d61 6464 2d64 icalendar--add-d │ │ │ -00004540: 6563 6f64 6564 2d74 696d 6573 2023 5b35 ecoded-times #[5 │ │ │ -00004550: 3134 2022 5c33 3030 5c33 3031 5c33 3032 14 "\300\301\302 │ │ │ -00004560: 5c33 3033 0540 0540 5c22 5c33 3034 5c22 \303.@.@\"\304\" │ │ │ -00004570: 0441 4004 4140 5c5c 5c33 3035 0606 385c .A@.A@\\\305..8\ │ │ │ -00004580: 3330 3506 0638 5c5c 5c33 3036 0607 385c 305..8\\\306..8\ │ │ │ -00004590: 3330 3606 0738 5c5c 5c33 3037 0608 385c 306..8\\\307..8\ │ │ │ -000045a0: 3330 3706 0838 5c5c 5c33 3130 0609 385c 307..8\\\310..8\ │ │ │ -000045b0: 3331 3006 0938 5c5c 5c33 3131 5c32 3131 310..8\\\311\211 │ │ │ -000045c0: 2608 215c 3230 3722 205b 6465 636f 6465 &.!\207" [decode │ │ │ -000045d0: 2d74 696d 6520 656e 636f 6465 2d74 696d -time encode-tim │ │ │ -000045e0: 6520 7469 6d65 2d63 6f6e 7665 7274 2074 e time-convert t │ │ │ -000045f0: 696d 652d 6164 6420 696e 7465 6765 7220 ime-add integer │ │ │ -00004600: 3220 3320 3420 3520 6e69 6c5d 2031 3220 2 3 4 5 nil] 12 │ │ │ -00004610: 2823 2420 2e20 3137 3535 3829 5d29 0a23 (#$ . 17558)]).# │ │ │ -00004620: 4032 3532 2043 6f6e 7665 7274 2074 6865 @252 Convert the │ │ │ -00004630: 2064 6563 6f64 6564 2044 4154 4554 494d decoded DATETIM │ │ │ -00004640: 4520 746f 2041 6d65 7269 6361 6e2d 7374 E to American-st │ │ │ -00004650: 796c 6520 666f 726d 6174 2e0a 4f70 7469 yle format..Opti │ │ │ -00004660: 6f6e 616c 2061 7267 756d 656e 7420 5345 onal argument SE │ │ │ -00004670: 5041 5241 544f 5220 6769 7665 7320 7468 PARATOR gives th │ │ │ -00004680: 6520 7365 7061 7261 746f 7220 6265 7477 e separator betw │ │ │ -00004690: 6565 6e20 6d6f 6e74 682c 0a64 6179 2c20 een month,.day, │ │ │ -000046a0: 616e 6420 7965 6172 2e20 2049 6620 6e69 and year. If ni │ │ │ -000046b0: 6c20 6120 626c 616e 6b20 6368 6172 6163 l a blank charac │ │ │ -000046c0: 7465 7220 6973 2075 7365 6420 6173 2073 ter is used as s │ │ │ -000046d0: 6570 6172 6174 6f72 2e0a 416d 6572 6963 eparator..Americ │ │ │ -000046e0: 616e 2066 6f72 6d61 743a 2022 6d6f 6e74 an format: "mont │ │ │ -000046f0: 6820 6461 7920 7965 6172 222e 0a0a 2866 h day year"...(f │ │ │ -00004700: 6e20 4441 5445 5449 4d45 2026 6f70 7469 n DATETIME &opti │ │ │ -00004710: 6f6e 616c 2053 4550 4152 4154 4f52 291f onal SEPARATOR). │ │ │ -00004720: 0a28 6465 6661 6c69 6173 2027 6963 616c .(defalias 'ical │ │ │ -00004730: 656e 6461 722d 2d64 6174 6574 696d 652d endar--datetime- │ │ │ -00004740: 746f 2d61 6d65 7269 6361 6e2d 6461 7465 to-american-date │ │ │ -00004750: 2023 5b35 3133 2022 015c 3230 351d 005c #[513 ".\205..\ │ │ │ -00004760: 3330 305c 3330 315c 3330 3204 3803 5c32 300\301\302.8.\2 │ │ │ -00004770: 3036 0e00 5c33 3033 5c33 3034 0606 3805 06..\303\304..8. │ │ │ -00004780: 5c32 3036 1700 5c33 3033 5c33 3035 0608 \206..\303\305.. │ │ │ -00004790: 3826 065c 3230 3722 205b 666f 726d 6174 8&.\207" [format │ │ │ -000047a0: 2022 2564 2573 2564 2573 2564 2220 3420 "%d%s%d%s%d" 4 │ │ │ -000047b0: 2220 2220 3320 355d 2031 3020 2823 2420 " " 3 5] 10 (#$ │ │ │ -000047c0: 2e20 3137 3935 3729 5d29 0a28 6279 7465 . 17957)]).(byte │ │ │ -000047d0: 2d63 6f64 6520 225c 3330 305c 3330 315c -code "\300\301\ │ │ │ -000047e0: 3330 325c 3330 3323 5c32 3130 5c33 3034 302\303#\210\304 │ │ │ -000047f0: 5c33 3031 5c33 3032 5c33 3035 235c 3230 \301\302\305#\20 │ │ │ -00004800: 3722 205b 6465 6661 6c69 6173 2069 6361 7" [defalias ica │ │ │ -00004810: 6c65 6e64 6172 2d2d 6461 7465 7469 6d65 lendar--datetime │ │ │ -00004820: 2d74 6f2d 6e6f 6e65 7572 6f70 6561 6e2d -to-noneuropean- │ │ │ -00004830: 6461 7465 2069 6361 6c65 6e64 6172 2d2d date icalendar-- │ │ │ -00004840: 6461 7465 7469 6d65 2d74 6f2d 616d 6572 datetime-to-amer │ │ │ -00004850: 6963 616e 2d64 6174 6520 6e69 6c20 6d61 ican-date nil ma │ │ │ -00004860: 6b65 2d6f 6273 6f6c 6574 6520 2269 6361 ke-obsolete "ica │ │ │ -00004870: 6c65 6e64 6172 2030 2e31 3922 5d20 3429 lendar 0.19"] 4) │ │ │ -00004880: 0a23 4032 3532 2043 6f6e 7665 7274 2074 .#@252 Convert t │ │ │ -00004890: 6865 2064 6563 6f64 6564 2044 4154 4554 he decoded DATET │ │ │ -000048a0: 494d 4520 746f 2045 7572 6f70 6561 6e20 IME to European │ │ │ -000048b0: 666f 726d 6174 2e0a 4f70 7469 6f6e 616c format..Optional │ │ │ -000048c0: 2061 7267 756d 656e 7420 5345 5041 5241 argument SEPARA │ │ │ -000048d0: 544f 5220 6769 7665 7320 7468 6520 7365 TOR gives the se │ │ │ -000048e0: 7061 7261 746f 7220 6265 7477 6565 6e20 parator between │ │ │ -000048f0: 6d6f 6e74 682c 0a64 6179 2c20 616e 6420 month,.day, and │ │ │ -00004900: 7965 6172 2e20 2049 6620 6e69 6c20 6120 year. If nil a │ │ │ -00004910: 626c 616e 6b20 6368 6172 6163 7465 7220 blank character │ │ │ -00004920: 6973 2075 7365 6420 6173 2073 6570 6172 is used as separ │ │ │ -00004930: 6174 6f72 2e0a 4575 726f 7065 616e 2066 ator..European f │ │ │ -00004940: 6f72 6d61 743a 2028 6461 7920 6d6f 6e74 ormat: (day mont │ │ │ -00004950: 6820 7965 6172 292e 0a46 4958 4d45 0a0a h year)..FIXME.. │ │ │ -00004960: 2866 6e20 4441 5445 5449 4d45 2026 6f70 (fn DATETIME &op │ │ │ -00004970: 7469 6f6e 616c 2053 4550 4152 4154 4f52 tional SEPARATOR │ │ │ -00004980: 291f 0a28 6465 6661 6c69 6173 2027 6963 )..(defalias 'ic │ │ │ -00004990: 616c 656e 6461 722d 2d64 6174 6574 696d alendar--datetim │ │ │ -000049a0: 652d 746f 2d65 7572 6f70 6561 6e2d 6461 e-to-european-da │ │ │ -000049b0: 7465 2023 5b35 3133 2022 015c 3230 351d te #[513 ".\205. │ │ │ -000049c0: 005c 3330 305c 3330 315c 3330 3204 3803 .\300\301\302.8. │ │ │ -000049d0: 5c32 3036 0e00 5c33 3033 5c33 3034 0606 \206..\303\304.. │ │ │ -000049e0: 3805 5c32 3036 1700 5c33 3033 5c33 3035 8.\206..\303\305 │ │ │ -000049f0: 0608 3826 065c 3230 3722 205b 666f 726d ..8&.\207" [form │ │ │ -00004a00: 6174 2022 2564 2573 2564 2573 2564 2220 at "%d%s%d%s%d" │ │ │ -00004a10: 3320 2220 2220 3420 355d 2031 3020 2823 3 " " 4 5] 10 (# │ │ │ -00004a20: 2420 2e20 3138 3536 3729 5d29 0a23 4032 $ . 18567)]).#@2 │ │ │ -00004a30: 3336 2043 6f6e 7665 7274 2074 6865 2064 36 Convert the d │ │ │ -00004a40: 6563 6f64 6564 2044 4154 4554 494d 4520 ecoded DATETIME │ │ │ -00004a50: 746f 2049 534f 2066 6f72 6d61 742e 0a4f to ISO format..O │ │ │ -00004a60: 7074 696f 6e61 6c20 6172 6775 6d65 6e74 ptional argument │ │ │ -00004a70: 2053 4550 4152 4154 4f52 2067 6976 6573 SEPARATOR gives │ │ │ -00004a80: 2074 6865 2073 6570 6172 6174 6f72 2062 the separator b │ │ │ -00004a90: 6574 7765 656e 206d 6f6e 7468 2c0a 6461 etween month,.da │ │ │ -00004aa0: 792c 2061 6e64 2079 6561 722e 2020 4966 y, and year. If │ │ │ -00004ab0: 206e 696c 2061 2062 6c61 6e6b 2063 6861 nil a blank cha │ │ │ -00004ac0: 7261 6374 6572 2069 7320 7573 6564 2061 racter is used a │ │ │ -00004ad0: 7320 7365 7061 7261 746f 722e 0a49 534f s separator..ISO │ │ │ -00004ae0: 2066 6f72 6d61 743a 2028 7965 6172 206d format: (year m │ │ │ -00004af0: 6f6e 7468 2064 6179 292e 0a0a 2866 6e20 onth day)...(fn │ │ │ -00004b00: 4441 5445 5449 4d45 2026 6f70 7469 6f6e DATETIME &option │ │ │ -00004b10: 616c 2053 4550 4152 4154 4f52 291f 0a28 al SEPARATOR)..( │ │ │ -00004b20: 6465 6661 6c69 6173 2027 6963 616c 656e defalias 'icalen │ │ │ -00004b30: 6461 722d 2d64 6174 6574 696d 652d 746f dar--datetime-to │ │ │ -00004b40: 2d69 736f 2d64 6174 6520 235b 3531 3320 -iso-date #[513 │ │ │ -00004b50: 2201 5c32 3035 1d00 5c33 3030 5c33 3031 ".\205..\300\301 │ │ │ -00004b60: 5c33 3032 0438 035c 3230 360e 005c 3330 \302.8.\206..\30 │ │ │ -00004b70: 335c 3330 3406 0638 055c 3230 3617 005c 3\304..8.\206..\ │ │ │ -00004b80: 3330 335c 3330 3506 0838 2606 5c32 3037 303\305..8&.\207 │ │ │ -00004b90: 2220 5b66 6f72 6d61 7420 2225 6425 7325 " [format "%d%s% │ │ │ -00004ba0: 6425 7325 6422 2035 2022 2022 2034 2033 d%s%d" 5 " " 4 3 │ │ │ -00004bb0: 5d20 3130 2028 2324 202e 2031 3839 3935 ] 10 (#$ . 18995 │ │ │ -00004bc0: 295d 290a 2340 3238 3920 436f 6e76 6572 )]).#@289 Conver │ │ │ -00004bd0: 7420 7468 6520 6465 636f 6465 6420 4441 t the decoded DA │ │ │ -00004be0: 5445 5449 4d45 2074 6f20 6469 6172 7920 TETIME to diary │ │ │ -00004bf0: 666f 726d 6174 2e0a 4f70 7469 6f6e 616c format..Optional │ │ │ -00004c00: 2061 7267 756d 656e 7420 5345 5041 5241 argument SEPARA │ │ │ -00004c10: 544f 5220 6769 7665 7320 7468 6520 7365 TOR gives the se │ │ │ -00004c20: 7061 7261 746f 7220 6265 7477 6565 6e20 parator between │ │ │ -00004c30: 6d6f 6e74 682c 0a64 6179 2c20 616e 6420 month,.day, and │ │ │ -00004c40: 7965 6172 2e20 2049 6620 6e69 6c20 6120 year. If nil a │ │ │ -00004c50: 626c 616e 6b20 6368 6172 6163 7465 7220 blank character │ │ │ -00004c60: 6973 2075 7365 6420 6173 2073 6570 6172 is used as separ │ │ │ -00004c70: 6174 6f72 2e0a 4361 6c6c 2069 6361 6c65 ator..Call icale │ │ │ -00004c80: 6e64 6172 2d2d 6461 7465 7469 6d65 2d74 ndar--datetime-t │ │ │ -00004c90: 6f2d 2a2d 6461 7465 2061 6363 6f72 6469 o-*-date accordi │ │ │ -00004ca0: 6e67 2074 6f20 7468 6520 6375 7272 656e ng to the curren │ │ │ -00004cb0: 740a 6361 6c65 6e64 6172 2064 6174 6520 t.calendar date │ │ │ -00004cc0: 7374 796c 652e 0a0a 2866 6e20 4441 5445 style...(fn DATE │ │ │ -00004cd0: 5449 4d45 2026 6f70 7469 6f6e 616c 2053 TIME &optional S │ │ │ -00004ce0: 4550 4152 4154 4f52 291f 0a28 6465 6661 EPARATOR)..(defa │ │ │ -00004cf0: 6c69 6173 2027 6963 616c 656e 6461 722d lias 'icalendar- │ │ │ -00004d00: 2d64 6174 6574 696d 652d 746f 2d64 6961 -datetime-to-dia │ │ │ -00004d10: 7279 2d64 6174 6520 235b 3531 3320 225c ry-date #[513 "\ │ │ │ -00004d20: 3330 315c 3330 325c 3330 3308 5c22 2102 301\302\303.\"!. │ │ │ -00004d30: 025c 225c 3230 3722 205b 6361 6c65 6e64 .\"\207" [calend │ │ │ -00004d40: 6172 2d64 6174 652d 7374 796c 6520 696e ar-date-style in │ │ │ -00004d50: 7465 726e 2d73 6f66 7420 666f 726d 6174 tern-soft format │ │ │ -00004d60: 2022 6963 616c 656e 6461 722d 2d64 6174 "icalendar--dat │ │ │ -00004d70: 6574 696d 652d 746f 2d25 732d 6461 7465 etime-to-%s-date │ │ │ -00004d80: 225d 2036 2028 2324 202e 2031 3934 3032 "] 6 (#$ . 19402 │ │ │ -00004d90: 295d 290a 2340 3132 3220 4578 7472 6163 )]).#@122 Extrac │ │ │ -00004da0: 7420 7468 6520 7469 6d65 2070 6172 7420 t the time part │ │ │ -00004db0: 6f66 2061 2064 6563 6f64 6564 2044 4154 of a decoded DAT │ │ │ -00004dc0: 4554 494d 4520 696e 746f 2032 342d 686f ETIME into 24-ho │ │ │ -00004dd0: 7572 2066 6f72 6d61 742e 0a4e 6f74 6520 ur format..Note │ │ │ -00004de0: 7468 6174 2074 6869 7320 7369 6c65 6e74 that this silent │ │ │ -00004df0: 6c79 2069 676e 6f72 6573 2073 6563 6f6e ly ignores secon │ │ │ -00004e00: 6473 2e0a 0a28 666e 2044 4154 4554 494d ds...(fn DATETIM │ │ │ -00004e10: 4529 1f0a 2864 6566 616c 6961 7320 2769 E)..(defalias 'i │ │ │ -00004e20: 6361 6c65 6e64 6172 2d2d 6461 7465 7469 calendar--dateti │ │ │ -00004e30: 6d65 2d74 6f2d 636f 6c6f 6e74 696d 6520 me-to-colontime │ │ │ -00004e40: 235b 3235 3720 225c 3330 305c 3330 315c #[257 "\300\301\ │ │ │ -00004e50: 3330 3203 3803 4140 235c 3230 3722 205b 302.8.A@#\207" [ │ │ │ -00004e60: 666f 726d 6174 2022 2530 3264 3a25 3032 format "%02d:%02 │ │ │ -00004e70: 6422 2032 5d20 3520 2823 2420 2e20 3139 d" 2] 5 (#$ . 19 │ │ │ -00004e80: 3836 3629 5d29 0a23 4036 3620 5265 7475 866)]).#@66 Retu │ │ │ -00004e90: 726e 2074 6865 206d 6f6e 7468 206e 756d rn the month num │ │ │ -00004ea0: 6265 7220 666f 7220 7468 6520 6769 7665 ber for the give │ │ │ -00004eb0: 6e20 4d4f 4e54 484e 414d 452e 0a0a 2866 n MONTHNAME...(f │ │ │ -00004ec0: 6e20 4d4f 4e54 484e 414d 4529 1f0a 2864 n MONTHNAME)..(d │ │ │ -00004ed0: 6566 616c 6961 7320 2769 6361 6c65 6e64 efalias 'icalend │ │ │ -00004ee0: 6172 2d2d 6765 742d 6d6f 6e74 682d 6e75 ar--get-month-nu │ │ │ -00004ef0: 6d62 6572 2023 5b32 3537 2022 5c33 3031 mber #[257 "\301 │ │ │ -00004f00: 321e 005c 3330 3243 015c 3232 375c 3330 2..\302C.\227\30 │ │ │ -00004f10: 335c 3330 345c 3330 355c 3330 365c 3330 3\304\305\306\30 │ │ │ -00004f20: 375c 3331 3006 0706 075c 225c 3331 315c 7\310....\"\311\ │ │ │ -00004f30: 225c 3331 325c 3331 3325 085c 225c 3236 "\312\313%.\"\26 │ │ │ -00004f40: 3603 5c33 3134 305c 3230 3722 205b 6361 6.\3140\207" [ca │ │ │ -00004f50: 6c65 6e64 6172 2d6d 6f6e 7468 2d6e 616d lendar-month-nam │ │ │ -00004f60: 652d 6172 7261 7920 666f 756e 6420 3120 e-array found 1 │ │ │ -00004f70: 6d61 7063 206d 616b 652d 6279 7465 2d63 mapc make-byte-c │ │ │ -00004f80: 6f64 6520 3235 3720 225c 3231 315c 3232 ode 257 "\211\22 │ │ │ -00004f90: 375c 3231 315c 3330 315c 3233 305c 3230 7\211\301\230\20 │ │ │ -00004fa0: 3412 005c 3330 3201 5c33 3033 5c33 3034 4..\302.\303\304 │ │ │ -00004fb0: 235c 3330 315c 3233 305c 3230 3318 005c #\301\230\203..\ │ │ │ -00004fc0: 3330 355c 3330 365c 3330 305c 3234 325c 305\306\300\242\ │ │ │ -00004fd0: 225c 3231 305c 3330 305c 3231 315c 3234 "\210\300\211\24 │ │ │ -00004fe0: 3254 5c32 3430 5c32 3037 2220 7663 6f6e 2T\240\207" vcon │ │ │ -00004ff0: 6361 7420 7665 6374 6f72 205b 7375 6273 cat vector [subs │ │ │ -00005000: 7472 696e 6720 3020 3320 7468 726f 7720 tring 0 3 throw │ │ │ -00005010: 666f 756e 645d 2036 2022 5c6e 5c6e 2866 found] 6 "\n\n(f │ │ │ -00005020: 6e20 4d4f 4e54 4829 2220 2d31 5d20 3131 n MONTH)" -1] 11 │ │ │ -00005030: 2028 2324 202e 2032 3031 3038 295d 290a (#$ . 20108)]). │ │ │ -00005040: 2340 3632 2052 6574 7572 6e20 7468 6520 #@62 Return the │ │ │ -00005050: 6e75 6d62 6572 2066 6f72 2074 6865 2041 number for the A │ │ │ -00005060: 4242 5245 5657 4545 4b44 4159 2e0a 0a28 BBREVWEEKDAY...( │ │ │ -00005070: 666e 2041 4242 5245 5657 4545 4b44 4159 fn ABBREVWEEKDAY │ │ │ -00005080: 291f 0a28 6465 6661 6c69 6173 2027 6963 )..(defalias 'ic │ │ │ -00005090: 616c 656e 6461 722d 2d67 6574 2d77 6565 alendar--get-wee │ │ │ -000050a0: 6b64 6179 2d6e 756d 6265 7220 235b 3235 kday-number #[25 │ │ │ -000050b0: 3720 225c 3231 315c 3230 335c 2200 5c33 7 "\211\203\".\3 │ │ │ -000050c0: 3031 3223 005c 3330 3243 015c 3232 375c 012#.\302C.\227\ │ │ │ -000050d0: 3330 335c 3330 345c 3330 355c 3330 365c 303\304\305\306\ │ │ │ -000050e0: 3330 375c 3331 3006 0706 075c 225c 3331 307\310....\"\31 │ │ │ -000050f0: 315c 225c 3331 325c 3331 3325 085c 225c 1\"\312\313%.\"\ │ │ │ -00005100: 3236 365c 3230 3230 5c32 3037 5c33 3134 266\2020\207\314 │ │ │ -00005110: 5c32 3037 2220 5b69 6361 6c65 6e64 6172 \207" [icalendar │ │ │ -00005120: 2d2d 7765 656b 6461 792d 6172 7261 7920 --weekday-array │ │ │ -00005130: 666f 756e 6420 3020 6d61 7063 206d 616b found 0 mapc mak │ │ │ -00005140: 652d 6279 7465 2d63 6f64 6520 3235 3720 e-byte-code 257 │ │ │ -00005150: 225c 3231 315c 3232 375c 3231 315c 3330 "\211\227\211\30 │ │ │ -00005160: 315c 3233 305c 3230 330e 005c 3330 325c 1\230\203..\302\ │ │ │ -00005170: 3330 335c 3330 305c 3234 325c 225c 3231 303\300\242\"\21 │ │ │ -00005180: 305c 3330 305c 3231 315c 3234 3254 5c32 0\300\211\242T\2 │ │ │ -00005190: 3430 5c32 3037 2220 7663 6f6e 6361 7420 40\207" vconcat │ │ │ -000051a0: 7665 6374 6f72 205b 7468 726f 7720 666f vector [throw fo │ │ │ -000051b0: 756e 645d 2035 2022 5c6e 5c6e 2866 6e20 und] 5 "\n\n(fn │ │ │ -000051c0: 4441 5929 2220 2d31 5d20 3131 2028 2324 DAY)" -1] 11 (#$ │ │ │ -000051d0: 202e 2032 3035 3439 295d 290a 2340 3839 . 20549)]).#@89 │ │ │ -000051e0: 2052 6574 7572 6e20 7468 6520 6c69 7374 Return the list │ │ │ -000051f0: 206f 6620 6e75 6d62 6572 7320 666f 7220 of numbers for │ │ │ -00005200: 7468 6520 636f 6d6d 612d 7365 7061 7261 the comma-separa │ │ │ -00005210: 7465 6420 4142 4252 4556 5745 454b 4441 ted ABBREVWEEKDA │ │ │ -00005220: 5953 2e0a 0a28 666e 2041 4242 5245 5657 YS...(fn ABBREVW │ │ │ -00005230: 4545 4b44 4159 5329 1f0a 2864 6566 616c EEKDAYS)..(defal │ │ │ -00005240: 6961 7320 2769 6361 6c65 6e64 6172 2d2d ias 'icalendar-- │ │ │ -00005250: 6765 742d 7765 656b 6461 792d 6e75 6d62 get-weekday-numb │ │ │ -00005260: 6572 7320 235b 3235 3720 225c 3231 315c ers #[257 "\211\ │ │ │ -00005270: 3230 3530 005c 3330 3143 5c33 3032 5c33 2050.\301C\302\3 │ │ │ -00005280: 3033 5c33 3034 5c33 3035 5c33 3036 5c33 03\304\305\306\3 │ │ │ -00005290: 3037 0606 215c 3331 305c 225c 3331 315c 07..!\310\"\311\ │ │ │ -000052a0: 3331 3225 085c 225c 3331 335c 3331 345c 312%.\"\313\314\ │ │ │ -000052b0: 3330 325c 3330 335c 3330 345c 3331 355c 302\303\304\315\ │ │ │ -000052c0: 3330 365c 3330 3706 0821 5c33 3136 5c22 306\307..!\316\" │ │ │ -000052d0: 5c33 3137 5c33 3230 255c 3332 3106 075c \317\320%\321..\ │ │ │ -000052e0: 3232 375c 3332 325c 225c 225c 225c 3236 227\322\"\"\"\26 │ │ │ -000052f0: 365c 3230 325c 3230 3722 205b 6963 616c 6\202\207" [ical │ │ │ -00005300: 656e 6461 722d 2d77 6565 6b64 6179 2d61 endar--weekday-a │ │ │ -00005310: 7272 6179 202d 3120 6d61 7063 6172 206d rray -1 mapcar m │ │ │ -00005320: 616b 652d 6279 7465 2d63 6f64 6520 3235 ake-byte-code 25 │ │ │ -00005330: 3720 225c 3330 305c 3231 315c 3234 3254 7 "\300\211\242T │ │ │ -00005340: 5c32 3430 5c32 3130 5c32 3131 5c32 3237 \240\210\211\227 │ │ │ -00005350: 5c33 3030 5c32 3432 425c 3230 3722 2076 \300\242B\207" v │ │ │ -00005360: 636f 6e63 6174 2076 6563 746f 7220 5b5d concat vector [] │ │ │ -00005370: 2033 2022 5c6e 5c6e 2866 6e20 4441 5929 3 "\n\n(fn DAY) │ │ │ -00005380: 2220 6465 6c71 206e 696c 2022 5c33 3031 " delq nil "\301 │ │ │ -00005390: 015c 3330 305c 2241 5c32 3037 2220 5b61 .\300\"A\207" [a │ │ │ -000053a0: 7373 6f63 5d20 3420 225c 6e5c 6e28 666e ssoc] 4 "\n\n(fn │ │ │ -000053b0: 2041 4242 5245 5644 4159 2922 2073 706c ABBREVDAY)" spl │ │ │ -000053c0: 6974 2d73 7472 696e 6720 222c 225d 2031 it-string ","] 1 │ │ │ -000053d0: 3220 2823 2420 2e20 3230 3936 3129 5d29 2 (#$ . 20961)]) │ │ │ -000053e0: 0a23 4034 3720 5265 7475 726e 2074 6865 .#@47 Return the │ │ │ -000053f0: 2061 6262 7265 7669 6174 6564 2057 4545 abbreviated WEE │ │ │ -00005400: 4b44 4159 2e0a 0a28 666e 2057 4545 4b44 KDAY...(fn WEEKD │ │ │ -00005410: 4159 291f 0a28 6465 6661 6c69 6173 2027 AY)..(defalias ' │ │ │ -00005420: 6963 616c 656e 6461 722d 2d67 6574 2d77 icalendar--get-w │ │ │ -00005430: 6565 6b64 6179 2d61 6262 7265 7620 235b eekday-abbrev #[ │ │ │ -00005440: 3235 3720 225c 3330 3132 1e00 5c33 3032 257 "\3012..\302 │ │ │ -00005450: 4301 5c32 3237 5c33 3033 5c33 3034 5c33 C.\227\303\304\3 │ │ │ -00005460: 3035 5c33 3036 5c33 3037 5c33 3130 0607 05\306\307\310.. │ │ │ -00005470: 0607 5c22 5c33 3131 5c22 5c33 3132 5c33 ..\"\311\"\312\3 │ │ │ -00005480: 3133 2508 5c22 5c32 3636 035c 3331 3430 13%.\"\266.\3140 │ │ │ -00005490: 5c32 3037 2220 5b63 616c 656e 6461 722d \207" [calendar- │ │ │ -000054a0: 6461 792d 6e61 6d65 2d61 7272 6179 2066 day-name-array f │ │ │ -000054b0: 6f75 6e64 2030 206d 6170 6320 6d61 6b65 ound 0 mapc make │ │ │ -000054c0: 2d62 7974 652d 636f 6465 2032 3537 2022 -byte-code 257 " │ │ │ -000054d0: 5c32 3131 5c32 3237 5c32 3131 5c33 3031 \211\227\211\301 │ │ │ -000054e0: 5c32 3330 5c32 3034 1200 5c33 3033 015c \230\204..\303.\ │ │ │ -000054f0: 3330 345c 3330 3523 5c33 3031 5c32 3330 304\305#\301\230 │ │ │ -00005500: 5c32 3033 1a00 5c33 3036 5c33 3037 5c6e \203..\306\307\n │ │ │ -00005510: 5c33 3030 5c32 3432 485c 225c 3231 305c \300\242H\"\210\ │ │ │ -00005520: 3330 305c 3231 315c 3234 3254 5c32 3430 300\211\242T\240 │ │ │ -00005530: 5c32 3037 2220 7663 6f6e 6361 7420 7665 \207" vconcat ve │ │ │ -00005540: 6374 6f72 205b 6963 616c 656e 6461 722d ctor [icalendar- │ │ │ -00005550: 2d77 6565 6b64 6179 2d61 7272 6179 2073 -weekday-array s │ │ │ -00005560: 7562 7374 7269 6e67 2030 2033 2074 6872 ubstring 0 3 thr │ │ │ -00005570: 6f77 2066 6f75 6e64 5d20 3620 225c 6e5c ow found] 6 "\n\ │ │ │ -00005580: 6e28 666e 2044 4159 2922 206e 696c 5d20 n(fn DAY)" nil] │ │ │ -00005590: 3131 2028 2324 202e 2032 3134 3738 295d 11 (#$ . 21478)] │ │ │ -000055a0: 290a 2340 3138 3020 436f 6e76 6572 7420 ).#@180 Convert │ │ │ -000055b0: 4441 5445 2074 6f20 6973 6f2d 7374 796c DATE to iso-styl │ │ │ -000055c0: 6520 6461 7465 2e0a 4441 5445 206d 7573 e date..DATE mus │ │ │ -000055d0: 7420 6265 2061 206c 6973 7420 6f66 2074 t be a list of t │ │ │ -000055e0: 6865 2066 6f72 6d20 286d 6f6e 7468 2064 he form (month d │ │ │ -000055f0: 6179 2079 6561 7229 2e0a 4966 2044 4159 ay year)..If DAY │ │ │ -00005600: 2d53 4849 4654 2069 7320 6e6f 6e2d 6e69 -SHIFT is non-ni │ │ │ -00005610: 6c2c 2074 6865 2072 6573 756c 7420 6973 l, the result is │ │ │ -00005620: 2073 6869 6674 6564 2062 7920 4441 592d shifted by DAY- │ │ │ -00005630: 5348 4946 5420 6461 7973 2e0a 0a28 666e SHIFT days...(fn │ │ │ -00005640: 2044 4154 4520 266f 7074 696f 6e61 6c20 DATE &optional │ │ │ -00005650: 4441 592d 5348 4946 5429 1f0a 2864 6566 DAY-SHIFT)..(def │ │ │ -00005660: 616c 6961 7320 2769 6361 6c65 6e64 6172 alias 'icalendar │ │ │ -00005670: 2d2d 6461 7465 2d74 6f2d 6973 6f64 6174 --date-to-isodat │ │ │ -00005680: 6520 235b 3531 3320 225c 3330 3002 5c32 e #[513 "\300.\2 │ │ │ -00005690: 3131 5c33 3031 0138 5c32 3632 015c 3330 11\301.8\262.\30 │ │ │ -000056a0: 3201 5c33 3033 555c 3230 3315 005c 3330 2.\303U\203..\30 │ │ │ -000056b0: 345c 3330 3521 5c32 3032 5501 015c 3330 4\305!\202U..\30 │ │ │ -000056c0: 3356 5c32 3033 5c32 3133 0001 535c 3236 3V\203\213..S\26 │ │ │ -000056d0: 3201 5c33 3036 035c 3231 315c 3231 3140 2.\306.\211\211@ │ │ │ -000056e0: 5c32 3632 0101 5c32 3131 4140 5c32 3632 \262..\211A@\262 │ │ │ -000056f0: 0102 5c33 3031 0138 5c32 3632 0101 5c33 ..\301.8\262..\3 │ │ │ -00005700: 3037 0453 5f5c 5c03 5c33 3031 565c 3230 07.S_\\.\301V\20 │ │ │ -00005710: 3376 005c 3231 315c 3331 305c 3331 3106 3v.\211\310\311. │ │ │ -00005720: 065f 5c5c 5c33 3132 5c32 3435 5a5c 3236 ._\\\312\245Z\26 │ │ │ -00005730: 3201 015c 3231 315c 3330 3357 5c32 3033 2..\211\303W\203 │ │ │ -00005740: 5700 5c33 3133 0121 535c 3236 3201 5c32 W.\313.!S\262.\2 │ │ │ -00005750: 3131 5c33 3131 5c32 3436 5c33 3033 555c 11\311\246\303U\ │ │ │ -00005760: 3230 356d 005c 3231 315c 3331 345c 3234 205m.\211\314\24 │ │ │ -00005770: 365c 3330 3355 3f5c 3230 366d 005c 3231 6\303U?\206m.\21 │ │ │ -00005780: 315c 3331 355c 3234 365c 3330 3355 5c32 1\315\246\303U\2 │ │ │ -00005790: 3632 015c 3230 3376 005c 3231 3154 5c32 62.\203v.\211T\2 │ │ │ -000057a0: 3632 015c 3236 365c 3230 335c 3236 3201 62.\266\203\262. │ │ │ -000057b0: 5c33 3136 035f 035c 3331 315c 3234 3504 \316._.\311\245. │ │ │ -000057c0: 5c33 3134 5c32 3435 5b05 5c33 3135 5c32 \314\245[.\315\2 │ │ │ -000057d0: 3435 255c 3230 3255 015c 3331 3302 5421 45%\202U.\313.T! │ │ │ -000057e0: 5c32 3632 015c 3331 3703 5c32 3131 5c32 \262.\317.\211\2 │ │ │ -000057f0: 3131 405c 3236 3201 015c 3231 3141 405c 11@\262..\211A@\ │ │ │ -00005800: 3236 3201 025c 3330 3101 385c 3236 3201 262..\301.8\262. │ │ │ -00005810: 015c 3330 3704 535f 5c5c 035c 3330 3156 .\307.S_\\.\301V │ │ │ -00005820: 5c32 3033 5c33 3530 005c 3231 315c 3331 \203\350.\211\31 │ │ │ -00005830: 305c 3331 3106 065f 5c5c 5c33 3132 5c32 0\311.._\\\312\2 │ │ │ -00005840: 3435 5a5c 3236 3201 015c 3231 315c 3330 45Z\262..\211\30 │ │ │ -00005850: 3357 5c32 3033 5c33 3131 005c 3331 3301 3W\203\311.\313. │ │ │ -00005860: 2153 5c32 3632 015c 3231 315c 3331 315c !S\262.\211\311\ │ │ │ -00005870: 3234 365c 3330 3355 5c32 3035 5c33 3337 246\303U\205\337 │ │ │ -00005880: 005c 3231 315c 3331 345c 3234 365c 3330 .\211\314\246\30 │ │ │ -00005890: 3355 3f5c 3230 365c 3333 3700 5c32 3131 3U?\206\337.\211 │ │ │ -000058a0: 5c33 3135 5c32 3436 5c33 3033 555c 3236 \315\246\303U\26 │ │ │ -000058b0: 3201 5c32 3033 5c33 3530 005c 3231 3154 2.\203\350.\211T │ │ │ -000058c0: 5c32 3632 015c 3236 365c 3230 335c 3236 \262.\266\203\26 │ │ │ -000058d0: 3201 5c33 3136 035f 035c 3331 315c 3234 2.\316._.\311\24 │ │ │ -000058e0: 3504 5c33 3134 5c32 3435 5b05 5c33 3135 5.\314\245[.\315 │ │ │ -000058f0: 5c32 3435 5c33 3230 5c32 3131 5c32 3131 \245\320\211\211 │ │ │ -00005900: 405c 3236 3201 015c 3231 3141 405c 3236 @\262..\211A@\26 │ │ │ -00005910: 3201 025c 3330 3101 385c 3236 3201 015c 2..\301.8\262..\ │ │ │ -00005920: 3330 3704 535f 5c5c 035c 3330 3156 5c32 307.S_\\.\301V\2 │ │ │ -00005930: 3033 4f01 5c32 3131 5c33 3130 5c33 3131 03O.\211\310\311 │ │ │ -00005940: 0606 5f5c 5c5c 3331 325c 3234 355a 5c32 .._\\\312\245Z\2 │ │ │ -00005950: 3632 0101 5c32 3131 5c33 3033 575c 3230 62..\211\303W\20 │ │ │ -00005960: 3330 015c 3331 3301 2153 5c32 3632 015c 30.\313.!S\262.\ │ │ │ -00005970: 3231 315c 3331 315c 3234 365c 3330 3355 211\311\246\303U │ │ │ -00005980: 5c32 3035 4601 5c32 3131 5c33 3134 5c32 \205F.\211\314\2 │ │ │ -00005990: 3436 5c33 3033 553f 5c32 3036 4601 5c32 46\303U?\206F.\2 │ │ │ -000059a0: 3131 5c33 3135 5c32 3436 5c33 3033 555c 11\315\246\303U\ │ │ │ -000059b0: 3236 3201 5c32 3033 4f01 5c32 3131 545c 262.\203O.\211T\ │ │ │ -000059c0: 3236 3201 5c32 3636 5c32 3033 5c32 3632 262.\266\203\262 │ │ │ -000059d0: 0126 065c 3236 365c 3230 325c 3236 3201 .&.\266\202\262. │ │ │ -000059e0: 025c 3230 365e 015c 3330 335c 5c21 5c33 .\206^.\303\\!\3 │ │ │ -000059f0: 3231 5c33 3232 5c33 3031 0338 0340 0441 21\322\301.8.@.A │ │ │ -00005a00: 4024 5c32 3037 2220 5b63 616c 656e 6461 @$\207" [calenda │ │ │ -00005a10: 722d 6772 6567 6f72 6961 6e2d 6672 6f6d r-gregorian-from │ │ │ -00005a20: 2d61 6273 6f6c 7574 6520 3220 6e69 6c20 -absolute 2 nil │ │ │ -00005a30: 3020 7573 6572 2d65 7272 6f72 2022 5468 0 user-error "Th │ │ │ -00005a40: 6572 6520 7761 7320 6e6f 2079 6561 7220 ere was no year │ │ │ -00005a50: 7a65 726f 2220 2b20 3331 2032 3320 3420 zero" + 31 23 4 │ │ │ -00005a60: 3130 2061 6273 2031 3030 2034 3030 2033 10 abs 100 400 3 │ │ │ -00005a70: 3635 202d 2028 3132 2033 3120 2d31 2920 65 - (12 31 -1) │ │ │ -00005a80: 666f 726d 6174 2022 2530 3464 2530 3264 format "%04d%02d │ │ │ -00005a90: 2530 3264 225d 2032 3120 2823 2420 2e20 %02d"] 21 (#$ . │ │ │ -00005aa0: 3231 3932 3829 5d29 0a23 4033 3336 2043 21928)]).#@336 C │ │ │ -00005ab0: 6f6e 7665 7274 2064 6961 7279 2d73 7479 onvert diary-sty │ │ │ -00005ac0: 6c65 2044 4154 4553 5452 494e 4720 746f le DATESTRING to │ │ │ -00005ad0: 2069 736f 2d73 7479 6c65 2064 6174 652e iso-style date. │ │ │ -00005ae0: 0a49 6620 4441 592d 5348 4946 5420 6973 .If DAY-SHIFT is │ │ │ -00005af0: 206e 6f6e 2d6e 696c 2c20 7468 6520 7265 non-nil, the re │ │ │ -00005b00: 7375 6c74 2069 7320 7368 6966 7465 6420 sult is shifted │ │ │ -00005b10: 6279 2044 4159 2d53 4849 4654 2064 6179 by DAY-SHIFT day │ │ │ -00005b20: 730a 2d2d 2044 4159 2d53 4849 4654 206d s.-- DAY-SHIFT m │ │ │ -00005b30: 7573 7420 6265 2065 6974 6865 7220 6e69 ust be either ni │ │ │ -00005b40: 6c20 6f72 2061 6e20 696e 7465 6765 722e l or an integer. │ │ │ -00005b50: 2020 5468 6973 2066 756e 6374 696f 6e0a This function. │ │ │ -00005b60: 7472 6965 7320 746f 2066 6967 7572 6520 tries to figure │ │ │ -00005b70: 7468 6520 6461 7465 2073 7479 6c65 2066 the date style f │ │ │ -00005b80: 726f 6d20 4441 5445 5354 5249 4e47 2069 rom DATESTRING i │ │ │ -00005b90: 7473 656c 662e 2020 4966 2074 6861 740a tself. If that. │ │ │ -00005ba0: 6973 206e 6f74 2070 6f73 7369 626c 6520 is not possible │ │ │ -00005bb0: 6974 2075 7365 7320 7468 6520 6375 7272 it uses the curr │ │ │ -00005bc0: 656e 7420 6361 6c65 6e64 6172 2064 6174 ent calendar dat │ │ │ -00005bd0: 6520 7374 796c 652e 0a0a 2866 6e20 4441 e style...(fn DA │ │ │ -00005be0: 5445 5354 5249 4e47 2026 6f70 7469 6f6e TESTRING &option │ │ │ -00005bf0: 616c 2044 4159 2d53 4849 4654 291f 0a28 al DAY-SHIFT)..( │ │ │ -00005c00: 6465 6661 6c69 6173 2027 6963 616c 656e defalias 'icalen │ │ │ -00005c10: 6461 722d 2d64 6174 6573 7472 696e 672d dar--datestring- │ │ │ -00005c20: 746f 2d69 736f 6461 7465 2023 5b35 3133 to-isodate #[513 │ │ │ -00005c30: 2022 5c33 3031 5c33 3032 5c32 3131 5c33 "\301\302\211\3 │ │ │ -00005c40: 3033 205c 3330 345c 3330 355c 3330 365c 03 \304\305\306\ │ │ │ -00005c50: 3330 375c 3331 3005 215c 3331 315c 225c 307\310.!\311\"\ │ │ │ -00005c60: 3331 3224 5c32 3136 5c33 3133 5c33 3134 312$\216\313\314 │ │ │ -00005c70: 0607 5c22 5c32 3033 4000 5c33 3135 5c33 ..\"\203@.\315\3 │ │ │ -00005c80: 3136 0607 5c33 3137 5c32 3234 5c33 3137 16..\317\224\317 │ │ │ -00005c90: 5c32 3235 2321 5c32 3632 025c 3331 355c \225#!\262.\315\ │ │ │ -00005ca0: 3331 3606 075c 3332 305c 3232 345c 3332 316..\320\224\32 │ │ │ -00005cb0: 305c 3232 3523 215c 3236 3203 5c33 3135 0\225#!\262.\315 │ │ │ -00005cc0: 5c33 3136 0607 5c33 3132 5c32 3234 5c33 \316..\312\224\3 │ │ │ -00005cd0: 3132 5c32 3235 2321 5c32 3632 045c 3230 12\225#!\262.\20 │ │ │ -00005ce0: 3205 015c 3331 335c 3332 3106 075c 225c 2..\313\321..\"\ │ │ │ -00005cf0: 3230 337b 005c 3331 355c 3331 3606 075c 203{.\315\316..\ │ │ │ -00005d00: 3331 375c 3232 345c 3331 375c 3232 3523 317\224\317\225# │ │ │ -00005d10: 215c 3236 3204 5c33 3135 5c33 3136 0607 !\262.\315\316.. │ │ │ -00005d20: 5c33 3230 5c32 3234 5c33 3230 5c32 3235 \320\224\320\225 │ │ │ -00005d30: 2321 5c32 3632 035c 3331 355c 3331 3606 #!\262.\315\316. │ │ │ -00005d40: 075c 3331 325c 3232 345c 3331 325c 3232 .\312\224\312\22 │ │ │ -00005d50: 3523 215c 3236 3202 085c 3332 323d 5c32 5#!\262..\322=\2 │ │ │ -00005d60: 3033 0501 0204 5c32 3632 045c 3236 3204 03....\262.\262. │ │ │ -00005d70: 5c32 3032 0501 5c33 3133 5c33 3233 0607 \202..\313\323.. │ │ │ -00005d80: 5c22 5c32 3033 5c32 3532 005c 3331 355c \"\203\252.\315\ │ │ │ -00005d90: 3331 3606 075c 3331 375c 3232 345c 3331 316..\317\224\31 │ │ │ -00005da0: 375c 3232 3523 215c 3236 3202 5c33 3234 7\225#!\262.\324 │ │ │ -00005db0: 5c33 3136 0607 5c33 3230 5c32 3234 5c33 \316..\320\224\3 │ │ │ -00005dc0: 3230 5c32 3235 2321 5c32 3632 035c 3331 20\225#!\262.\31 │ │ │ -00005dd0: 355c 3331 3606 075c 3331 325c 3232 345c 5\316..\312\224\ │ │ │ -00005de0: 3331 325c 3232 3523 215c 3236 3204 5c32 312\225#!\262.\2 │ │ │ -00005df0: 3032 0501 5c33 3133 5c33 3235 0607 5c22 02..\313\325..\" │ │ │ -00005e00: 5c32 3033 5c33 3331 005c 3331 355c 3331 \203\331.\315\31 │ │ │ -00005e10: 3606 075c 3331 375c 3232 345c 3331 375c 6..\317\224\317\ │ │ │ -00005e20: 3232 3523 215c 3236 3204 5c33 3234 5c33 225#!\262.\324\3 │ │ │ -00005e30: 3136 0607 5c33 3230 5c32 3234 5c33 3230 16..\320\224\320 │ │ │ -00005e40: 5c32 3235 2321 5c32 3632 035c 3331 355c \225#!\262.\315\ │ │ │ -00005e50: 3331 3606 075c 3331 325c 3232 345c 3331 316..\312\224\31 │ │ │ -00005e60: 325c 3232 3523 215c 3236 3202 5c32 3032 2\225#!\262.\202 │ │ │ -00005e70: 0501 5c33 3133 5c33 3236 0607 5c22 5c32 ..\313\326..\"\2 │ │ │ -00005e80: 3033 0501 5c33 3135 5c33 3136 0607 5c33 03..\315\316..\3 │ │ │ -00005e90: 3230 5c32 3234 5c33 3230 5c32 3235 2321 20\224\320\225#! │ │ │ -00005ea0: 5c32 3632 045c 3332 345c 3331 3606 075c \262.\324\316..\ │ │ │ -00005eb0: 3331 375c 3232 345c 3331 375c 3232 3523 317\224\317\225# │ │ │ -00005ec0: 215c 3236 3203 5c33 3135 5c33 3136 0607 !\262.\315\316.. │ │ │ -00005ed0: 5c33 3132 5c32 3234 5c33 3132 5c32 3235 \312\224\312\225 │ │ │ -00005ee0: 2321 5c32 3632 0229 5c32 3130 025c 3330 #!\262.)\210.\30 │ │ │ -00005ef0: 3556 5c32 3035 5c32 3133 025c 3332 3702 5V\205\213.\327. │ │ │ -00005f00: 0403 455c 3231 315c 3332 3001 385c 3236 ..E\211\320.8\26 │ │ │ -00005f10: 3201 5c33 3032 015c 3330 3555 5c32 3033 2.\302.\305U\203 │ │ │ -00005f20: 2501 5c33 3330 5c33 3331 215c 3230 3265 %.\330\331!\202e │ │ │ -00005f30: 0201 5c33 3035 565c 3230 335c 3233 3301 ..\305V\203\233. │ │ │ -00005f40: 0153 5c32 3632 015c 3333 3203 5c32 3131 .S\262.\332.\211 │ │ │ -00005f50: 5c32 3131 405c 3236 3201 015c 3231 3141 \211@\262..\211A │ │ │ -00005f60: 405c 3236 3201 025c 3332 3001 385c 3236 @\262..\320.8\26 │ │ │ -00005f70: 3201 015c 3333 3304 535f 5c5c 035c 3332 2..\333.S_\\.\32 │ │ │ -00005f80: 3056 5c32 3033 5c32 3036 015c 3231 315c 0V\203\206.\211\ │ │ │ -00005f90: 3333 345c 3333 3506 065f 5c5c 5c33 3336 334\335.._\\\336 │ │ │ -00005fa0: 5c32 3435 5a5c 3236 3201 015c 3231 315c \245Z\262..\211\ │ │ │ -00005fb0: 3330 3557 5c32 3033 6701 5c33 3337 0121 305W\203g.\337.! │ │ │ -00005fc0: 535c 3236 3201 5c32 3131 5c33 3335 5c32 S\262.\211\335\2 │ │ │ -00005fd0: 3436 5c33 3035 555c 3230 357d 015c 3231 46\305U\205}.\21 │ │ │ -00005fe0: 315c 3334 305c 3234 365c 3330 3555 3f5c 1\340\246\305U?\ │ │ │ -00005ff0: 3230 367d 015c 3231 315c 3334 315c 3234 206}.\211\341\24 │ │ │ -00006000: 365c 3330 3555 5c32 3632 015c 3230 335c 6\305U\262.\203\ │ │ │ -00006010: 3230 3601 5c32 3131 545c 3236 3201 5c32 206.\211T\262.\2 │ │ │ -00006020: 3636 5c32 3033 5c32 3632 015c 3334 3203 66\203\262.\342. │ │ │ -00006030: 5f03 5c33 3335 5c32 3435 045c 3334 305c _.\335\245.\340\ │ │ │ -00006040: 3234 355b 055c 3334 315c 3234 3525 5c32 245[.\341\245%\2 │ │ │ -00006050: 3032 6502 5c33 3337 0254 215c 3236 3201 02e.\337.T!\262. │ │ │ -00006060: 5c33 3433 035c 3231 315c 3231 3140 5c32 \343.\211\211@\2 │ │ │ -00006070: 3632 0101 5c32 3131 4140 5c32 3632 0102 62..\211A@\262.. │ │ │ -00006080: 5c33 3230 0138 5c32 3632 0101 5c33 3333 \320.8\262..\333 │ │ │ -00006090: 0453 5f5c 5c03 5c33 3230 565c 3230 335c .S_\\.\320V\203\ │ │ │ -000060a0: 3337 3001 5c32 3131 5c33 3334 5c33 3335 370.\211\334\335 │ │ │ -000060b0: 0606 5f5c 5c5c 3333 365c 3234 355a 5c32 .._\\\336\245Z\2 │ │ │ -000060c0: 3632 0101 5c32 3131 5c33 3035 575c 3230 62..\211\305W\20 │ │ │ -000060d0: 335c 3333 3101 5c33 3337 0121 535c 3236 3\331.\337.!S\26 │ │ │ -000060e0: 3201 5c32 3131 5c33 3335 5c32 3436 5c33 2.\211\335\246\3 │ │ │ -000060f0: 3035 555c 3230 355c 3335 3701 5c32 3131 05U\205\357.\211 │ │ │ -00006100: 5c33 3430 5c32 3436 5c33 3035 553f 5c32 \340\246\305U?\2 │ │ │ -00006110: 3036 5c33 3537 015c 3231 315c 3334 315c 06\357.\211\341\ │ │ │ -00006120: 3234 365c 3330 3555 5c32 3632 015c 3230 246\305U\262.\20 │ │ │ -00006130: 335c 3337 3001 5c32 3131 545c 3236 3201 3\370.\211T\262. │ │ │ -00006140: 5c32 3636 5c32 3033 5c32 3632 015c 3334 \266\203\262.\34 │ │ │ -00006150: 3203 5f03 5c33 3335 5c32 3435 045c 3334 2._.\335\245.\34 │ │ │ -00006160: 305c 3234 355b 055c 3334 315c 3234 355c 0\245[.\341\245\ │ │ │ -00006170: 3334 345c 3231 315c 3231 3140 5c32 3632 344\211\211@\262 │ │ │ -00006180: 0101 5c32 3131 4140 5c32 3632 0102 5c33 ..\211A@\262..\3 │ │ │ -00006190: 3230 0138 5c32 3632 0101 5c33 3333 0453 20.8\262..\333.S │ │ │ -000061a0: 5f5c 5c03 5c33 3230 565c 3230 335f 025c _\\.\320V\203_.\ │ │ │ -000061b0: 3231 315c 3333 345c 3333 3506 065f 5c5c 211\334\335.._\\ │ │ │ -000061c0: 5c33 3336 5c32 3435 5a5c 3236 3201 015c \336\245Z\262..\ │ │ │ -000061d0: 3231 315c 3330 3557 5c32 3033 4002 5c33 211\305W\203@.\3 │ │ │ -000061e0: 3337 0121 535c 3236 3201 5c32 3131 5c33 37.!S\262.\211\3 │ │ │ -000061f0: 3335 5c32 3436 5c33 3035 555c 3230 3556 35\246\305U\205V │ │ │ -00006200: 025c 3231 315c 3334 305c 3234 365c 3330 .\211\340\246\30 │ │ │ -00006210: 3555 3f5c 3230 3656 025c 3231 315c 3334 5U?\206V.\211\34 │ │ │ -00006220: 315c 3234 365c 3330 3555 5c32 3632 015c 1\246\305U\262.\ │ │ │ -00006230: 3230 335f 025c 3231 3154 5c32 3632 015c 203_.\211T\262.\ │ │ │ -00006240: 3236 365c 3230 335c 3236 3201 2606 5c32 266\203\262.&.\2 │ │ │ -00006250: 3636 5c32 3032 5c32 3632 0105 5c32 3036 66\202\262..\206 │ │ │ -00006260: 6e02 5c33 3035 5c5c 215c 3334 355c 3334 n.\305\\!\345\34 │ │ │ -00006270: 365c 3334 375c 3332 3004 3804 4005 4140 6\347\320.8.@.A@ │ │ │ -00006280: 2421 5c32 3130 5c33 3436 5c33 3437 5c33 $!\210\346\347\3 │ │ │ -00006290: 3230 0338 0340 0441 4024 5c32 3632 015c 20.8.@.A@$\262.\ │ │ │ -000062a0: 3230 3722 205b 6361 6c65 6e64 6172 2d64 207" [calendar-d │ │ │ -000062b0: 6174 652d 7374 796c 6520 2d31 206e 696c ate-style -1 nil │ │ │ -000062c0: 206d 6174 6368 2d64 6174 6120 6d61 6b65 match-data make │ │ │ -000062d0: 2d62 7974 652d 636f 6465 2030 2022 5c33 -byte-code 0 "\3 │ │ │ -000062e0: 3031 5c33 3030 5c33 3032 5c22 5c32 3037 01\300\302\"\207 │ │ │ -000062f0: 2220 7663 6f6e 6361 7420 7665 6374 6f72 " vconcat vector │ │ │ -00006300: 205b 7365 742d 6d61 7463 682d 6461 7461 [set-match-data │ │ │ -00006310: 2065 7661 706f 7261 7465 5d20 3320 7374 evaporate] 3 st │ │ │ -00006320: 7269 6e67 2d6d 6174 6368 2022 5c5c 732d ring-match "\\s- │ │ │ -00006330: 2a5c 5c28 5b30 2d39 5d5c 5c7b 345c 5c7d *\\([0-9]\\{4\\} │ │ │ -00006340: 5c5c 295b 2009 2f5d 5c5c 732d 2a30 3f5c \\)[ ./]\\s-*0?\ │ │ │ -00006350: 5c28 5b31 2d39 5d5b 302d 395d 3f5c 5c29 \([1-9][0-9]?\\) │ │ │ -00006360: 5b20 092f 5d5c 5c73 2d2a 303f 5c5c 285b [ ./]\\s-*0?\\([ │ │ │ -00006370: 312d 395d 5b30 2d39 5d3f 5c5c 2922 2072 1-9][0-9]?\\)" r │ │ │ -00006380: 6561 6420 7375 6273 7472 696e 6720 3120 ead substring 1 │ │ │ -00006390: 3220 225c 5c73 2d2a 303f 5c5c 285b 312d 2 "\\s-*0?\\([1- │ │ │ -000063a0: 395d 5b30 2d39 5d3f 5c5c 295b 2009 2f5d 9][0-9]?\\)[ ./] │ │ │ -000063b0: 5c5c 732d 2a30 3f5c 5c28 5b31 2d39 5d5b \\s-*0?\\([1-9][ │ │ │ -000063c0: 302d 395d 3f5c 5c29 2c3f 5b20 092f 5d5c 0-9]?\\),?[ ./]\ │ │ │ -000063d0: 5c73 2d2a 5c5c 285b 302d 395d 5c5c 7b34 \s-*\\([0-9]\\{4 │ │ │ -000063e0: 5c5c 7d5c 5c29 2220 616d 6572 6963 616e \\}\\)" american │ │ │ -000063f0: 2022 5c5c 732d 2a5c 5c28 5b30 2d39 5d5c "\\s-*\\([0-9]\ │ │ │ -00006400: 5c7b 345c 5c7d 5c5c 295b 2009 2f5d 5c5c \{4\\}\\)[ ./]\\ │ │ │ -00006410: 732d 2a5c 5c28 5b41 2d5a 612d 7a5d 5b5e s-*\\([A-Za-z][^ │ │ │ -00006420: 205d 2b5c 5c29 5b20 092f 5d5c 5c73 2d2a ]+\\)[ ./]\\s-* │ │ │ -00006430: 303f 5c5c 285b 3132 335d 3f5b 302d 395d 0?\\([123]?[0-9] │ │ │ -00006440: 5c5c 2922 2069 6361 6c65 6e64 6172 2d2d \\)" icalendar-- │ │ │ -00006450: 6765 742d 6d6f 6e74 682d 6e75 6d62 6572 get-month-number │ │ │ -00006460: 2022 5c5c 732d 2a30 3f5c 5c28 5b31 3233 "\\s-*0?\\([123 │ │ │ -00006470: 5d3f 5b30 2d39 5d5c 5c29 5b20 092f 5d5c ]?[0-9]\\)[ ./]\ │ │ │ -00006480: 5c73 2d2a 5c5c 285b 412d 5a61 2d7a 5d5b \s-*\\([A-Za-z][ │ │ │ -00006490: 5e20 5d2b 5c5c 295b 2009 2f5d 5c5c 732d ^ ]+\\)[ ./]\\s- │ │ │ -000064a0: 2a5c 5c28 5b30 2d39 5d5c 5c7b 345c 5c7d *\\([0-9]\\{4\\} │ │ │ -000064b0: 5c5c 2922 2022 5c5c 732d 2a5c 5c28 5b41 \\)" "\\s-*\\([A │ │ │ -000064c0: 2d5a 612d 7a5d 5b5e 205d 2b5c 5c29 5b20 -Za-z][^ ]+\\)[ │ │ │ -000064d0: 092f 5d5c 5c73 2d2a 303f 5c5c 285b 3132 ./]\\s-*0?\\([12 │ │ │ -000064e0: 335d 3f5b 302d 395d 5c5c 292c 3f5b 2009 3]?[0-9]\\),?[ . │ │ │ -000064f0: 2f5d 5c5c 732d 2a5c 5c28 5b30 2d39 5d5c /]\\s-*\\([0-9]\ │ │ │ -00006500: 5c7b 345c 5c7d 5c5c 2922 2063 616c 656e \{4\\}\\)" calen │ │ │ -00006510: 6461 722d 6772 6567 6f72 6961 6e2d 6672 dar-gregorian-fr │ │ │ -00006520: 6f6d 2d61 6273 6f6c 7574 6520 7573 6572 om-absolute user │ │ │ -00006530: 2d65 7272 6f72 2022 5468 6572 6520 7761 -error "There wa │ │ │ -00006540: 7320 6e6f 2079 6561 7220 7a65 726f 2220 s no year zero" │ │ │ -00006550: 2b20 3331 2032 3320 3420 3130 2061 6273 + 31 23 4 10 abs │ │ │ -00006560: 2031 3030 2034 3030 2033 3635 202d 2028 100 400 365 - ( │ │ │ -00006570: 3132 2033 3120 2d31 2920 6963 616c 656e 12 31 -1) icalen │ │ │ -00006580: 6461 722d 2d64 6d73 6720 666f 726d 6174 dar--dmsg format │ │ │ -00006590: 2022 2530 3464 2530 3264 2530 3264 225d "%04d%02d%02d"] │ │ │ -000065a0: 2032 3420 2823 2420 2e20 3233 3231 3529 24 (#$ . 23215) │ │ │ -000065b0: 5d29 0a23 4033 3134 2043 6f6e 7665 7274 ]).#@314 Convert │ │ │ -000065c0: 2061 2074 696d 6520 6c69 6b65 2039 3a33 a time like 9:3 │ │ │ -000065d0: 3070 6d20 746f 2061 6e20 6973 6f2d 636f 0pm to an iso-co │ │ │ -000065e0: 6e66 6f72 6d20 7374 7269 6e67 206c 696b nform string lik │ │ │ -000065f0: 6520 5432 3133 3030 302e 0a49 6e20 7468 e T213000..In th │ │ │ -00006600: 6973 2065 7861 6d70 6c65 2074 6865 2054 is example the T │ │ │ -00006610: 494d 4553 5452 494e 4720 776f 756c 6420 IMESTRING would │ │ │ -00006620: 6265 2022 393a 3330 2220 616e 6420 7468 be "9:30" and th │ │ │ -00006630: 650a 414d 504d 5354 5249 4e47 2077 6f75 e.AMPMSTRING wou │ │ │ -00006640: 6c64 2062 6520 2270 6d22 2e20 2054 6865 ld be "pm". The │ │ │ -00006650: 206d 696e 7574 6573 206d 6179 2062 6520 minutes may be │ │ │ -00006660: 6d69 7373 696e 6720 6173 206c 6f6e 670a missing as long. │ │ │ -00006670: 6173 2074 6865 2063 6f6c 6f6e 2069 7320 as the colon is │ │ │ -00006680: 6d69 7373 696e 6720 6173 2077 656c 6c2c missing as well, │ │ │ -00006690: 2069 2e65 2e20 2239 2220 6973 2061 6c6c i.e. "9" is all │ │ │ -000066a0: 6f77 6564 2061 730a 5449 4d45 5354 5249 owed as.TIMESTRI │ │ │ -000066b0: 4e47 2061 6e64 2068 6173 2074 6865 2073 NG and has the s │ │ │ -000066c0: 616d 6520 7265 7375 6c74 2061 7320 2239 ame result as "9 │ │ │ -000066d0: 3a30 3022 2e0a 0a28 666e 2054 494d 4553 :00"...(fn TIMES │ │ │ -000066e0: 5452 494e 4720 414d 504d 5354 5249 4e47 TRING AMPMSTRING │ │ │ -000066f0: 291f 0a28 6465 6661 6c69 6173 2027 6963 )..(defalias 'ic │ │ │ -00006700: 616c 656e 6461 722d 2d64 6961 7279 7469 alendar--diaryti │ │ │ -00006710: 6d65 2d74 6f2d 6973 6f74 696d 6520 235b me-to-isotime #[ │ │ │ -00006720: 3531 3420 2201 5c32 3035 6700 5c33 3030 514 ".\205g.\300 │ │ │ -00006730: 205c 3330 315c 3330 325c 3330 335c 3330 \301\302\303\30 │ │ │ -00006740: 345c 3330 3505 215c 3330 365c 225c 3330 4\305.!\306\"\30 │ │ │ -00006750: 3724 5c32 3136 5c33 3130 035c 3331 315c 7$\216\310.\311\ │ │ │ -00006760: 2229 5c32 3632 015c 3231 3140 0141 5c32 ")\262.\211@.A\2 │ │ │ -00006770: 3033 2600 0141 405c 3230 3232 005c 3231 03&..A@\2022.\21 │ │ │ -00006780: 3147 5c33 3132 565c 3230 3331 005c 3331 1G\312V\2031.\31 │ │ │ -00006790: 335c 3230 3232 005c 3331 345c 3331 3502 3\2022.\314\315. │ │ │ -000067a0: 0250 2104 5c32 3033 4c00 045c 3331 365c .P!.\203L..\316\ │ │ │ -000067b0: 3233 305c 3230 334c 005c 3231 315c 3331 230\203L.\211\31 │ │ │ -000067c0: 3757 5c32 3033 4c00 5c32 3131 5c33 3137 7W\203L.\211\317 │ │ │ -000067d0: 5c5c 5c32 3632 0104 5c32 3033 6100 045c \\\262..\203a..\ │ │ │ -000067e0: 3332 305c 3233 305c 3230 3361 005c 3231 320\230\203a.\21 │ │ │ -000067f0: 315c 3331 3759 5c32 3033 6100 5c32 3131 1\317Y\203a.\211 │ │ │ -00006800: 5c33 3137 5a5c 3236 3201 5c33 3231 5c33 \317Z\262.\321\3 │ │ │ -00006810: 3232 025c 225c 3236 365c 3230 345c 3230 22.\"\266\204\20 │ │ │ -00006820: 3722 205b 6d61 7463 682d 6461 7461 206d 7" [match-data m │ │ │ -00006830: 616b 652d 6279 7465 2d63 6f64 6520 3020 ake-byte-code 0 │ │ │ -00006840: 225c 3330 315c 3330 305c 3330 325c 225c "\301\300\302\"\ │ │ │ -00006850: 3230 3722 2076 636f 6e63 6174 2076 6563 207" vconcat vec │ │ │ -00006860: 746f 7220 5b73 6574 2d6d 6174 6368 2d64 tor [set-match-d │ │ │ -00006870: 6174 6120 6576 6170 6f72 6174 655d 2033 ata evaporate] 3 │ │ │ -00006880: 2073 706c 6974 2d73 7472 696e 6720 223a split-string ": │ │ │ -00006890: 2220 3220 2222 2022 3030 2220 7265 6164 " 2 "" "00" read │ │ │ -000068a0: 2022 706d 2220 3132 3030 2022 616d 2220 "pm" 1200 "am" │ │ │ -000068b0: 666f 726d 6174 2022 5425 3034 6430 3022 format "T%04d00" │ │ │ -000068c0: 5d20 3920 2823 2420 2e20 3236 3034 3129 ] 9 (#$ . 26041) │ │ │ -000068d0: 5d29 0a23 4036 3820 4573 6361 7065 2063 ]).#@68 Escape c │ │ │ -000068e0: 6f6d 6d61 2061 6e64 206f 7468 6572 2063 omma and other c │ │ │ -000068f0: 7269 7469 6361 6c20 6368 6172 6163 7465 ritical characte │ │ │ -00006900: 7273 2069 6e20 5354 5249 4e47 2e0a 0a28 rs in STRING...( │ │ │ -00006910: 666e 2053 5452 494e 4729 1f0a 2864 6566 fn STRING)..(def │ │ │ -00006920: 616c 6961 7320 2769 6361 6c65 6e64 6172 alias 'icalendar │ │ │ -00006930: 2d2d 636f 6e76 6572 742d 7374 7269 6e67 --convert-string │ │ │ -00006940: 2d66 6f72 2d65 7870 6f72 7420 235b 3235 -for-export #[25 │ │ │ -00006950: 3720 225c 3330 305c 3330 315c 3330 3203 7 "\300\301\302. │ │ │ -00006960: 235c 3230 3722 205b 7265 706c 6163 652d #\207" [replace- │ │ │ -00006970: 7265 6765 7870 2d69 6e2d 7374 7269 6e67 regexp-in-string │ │ │ -00006980: 2022 2c22 2022 5c5c 5c5c 2c22 5d20 3520 "," "\\\\,"] 5 │ │ │ -00006990: 2823 2420 2e20 3236 3834 3029 5d29 0a23 (#$ . 26840)]).# │ │ │ -000069a0: 4037 3320 5265 6d6f 7665 2065 7363 6170 @73 Remove escap │ │ │ -000069b0: 6520 6368 6172 7320 666f 7220 636f 6d6d e chars for comm │ │ │ -000069c0: 612c 2073 656d 6963 6f6c 6f6e 2065 7463 a, semicolon etc │ │ │ -000069d0: 2e20 6672 6f6d 2053 5452 494e 472e 0a0a . from STRING... │ │ │ -000069e0: 2866 6e20 5354 5249 4e47 291f 0a28 6465 (fn STRING)..(de │ │ │ -000069f0: 6661 6c69 6173 2027 6963 616c 656e 6461 falias 'icalenda │ │ │ -00006a00: 722d 2d63 6f6e 7665 7274 2d73 7472 696e r--convert-strin │ │ │ -00006a10: 672d 666f 722d 696d 706f 7274 2023 5b32 g-for-import #[2 │ │ │ -00006a20: 3537 2022 5c33 3030 5c33 3031 5c33 3032 57 "\300\301\302 │ │ │ -00006a30: 5c33 3030 5c33 3033 5c33 3034 5c33 3030 \300\303\304\300 │ │ │ -00006a40: 5c33 3035 5c33 3036 5c33 3030 5c33 3037 \305\306\300\307 │ │ │ -00006a50: 5c33 3130 065c 6623 2323 235c 3230 3722 \310.\f####\207" │ │ │ -00006a60: 205b 7265 706c 6163 652d 7265 6765 7870 [replace-regexp │ │ │ -00006a70: 2d69 6e2d 7374 7269 6e67 2022 5c5c 5c5c -in-string "\\\\ │ │ │ -00006a80: 6e22 2022 5c6e 2022 2022 5c5c 5c5c 5c22 n" "\n " "\\\\\" │ │ │ -00006a90: 2220 225c 2222 2022 5c5c 5c5c 3b22 2022 " "\"" "\\\\;" " │ │ │ -00006aa0: 3b22 2022 5c5c 5c5c 2c22 2022 2c22 5d20 ;" "\\\\," ","] │ │ │ -00006ab0: 3134 2028 2324 202e 2032 3730 3434 295d 14 (#$ . 27044)] │ │ │ -00006ac0: 290a 2340 3230 3620 4578 706f 7274 2064 ).#@206 Export d │ │ │ -00006ad0: 6961 7279 2066 696c 6520 746f 2069 4361 iary file to iCa │ │ │ -00006ae0: 6c65 6e64 6172 2066 6f72 6d61 742e 0a41 lendar format..A │ │ │ -00006af0: 6c6c 2064 6961 7279 2065 6e74 7269 6573 ll diary entries │ │ │ -00006b00: 2069 6e20 7468 6520 6669 6c65 2044 4941 in the file DIA │ │ │ -00006b10: 5259 2d46 494c 454e 414d 4520 6172 6520 RY-FILENAME are │ │ │ -00006b20: 636f 6e76 6572 7465 6420 746f 2069 4361 converted to iCa │ │ │ -00006b30: 6c65 6e64 6172 0a66 6f72 6d61 742e 2020 lendar.format. │ │ │ -00006b40: 5468 6520 7265 7375 6c74 2069 7320 6170 The result is ap │ │ │ -00006b50: 7065 6e64 6564 2074 6f20 7468 6520 6669 pended to the fi │ │ │ -00006b60: 6c65 2049 4341 4c2d 4649 4c45 4e41 4d45 le ICAL-FILENAME │ │ │ -00006b70: 2e0a 0a28 666e 2044 4941 5259 2d46 494c ...(fn DIARY-FIL │ │ │ -00006b80: 454e 414d 4520 4943 414c 2d46 494c 454e ENAME ICAL-FILEN │ │ │ -00006b90: 414d 4529 1f0a 2864 6566 616c 6961 7320 AME)..(defalias │ │ │ -00006ba0: 2769 6361 6c65 6e64 6172 2d65 7870 6f72 'icalendar-expor │ │ │ -00006bb0: 742d 6669 6c65 2023 5b35 3134 2022 725c t-file #[514 "r\ │ │ │ -00006bc0: 3330 3002 2171 5c32 3130 5c33 3031 6564 300.!q\210\301ed │ │ │ -00006bd0: 0323 295c 3230 3722 205b 6669 6e64 2d66 .#)\207" [find-f │ │ │ -00006be0: 696c 6520 6963 616c 656e 6461 722d 6578 ile icalendar-ex │ │ │ -00006bf0: 706f 7274 2d72 6567 696f 6e5d 2036 2028 port-region] 6 ( │ │ │ -00006c00: 2324 202e 2032 3733 3336 2920 2246 4578 #$ . 27336) "FEx │ │ │ -00006c10: 706f 7274 2064 6961 7279 2064 6174 6120 port diary data │ │ │ -00006c20: 6672 6f6d 2066 696c 653a 205c 6e46 696e from file: \nFin │ │ │ -00006c30: 746f 2069 4361 6c65 6e64 6172 2066 696c to iCalendar fil │ │ │ -00006c40: 653a 2022 5d29 0a23 4034 3420 4175 7869 e: "]).#@44 Auxi │ │ │ -00006c50: 6c69 6172 7920 636f 756e 7465 7220 666f liary counter fo │ │ │ -00006c60: 7220 6372 6561 7469 6e67 2075 6e69 7175 r creating uniqu │ │ │ -00006c70: 6520 6964 732e 1f0a 2864 6566 7661 7220 e ids...(defvar │ │ │ -00006c80: 6963 616c 656e 6461 722d 2d75 6964 2d63 icalendar--uid-c │ │ │ -00006c90: 6f75 6e74 2030 2028 2324 202e 2032 3737 ount 0 (#$ . 277 │ │ │ -00006ca0: 3234 2929 0a23 4032 3337 2043 6f6e 7374 24)).#@237 Const │ │ │ -00006cb0: 7275 6374 2061 2075 6e69 7175 6520 6943 ruct a unique iC │ │ │ -00006cc0: 616c 656e 6461 7220 5549 4420 666f 7220 alendar UID for │ │ │ -00006cd0: 6120 6469 6172 7920 656e 7472 792e 0a45 a diary entry..E │ │ │ -00006ce0: 4e54 5259 2d46 554c 4c20 6973 2074 6865 NTRY-FULL is the │ │ │ -00006cf0: 2066 756c 6c20 6469 6172 7920 656e 7472 full diary entr │ │ │ -00006d00: 7920 7374 7269 6e67 2e20 2043 4f4e 5445 y string. CONTE │ │ │ -00006d10: 4e54 5320 6973 2074 6865 0a63 7572 7265 NTS is the.curre │ │ │ -00006d20: 6e74 2069 4361 6c65 6e64 6172 206f 626a nt iCalendar obj │ │ │ -00006d30: 6563 742c 2061 7320 6120 7374 7269 6e67 ect, as a string │ │ │ -00006d40: 2e20 2049 6e63 7265 6173 650a 6069 6361 . Increase.`ica │ │ │ -00006d50: 6c65 6e64 6172 2d2d 7569 642d 636f 756e lendar--uid-coun │ │ │ -00006d60: 7427 2e20 2052 6574 7572 6e73 2074 6865 t'. Returns the │ │ │ -00006d70: 2055 4944 2073 7472 696e 672e 0a0a 2866 UID string...(f │ │ │ -00006d80: 6e20 454e 5452 592d 4655 4c4c 2043 4f4e n ENTRY-FULL CON │ │ │ -00006d90: 5445 4e54 5329 1f0a 2864 6566 616c 6961 TENTS)..(defalia │ │ │ -00006da0: 7320 2769 6361 6c65 6e64 6172 2d2d 6372 s 'icalendar--cr │ │ │ -00006db0: 6561 7465 2d75 6964 2023 5b35 3134 2022 eate-uid #[514 " │ │ │ -00006dc0: 085c 3330 335c 3330 345c 3330 3505 235c .\303\304\305.#\ │ │ │ -00006dd0: 3230 3313 005c 3330 335c 3330 345c 3330 203..\303\304\30 │ │ │ -00006de0: 3505 235c 3236 3201 5c32 3032 6600 5c33 5.#\262.\202f.\3 │ │ │ -00006df0: 3036 5c33 3037 5c33 3130 5c33 3131 095c 06\307\310\311.\ │ │ │ -00006e00: 2203 5c33 3132 5c32 3131 255c 3236 3201 ".\312\211%\262. │ │ │ -00006e10: 0954 115c 3330 365c 3331 335c 3331 345c .T.\306\313\314\ │ │ │ -00006e20: 3331 3521 035c 3331 325c 3231 3125 5c32 315!.\312\211%\2 │ │ │ -00006e30: 3632 015c 3330 365c 3331 365c 3331 305c 62.\306\316\310\ │ │ │ -00006e40: 3331 315c 3331 375c 3332 3006 0821 215c 311\317\320..!!\ │ │ │ -00006e50: 2203 5c33 3132 5c32 3131 255c 3236 3201 ".\312\211%\262. │ │ │ -00006e60: 5c33 3036 5c33 3231 5c6e 5c32 3036 4500 \306\321\n\206E. │ │ │ -00006e70: 5c33 3232 035c 3331 325c 3231 3125 5c32 \322.\312\211%\2 │ │ │ -00006e80: 3632 015c 3332 335c 3332 3403 5c22 5c32 62.\323\324.\"\2 │ │ │ -00006e90: 3033 5c5c 005c 3332 3502 5c33 3236 5c32 03\\.\325.\326\2 │ │ │ -00006ea0: 3234 5c33 3236 5c32 3235 235c 3230 325d 24\326\225#\202] │ │ │ -00006eb0: 005c 3332 375c 3330 365c 3333 3002 045c .\327\306\330..\ │ │ │ -00006ec0: 3331 325c 3231 3125 5c32 3636 5c32 3032 312\211%\266\202 │ │ │ -00006ed0: 5c32 3131 5c32 3037 2220 5b69 6361 6c65 \211\207" [icale │ │ │ -00006ee0: 6e64 6172 2d75 6964 2d66 6f72 6d61 7420 ndar-uid-format │ │ │ -00006ef0: 6963 616c 656e 6461 722d 2d75 6964 2d63 icalendar--uid-c │ │ │ -00006f00: 6f75 6e74 2075 7365 722d 6c6f 6769 6e2d ount user-login- │ │ │ -00006f10: 6e61 6d65 2067 6574 2d74 6578 742d 7072 name get-text-pr │ │ │ -00006f20: 6f70 6572 7479 2030 2075 6964 2072 6570 operty 0 uid rep │ │ │ -00006f30: 6c61 6365 2d72 6567 6578 702d 696e 2d73 lace-regexp-in-s │ │ │ -00006f40: 7472 696e 6720 2225 6322 2066 6f72 6d61 tring "%c" forma │ │ │ -00006f50: 7420 2225 6422 2074 2022 2574 2220 666f t "%d" t "%t" fo │ │ │ -00006f60: 726d 6174 2d74 696d 652d 7374 7269 6e67 rmat-time-string │ │ │ -00006f70: 2022 2573 254e 2220 2225 6822 2061 6273 "%s%N" "%h" abs │ │ │ -00006f80: 2073 7868 6173 6820 2225 7522 2022 554e sxhash "%u" "UN │ │ │ -00006f90: 4b4e 4f57 4e5f 5553 4552 2220 7374 7269 KNOWN_USER" stri │ │ │ -00006fa0: 6e67 2d6d 6174 6368 2022 5e44 5453 5441 ng-match "^DTSTA │ │ │ -00006fb0: 5254 5b5e 3a5d 2a3a 5c5c 285b 302d 395d RT[^:]*:\\([0-9] │ │ │ -00006fc0: 2a5c 5c29 2220 7375 6273 7472 696e 6720 *\\)" substring │ │ │ -00006fd0: 3120 2244 5453 5441 5254 2220 2225 7322 1 "DTSTART" "%s" │ │ │ -00006fe0: 5d20 3130 2028 2324 202e 2032 3738 3139 ] 10 (#$ . 27819 │ │ │ -00006ff0: 295d 290a 2340 3431 3720 4578 706f 7274 )]).#@417 Export │ │ │ -00007000: 2072 6567 696f 6e20 696e 2064 6961 7279 region in diary │ │ │ -00007010: 2066 696c 6520 746f 2069 4361 6c65 6e64 file to iCalend │ │ │ -00007020: 6172 2066 6f72 6d61 742e 0a41 6c6c 2064 ar format..All d │ │ │ -00007030: 6961 7279 2065 6e74 7269 6573 2069 6e20 iary entries in │ │ │ -00007040: 7468 6520 7265 6769 6f6e 2066 726f 6d20 the region from │ │ │ -00007050: 4d49 4e20 746f 204d 4158 2069 6e20 7468 MIN to MAX in th │ │ │ -00007060: 6520 6375 7272 656e 7420 6275 6666 6572 e current buffer │ │ │ -00007070: 2061 7265 0a63 6f6e 7665 7274 6564 2074 are.converted t │ │ │ -00007080: 6f20 6943 616c 656e 6461 7220 666f 726d o iCalendar form │ │ │ -00007090: 6174 2e20 2054 6865 2072 6573 756c 7420 at. The result │ │ │ -000070a0: 6973 2061 7070 656e 6465 6420 746f 2074 is appended to t │ │ │ -000070b0: 6865 2066 696c 650a 4943 414c 2d46 494c he file.ICAL-FIL │ │ │ -000070c0: 454e 414d 452e 0a54 6869 7320 6675 6e63 ENAME..This func │ │ │ -000070d0: 7469 6f6e 2061 7474 656d 7074 7320 746f tion attempts to │ │ │ -000070e0: 2072 6574 7572 6e20 7420 6966 2073 6f6d return t if som │ │ │ -000070f0: 6574 6869 6e67 2067 6f65 7320 7772 6f6e ething goes wron │ │ │ -00007100: 672e 2020 496e 2074 6869 730a 6361 7365 g. In this.case │ │ │ -00007110: 2061 6e20 6572 726f 7220 7374 7269 6e67 an error string │ │ │ -00007120: 2077 6869 6368 2064 6573 6372 6962 6573 which describes │ │ │ -00007130: 2061 6c6c 2074 6865 2065 7272 6f72 7320 all the errors │ │ │ -00007140: 616e 6420 7072 6f62 6c65 6d73 2069 730a and problems is. │ │ │ -00007150: 7772 6974 7465 6e20 696e 746f 2074 6865 written into the │ │ │ -00007160: 2062 7566 6665 7220 602a 6963 616c 656e buffer `*icalen │ │ │ -00007170: 6461 722d 6572 726f 7273 2a27 2e0a 0a28 dar-errors*'...( │ │ │ -00007180: 666e 204d 494e 204d 4158 2049 4341 4c2d fn MIN MAX ICAL- │ │ │ -00007190: 4649 4c45 4e41 4d45 291f 0a28 6465 6661 FILENAME)..(defa │ │ │ -000071a0: 6c69 6173 2027 6963 616c 656e 6461 722d lias 'icalendar- │ │ │ -000071b0: 6578 706f 7274 2d72 6567 696f 6e20 235b export-region #[ │ │ │ -000071c0: 3737 3120 225c 3330 3343 5c33 3033 5c32 771 "\303C\303\2 │ │ │ -000071d0: 3131 5c32 3131 435c 3330 3343 5c33 3034 11\211C\303C\304 │ │ │ -000071e0: 435c 3330 3443 5c33 3034 5c33 3035 5c33 C\304C\304\305\3 │ │ │ -000071f0: 3036 0821 5c33 3037 515c 3330 3443 5c33 06.!\307Q\304C\3 │ │ │ -00007200: 3034 725c 3331 305c 3331 3121 715c 3231 04r\310\311!q\21 │ │ │ -00007210: 305c 3331 3220 5c32 3130 295c 3231 3206 0\312 \210)\212. │ │ │ -00007220: 0d62 5c32 3130 5c33 3133 095c 3230 332e .b\210\313.\203. │ │ │ -00007230: 005c 3331 345c 3230 322f 005c 3331 3506 .\314\202/.\315. │ │ │ -00007240: 0e5c 3331 3623 5c32 3033 5c32 3533 005c .\316#\203\253.\ │ │ │ -00007250: 3331 375c 3332 3021 5c32 3632 5c6e 5c33 317\320!\262\n\3 │ │ │ -00007260: 3231 5c32 3234 5c32 3033 4800 5c33 3137 21\224\203H.\317 │ │ │ -00007270: 5c33 3231 215c 3236 3209 5c32 3032 4b00 \321!\262.\202K. │ │ │ -00007280: 5c33 3033 5c32 3632 0906 0706 5c6e 065c \303\262....\n.\ │ │ │ -00007290: 6e50 5c32 3430 5c32 3130 5c33 3232 315c nP\240\210\3221\ │ │ │ -000072a0: 3232 3000 5c33 3233 0306 0b5c 225c 3236 220.\323...\"\26 │ │ │ -000072b0: 3201 015c 3332 3406 095c 3234 3221 5c32 2..\324..\242!\2 │ │ │ -000072c0: 3430 5c32 3130 5c33 3235 5c33 3236 5c33 40\210\325\326\3 │ │ │ -000072d0: 3237 5c33 3330 5c33 3331 5c33 3332 0610 27\330\331\332.. │ │ │ -000072e0: 060e 060e 060e 060e 065c 6626 065c 3333 .........\f&.\33 │ │ │ -000072f0: 335c 225c 3333 345c 3333 3525 023a 5c32 3\"\334\335%.:\2 │ │ │ -00007300: 3033 5c32 3132 0002 435c 3230 325c 3231 03\212..C\202\21 │ │ │ -00007310: 3300 025c 2230 5c32 3032 5c32 3437 005c 3..\"0\202\247.\ │ │ │ -00007320: 3331 365c 3236 3205 725c 3331 305c 3331 316\262.r\310\31 │ │ │ -00007330: 3121 715c 3231 305c 3333 365c 3333 375c 1!q\210\336\337\ │ │ │ -00007340: 3334 3065 605c 2203 060e 2463 295c 3236 340e`\"...$c)\26 │ │ │ -00007350: 3201 5c32 3130 5c32 3032 2500 725c 3334 2.\210\202%.r\34 │ │ │ -00007360: 311a 5c33 3432 065c 6621 715c 3231 3064 1.\342.\f!q\210d │ │ │ -00007370: 625c 3231 305c 3334 3363 5c32 3130 5c33 b\210\343c\210\3 │ │ │ -00007380: 3434 635c 3231 305c 3334 3563 5c32 3130 44c\210\345c\210 │ │ │ -00007390: 065c 6e5c 3234 3263 5c32 3130 5c33 3436 .\n\242c\210\346 │ │ │ -000073a0: 635c 3231 305c 3334 3720 5c32 3130 035c c\210\347 \210.\ │ │ │ -000073b0: 3230 345c 3332 3200 5c33 3530 205c 3231 204\322.\350 \21 │ │ │ -000073c0: 302b 035c 3230 3722 205b 6469 6172 792d 0+.\207" [diary- │ │ │ -000073d0: 6e6f 6e6d 6172 6b69 6e67 2d73 796d 626f nonmarking-symbo │ │ │ -000073e0: 6c20 6963 616c 656e 6461 722d 6578 706f l icalendar-expo │ │ │ -000073f0: 7274 2d68 6964 6465 6e2d 6469 6172 792d rt-hidden-diary- │ │ │ -00007400: 656e 7472 6965 7320 636f 6469 6e67 2d73 entries coding-s │ │ │ -00007410: 7973 7465 6d2d 666f 722d 7772 6974 6520 ystem-for-write │ │ │ -00007420: 2222 206e 696c 2022 5e22 2072 6567 6578 "" nil "^" regex │ │ │ -00007430: 702d 7175 6f74 6520 223f 2220 6765 742d p-quote "?" get- │ │ │ -00007440: 6275 6666 6572 2d63 7265 6174 6520 222a buffer-create "* │ │ │ -00007450: 6963 616c 656e 6461 722d 6572 726f 7273 icalendar-errors │ │ │ -00007460: 2a22 2065 7261 7365 2d62 7566 6665 7220 *" erase-buffer │ │ │ -00007470: 7265 2d73 6561 7263 682d 666f 7277 6172 re-search-forwar │ │ │ -00007480: 6420 225e 5c5c 285b 5e20 095c 6e23 5d2e d "^\\([^ .\n#]. │ │ │ -00007490: 2b5c 5c29 5c5c 285c 5c28 5c6e 5b20 095d +\\)\\(\\(\n[ .] │ │ │ -000074a0: 2e2a 5c5c 292a 5c5c 2922 2022 5e5c 5c28 .*\\)*\\)" "^\\( │ │ │ -000074b0: 5b5e 2009 5c6e 2623 5d2e 2b5c 5c29 5c5c [^ .\n&#].+\\)\\ │ │ │ -000074c0: 285c 5c28 5c6e 5b20 095d 2e2a 5c5c 292a (\\(\n[ .].*\\)* │ │ │ -000074d0: 5c5c 2922 2074 206d 6174 6368 2d73 7472 \\)" t match-str │ │ │ -000074e0: 696e 6720 3120 3220 2865 7272 6f72 2920 ing 1 2 (error) │ │ │ -000074f0: 6963 616c 656e 6461 722d 2d63 6f6e 7665 icalendar--conve │ │ │ -00007500: 7274 2d74 6f2d 6963 616c 2069 6361 6c65 rt-to-ical icale │ │ │ -00007510: 6e64 6172 2d2d 7061 7273 652d 7375 6d6d ndar--parse-summ │ │ │ -00007520: 6172 792d 616e 642d 7265 7374 206d 6170 ary-and-rest map │ │ │ -00007530: 6320 6d61 6b65 2d62 7974 652d 636f 6465 c make-byte-code │ │ │ -00007540: 2032 3537 2022 5c33 3033 0140 5c33 3036 257 "\303.@\306 │ │ │ -00007550: 0341 515c 3234 305c 3231 305c 3330 375c .AQ\240\210\307\ │ │ │ -00007560: 3331 305c 3330 355c 3234 325c 2241 5c33 310\305\242\"A\3 │ │ │ -00007570: 3037 5c33 3131 5c33 3035 5c32 3432 5c22 07\311\305\242\" │ │ │ -00007580: 415c 3330 375c 3331 325c 3330 355c 3234 A\307\312\305\24 │ │ │ -00007590: 325c 2241 5c33 3037 5c33 3133 5c33 3035 2\"A\307\313\305 │ │ │ -000075a0: 5c32 3432 5c22 415c 3330 375c 3331 345c \242\"A\307\314\ │ │ │ -000075b0: 3330 355c 3234 325c 2241 5c33 3037 5c33 305\242\"A\307\3 │ │ │ -000075c0: 3135 5c33 3035 5c32 3432 5c22 415c 3330 15\305\242\"A\30 │ │ │ -000075d0: 375c 3331 365c 3330 355c 3234 325c 2241 7\316\305\242\"A │ │ │ -000075e0: 0606 5c32 3033 4100 5c33 3033 5c32 3131 ..\203A.\303\211 │ │ │ -000075f0: 5c32 3432 5c33 3137 0609 515c 3234 305c \242\317..Q\240\ │ │ │ -00007600: 3231 3005 5c32 3033 4e00 5c33 3033 5c32 210.\203N.\303\2 │ │ │ -00007610: 3131 5c32 3432 5c33 3230 0608 515c 3234 11\242\320..Q\24 │ │ │ -00007620: 305c 3231 3004 5c32 3033 5b00 5c33 3033 0\210.\203[.\303 │ │ │ -00007630: 5c32 3131 5c32 3432 5c33 3231 0607 515c \211\242\321..Q\ │ │ │ -00007640: 3234 305c 3231 3003 5c32 3033 6800 5c33 240\210.\203h.\3 │ │ │ -00007650: 3033 5c32 3131 5c32 3432 5c33 3232 0606 03\211\242\322.. │ │ │ -00007660: 515c 3234 305c 3231 3002 5c32 3033 7400 Q\240\210.\203t. │ │ │ -00007670: 5c33 3033 5c32 3131 5c32 3432 5c33 3233 \303\211\242\323 │ │ │ -00007680: 0551 5c32 3430 5c32 3130 015c 3230 335c .Q\240\210.\203\ │ │ │ -00007690: 3230 3000 5c33 3033 5c32 3131 5c32 3432 200.\303\211\242 │ │ │ -000076a0: 5c33 3234 0451 5c32 3430 5c32 3130 5c33 \324.Q\240\210\3 │ │ │ -000076b0: 3032 5c33 3235 025c 3230 365c 3231 3400 02\325.\206\214. │ │ │ -000076c0: 5c33 3236 5c33 3031 5c32 3432 5c33 3033 \326\301\242\303 │ │ │ -000076d0: 5c32 3432 5c22 505c 3234 305c 3231 305c \242\"P\240\210\ │ │ │ -000076e0: 3330 345c 3332 3706 0941 215c 3234 305c 304\327..A!\240\ │ │ │ -000076f0: 3236 3608 5c33 3030 5c32 3131 5c32 3432 266.\300\211\242 │ │ │ -00007700: 5c33 3032 5c32 3432 5c33 3033 5c32 3432 \302\242\303\242 │ │ │ -00007710: 5c33 3034 5c32 3432 5c33 3330 5c32 3630 \304\242\330\260 │ │ │ -00007720: 055c 3234 305c 3230 3722 2076 636f 6e63 .\240\207" vconc │ │ │ -00007730: 6174 2076 6563 746f 7220 5b22 5c6e 5355 at vector ["\nSU │ │ │ -00007740: 4d4d 4152 593a 2220 6173 736f 6320 636c MMARY:" assoc cl │ │ │ -00007750: 6120 6465 7320 6c6f 6320 6f72 6720 7374 a des loc org st │ │ │ -00007760: 6120 7572 6c20 7569 6420 225c 6e43 4c41 a url uid "\nCLA │ │ │ -00007770: 5353 3a22 2022 5c6e 4445 5343 5249 5054 SS:" "\nDESCRIPT │ │ │ -00007780: 494f 4e3a 2220 225c 6e4c 4f43 4154 494f ION:" "\nLOCATIO │ │ │ -00007790: 4e3a 2220 225c 6e4f 5247 414e 495a 4552 N:" "\nORGANIZER │ │ │ -000077a0: 3a22 2022 5c6e 5354 4154 5553 3a22 2022 :" "\nSTATUS:" " │ │ │ -000077b0: 5c6e 5552 4c3a 2220 225c 6e42 4547 494e \nURL:" "\nBEGIN │ │ │ -000077c0: 3a56 4556 454e 545c 6e55 4944 3a22 2069 :VEVENT\nUID:" i │ │ │ -000077d0: 6361 6c65 6e64 6172 2d2d 6372 6561 7465 calendar--create │ │ │ -000077e0: 2d75 6964 2069 6361 6c65 6e64 6172 2d2d -uid icalendar-- │ │ │ -000077f0: 6372 6561 7465 2d69 6361 6c2d 616c 6172 create-ical-alar │ │ │ -00007800: 6d20 225c 6e45 4e44 3a56 4556 454e 5422 m "\nEND:VEVENT" │ │ │ -00007810: 5d20 3133 2022 5c6e 5c6e 2866 6e20 434f ] 13 "\n\n(fn CO │ │ │ -00007820: 4e54 454e 5453 2d4e 2d53 554d 4d41 5259 NTENTS-N-SUMMARY │ │ │ -00007830: 2922 2066 6f72 6d61 742d 6d65 7373 6167 )" format-messag │ │ │ -00007840: 6520 2245 7272 6f72 2069 6e20 6c69 6e65 e "Error in line │ │ │ -00007850: 2025 6420 2d2d 2025 733a 2060 2573 275c %d -- %s: `%s'\ │ │ │ -00007860: 6e22 2063 6f75 6e74 2d6c 696e 6573 2075 n" count-lines u │ │ │ -00007870: 7466 2d38 2066 696e 642d 6669 6c65 2022 tf-8 find-file " │ │ │ -00007880: 4245 4749 4e3a 5643 414c 454e 4441 5222 BEGIN:VCALENDAR" │ │ │ -00007890: 2022 5c6e 5052 4f44 4944 3a2d 2f2f 456d "\nPRODID:-//Em │ │ │ -000078a0: 6163 732f 2f4e 4f4e 5347 4d4c 2069 6361 acs//NONSGML ica │ │ │ -000078b0: 6c65 6e64 6172 2e65 6c2f 2f45 4e22 2022 lendar.el//EN" " │ │ │ -000078c0: 5c6e 5645 5253 494f 4e3a 322e 3022 2022 \nVERSION:2.0" " │ │ │ -000078d0: 5c6e 454e 443a 5643 414c 454e 4441 525c \nEND:VCALENDAR\ │ │ │ -000078e0: 6e22 2073 6176 652d 6275 6666 6572 2062 n" save-buffer b │ │ │ -000078f0: 7572 792d 6275 6666 6572 5d20 3236 2028 ury-buffer] 26 ( │ │ │ -00007900: 2324 202e 2032 3836 3636 2920 2272 5c6e #$ . 28666) "r\n │ │ │ -00007910: 4645 7870 6f72 7420 6469 6172 7920 6461 FExport diary da │ │ │ -00007920: 7461 2069 6e74 6f20 6943 616c 656e 6461 ta into iCalenda │ │ │ -00007930: 7220 6669 6c65 3a20 225d 290a 2340 3139 r file: "]).#@19 │ │ │ -00007940: 3820 436f 6e76 6572 7420 6120 6469 6172 8 Convert a diar │ │ │ -00007950: 7920 656e 7472 7920 746f 2069 4361 6c65 y entry to iCale │ │ │ -00007960: 6e64 6172 2066 6f72 6d61 742e 0a4e 4f4e ndar format..NON │ │ │ -00007970: 4d41 524b 4552 2069 7320 6120 7265 6775 MARKER is a regu │ │ │ -00007980: 6c61 7220 6578 7072 6573 7369 6f6e 206d lar expression m │ │ │ -00007990: 6174 6368 696e 6720 7468 6520 7374 6172 atching the star │ │ │ -000079a0: 7420 6f66 206e 6f6e 2d6d 6172 6b69 6e67 t of non-marking │ │ │ -000079b0: 0a65 6e74 7269 6573 2e20 2045 4e54 5259 .entries. ENTRY │ │ │ -000079c0: 2d4d 4149 4e20 6973 2074 6865 2066 6972 -MAIN is the fir │ │ │ -000079d0: 7374 206c 696e 6520 6f66 2074 6865 2064 st line of the d │ │ │ -000079e0: 6961 7279 2065 6e74 7279 2e0a 0a28 666e iary entry...(fn │ │ │ -000079f0: 204e 4f4e 4d41 524b 4552 2045 4e54 5259 NONMARKER ENTRY │ │ │ -00007a00: 2d4d 4149 4e29 1f0a 2864 6566 616c 6961 -MAIN)..(defalia │ │ │ -00007a10: 7320 2769 6361 6c65 6e64 6172 2d2d 636f s 'icalendar--co │ │ │ -00007a20: 6e76 6572 742d 746f 2d69 6361 6c20 235b nvert-to-ical #[ │ │ │ -00007a30: 3531 3420 2208 5c32 3034 2700 5c33 3031 514 ".\204'.\301 │ │ │ -00007a40: 0202 5c22 5c32 3036 4600 5c33 3032 0202 ..\"\206F.\302.. │ │ │ -00007a50: 5c22 5c32 3036 4600 5c33 3033 0202 5c22 \"\206F.\303..\" │ │ │ -00007a60: 5c32 3036 4600 5c33 3034 0202 5c22 5c32 \206F.\304..\"\2 │ │ │ -00007a70: 3036 4600 5c33 3035 0202 5c22 5c32 3036 06F.\305..\"\206 │ │ │ -00007a80: 4600 5c33 3036 0202 5c22 5c32 3036 4600 F.\306..\"\206F. │ │ │ -00007a90: 5c33 3037 0202 5c22 5c32 3036 4600 5c33 \307..\"\206F.\3 │ │ │ -00007aa0: 3130 0202 5c22 5c32 3036 4600 5c33 3131 10..\"\206F.\311 │ │ │ -00007ab0: 0202 5c22 5c32 3036 4600 5c33 3132 5c33 ..\"\206F.\312\3 │ │ │ -00007ac0: 3133 215c 3230 3722 205b 6963 616c 656e 13!\207" [icalen │ │ │ -00007ad0: 6461 722d 6578 706f 7274 2d73 6578 702d dar-export-sexp- │ │ │ -00007ae0: 656e 756d 6572 6174 652d 616c 6c20 6963 enumerate-all ic │ │ │ -00007af0: 616c 656e 6461 722d 2d63 6f6e 7665 7274 alendar--convert │ │ │ -00007b00: 2d61 6e6e 6976 6572 7361 7279 2d74 6f2d -anniversary-to- │ │ │ -00007b10: 6963 616c 2069 6361 6c65 6e64 6172 2d2d ical icalendar-- │ │ │ -00007b20: 636f 6e76 6572 742d 6379 636c 6963 2d74 convert-cyclic-t │ │ │ -00007b30: 6f2d 6963 616c 2069 6361 6c65 6e64 6172 o-ical icalendar │ │ │ -00007b40: 2d2d 636f 6e76 6572 742d 6461 7465 2d74 --convert-date-t │ │ │ -00007b50: 6f2d 6963 616c 2069 6361 6c65 6e64 6172 o-ical icalendar │ │ │ -00007b60: 2d2d 636f 6e76 6572 742d 666c 6f61 742d --convert-float- │ │ │ -00007b70: 746f 2d69 6361 6c20 6963 616c 656e 6461 to-ical icalenda │ │ │ -00007b80: 722d 2d63 6f6e 7665 7274 2d62 6c6f 636b r--convert-block │ │ │ -00007b90: 2d74 6f2d 6963 616c 2069 6361 6c65 6e64 -to-ical icalend │ │ │ -00007ba0: 6172 2d2d 636f 6e76 6572 742d 7365 7870 ar--convert-sexp │ │ │ -00007bb0: 2d74 6f2d 6963 616c 2069 6361 6c65 6e64 -to-ical icalend │ │ │ -00007bc0: 6172 2d2d 636f 6e76 6572 742d 7765 656b ar--convert-week │ │ │ -00007bd0: 6c79 2d74 6f2d 6963 616c 2069 6361 6c65 ly-to-ical icale │ │ │ -00007be0: 6e64 6172 2d2d 636f 6e76 6572 742d 7965 ndar--convert-ye │ │ │ -00007bf0: 6172 6c79 2d74 6f2d 6963 616c 2069 6361 arly-to-ical ica │ │ │ -00007c00: 6c65 6e64 6172 2d2d 636f 6e76 6572 742d lendar--convert- │ │ │ -00007c10: 6f72 6469 6e61 7279 2d74 6f2d 6963 616c ordinary-to-ical │ │ │ -00007c20: 2065 7272 6f72 2022 436f 756c 6420 6e6f error "Could no │ │ │ -00007c30: 7420 7061 7273 6520 656e 7472 7922 5d20 t parse entry"] │ │ │ -00007c40: 3520 2823 2420 2e20 3331 3034 3229 5d29 5 (#$ . 31042)]) │ │ │ -00007c50: 0a23 4031 3038 2050 6172 7365 2053 554d .#@108 Parse SUM │ │ │ -00007c60: 4d41 5259 2d41 4e44 2d52 4553 5420 6672 MARY-AND-REST fr │ │ │ -00007c70: 6f6d 2061 2064 6961 7279 2074 6f20 6669 om a diary to fi │ │ │ -00007c80: 6c6c 2069 4361 6c65 6e64 6172 2070 726f ll iCalendar pro │ │ │ -00007c90: 7065 7274 6965 732e 0a52 6574 7572 6e73 perties..Returns │ │ │ -00007ca0: 2061 6e20 616c 6973 742e 0a0a 2866 6e20 an alist...(fn │ │ │ -00007cb0: 5355 4d4d 4152 592d 414e 442d 5245 5354 SUMMARY-AND-REST │ │ │ -00007cc0: 291f 0a28 6465 6661 6c69 6173 2027 6963 )..(defalias 'ic │ │ │ -00007cd0: 616c 656e 6461 722d 2d70 6172 7365 2d73 alendar--parse-s │ │ │ -00007ce0: 756d 6d61 7279 2d61 6e64 2d72 6573 7420 ummary-and-rest │ │ │ -00007cf0: 235b 3235 3720 225c 3330 3620 5c33 3037 #[257 "\306 \307 │ │ │ -00007d00: 5c33 3130 5c33 3131 5c33 3132 5c33 3133 \310\311\312\313 │ │ │ -00007d10: 0521 5c33 3134 5c22 5c33 3135 245c 3231 .!\314\"\315$\21 │ │ │ -00007d20: 365c 3331 3608 213f 5c32 3035 5c33 3130 6\316.!?\205\310 │ │ │ -00007d30: 025c 3331 3719 0843 5c33 3230 5c33 3231 .\317..C\320\321 │ │ │ -00007d40: 085c 225c 3230 3621 005c 3332 325c 3332 .\"\206!.\322\32 │ │ │ -00007d50: 305c 3332 3308 5c22 5c32 3036 2900 5c33 0\323.\"\206).\3 │ │ │ -00007d60: 3232 5c33 3230 5c33 3234 085c 225c 3230 22\320\324.\"\20 │ │ │ -00007d70: 3631 005c 3332 325c 3332 305c 3332 3508 61.\322\320\325. │ │ │ -00007d80: 5c22 5c32 3036 3900 5c33 3232 5c33 3230 \"\2069.\322\320 │ │ │ -00007d90: 5c33 3236 085c 225c 3230 3641 005c 3332 \326.\"\206A.\32 │ │ │ -00007da0: 325c 3332 305c 3332 3708 5c22 5c32 3036 2\320\327.\"\206 │ │ │ -00007db0: 4900 5c33 3232 5c33 3230 5c33 3330 085c I.\322\320\330.\ │ │ │ -00007dc0: 225c 3230 3651 005c 3332 325c 3332 305c "\206Q.\322\320\ │ │ │ -00007dd0: 3333 3108 5c22 5c32 3036 5900 5c33 3232 331.\"\206Y.\322 │ │ │ -00007de0: 5c33 3332 0608 0608 0608 0608 0607 0609 \332............ │ │ │ -00007df0: 0608 0608 5c32 3537 085c 3333 335c 225c ....\257.\333\"\ │ │ │ -00007e00: 3331 305c 3331 375c 3231 315c 3231 315c 310\317\211\211\ │ │ │ -00007e10: 3231 315c 3231 315c 3231 315c 3231 3106 211\211\211\211. │ │ │ -00007e20: 0847 5c33 3130 5c32 3131 0257 5c32 3033 .G\310\211.W\203 │ │ │ -00007e30: 7801 5c32 3131 0613 5c33 3130 595c 3230 x.\211..\310Y\20 │ │ │ -00007e40: 335c 3234 3000 5c32 3131 065c 6638 0614 3\240.\211.\f8.. │ │ │ -00007e50: 555c 3230 335c 3234 3000 065c 6e54 5c32 U\203\240..\nT\2 │ │ │ -00007e60: 3632 0b5c 3333 3406 0b5f 5c32 3632 5c6e 62.\334.._\262\n │ │ │ -00007e70: 5c32 3032 7001 0612 5c33 3130 595c 3230 \202p...\310Y\20 │ │ │ -00007e80: 335c 3237 3700 5c32 3131 065c 6638 0613 3\277.\211.\f8.. │ │ │ -00007e90: 555c 3230 335c 3237 3700 065c 6e54 5c32 U\203\277..\nT\2 │ │ │ -00007ea0: 3632 0b5c 3333 3406 0b5f 5c32 3632 095c 62.\334.._\262.\ │ │ │ -00007eb0: 3230 3270 0106 115c 3331 3059 5c32 3033 202p...\310Y\203 │ │ │ -00007ec0: 5c33 3336 005c 3231 3106 5c66 3806 1255 \336.\211.\f8..U │ │ │ -00007ed0: 5c32 3033 5c33 3336 0006 5c6e 545c 3236 \203\336..\nT\26 │ │ │ -00007ee0: 320b 5c33 3334 060b 5f5c 3236 3208 5c32 2.\334.._\262.\2 │ │ │ -00007ef0: 3032 7001 0610 5c33 3130 595c 3230 335c 02p...\310Y\203\ │ │ │ -00007f00: 3337 3500 5c32 3131 065c 6638 0611 555c 375.\211.\f8..U\ │ │ │ -00007f10: 3230 335c 3337 3500 065c 6e54 5c32 3632 203\375..\nT\262 │ │ │ -00007f20: 0b5c 3333 3406 0b5f 5c32 3632 075c 3230 .\334.._\262.\20 │ │ │ -00007f30: 3270 0106 0e5c 3331 3059 5c32 3033 1c01 2p...\310Y\203.. │ │ │ -00007f40: 5c32 3131 065c 6638 060f 555c 3230 331c \211.\f8..U\203. │ │ │ -00007f50: 0106 5c6e 545c 3236 320b 5c33 3334 060b ..\nT\262.\334.. │ │ │ -00007f60: 5f5c 3236 3206 5c32 3032 7001 060f 5c33 _\262.\202p...\3 │ │ │ -00007f70: 3130 595c 3230 3335 015c 3231 3106 5c66 10Y\2035.\211.\f │ │ │ -00007f80: 3806 1055 5c32 3033 3501 065c 6e54 5c32 8..U\2035..\nT\2 │ │ │ -00007f90: 3632 0b5c 3230 3270 0106 0d5c 3331 3059 62.\202p...\310Y │ │ │ -00007fa0: 5c32 3033 5401 5c32 3131 065c 6638 060e \203T.\211.\f8.. │ │ │ -00007fb0: 555c 3230 3354 0106 5c6e 545c 3236 320b U\203T..\nT\262. │ │ │ -00007fc0: 5c33 3334 060b 5f5c 3236 3205 5c32 3032 \334.._\262.\202 │ │ │ -00007fd0: 7001 065c 665c 3331 3059 5c32 3033 7001 p..\f\310Y\203p. │ │ │ -00007fe0: 5c32 3131 065c 6638 060d 555c 3230 3370 \211.\f8..U\203p │ │ │ -00007ff0: 0106 5c6e 545c 3236 320b 5c33 3334 060b ..\nT\262.\334.. │ │ │ -00008000: 5f5c 3236 3204 5c32 3130 5c32 3131 545c _\262.\210\211T\ │ │ │ -00008010: 3236 3201 5c32 3032 7a00 5c32 3636 025c 262.\202z.\266.\ │ │ │ -00008020: 3333 355c 3330 375c 3333 365c 3333 375c 335\307\336\337\ │ │ │ -00008030: 3331 325c 3331 3306 1721 5c33 3430 5c22 312\313..!\340\" │ │ │ -00008040: 5c33 3431 5c33 3432 255c 3332 365c 3334 \341\342%\326\34 │ │ │ -00008050: 335c 6e5c 3334 3451 445c 3332 315c 3334 3\n\344QD\321\34 │ │ │ -00008060: 330b 5c33 3434 5144 5c33 3233 5c33 3433 3.\344QD\323\343 │ │ │ -00008070: 5c66 5c33 3434 5144 5c33 3234 5c33 3433 \f\344QD\324\343 │ │ │ -00008080: 0d5c 3334 3451 445c 3332 355c 3334 330e .\344QD\325\343. │ │ │ -00008090: 325c 3334 3451 445c 3332 375c 3334 330e 2\344QD\327\343. │ │ │ -000080a0: 335c 3334 3451 445c 3333 305c 3334 330e 3\344QD\330\343. │ │ │ -000080b0: 345c 3334 3451 445c 3333 315c 3334 330e 4\344QD\331\343. │ │ │ -000080c0: 355c 3334 3451 445c 3235 3708 5c22 5c32 5\344QD\257.\"\2 │ │ │ -000080d0: 3130 0611 5c33 3435 5c33 3436 5c33 3236 10..\345\346\326 │ │ │ -000080e0: 5c33 3437 0616 5c32 3432 5c33 3137 5c33 \347..\242\317\3 │ │ │ -000080f0: 3530 255c 3335 3151 5c32 3430 5c32 3130 50%\351Q\240\210 │ │ │ -00008100: 5c33 3230 0612 5c32 3432 0615 5c22 5c32 \320..\242..\"\2 │ │ │ -00008110: 3035 5c33 3035 025c 3331 375c 3231 315c 05\305.\317\211\ │ │ │ -00008120: 3231 315c 3231 315c 3231 315c 3231 315c 211\211\211\211\ │ │ │ -00008130: 3231 3106 0d5c 3230 335c 3337 3001 060d 211..\203\370... │ │ │ -00008140: 5c32 3234 5c32 3033 5c33 3730 015c 3335 \224\203\370.\35 │ │ │ -00008150: 3206 1b06 0f5c 3232 3406 105c 3232 3523 2....\224..\225# │ │ │ -00008160: 5c32 3632 0706 5c66 5c32 3033 0f02 065c \262..\f\203...\ │ │ │ -00008170: 665c 3232 345c 3230 330f 025c 3335 3206 f\224\203..\352. │ │ │ -00008180: 1b06 0e5c 3232 3406 0f5c 3232 3523 5c32 ...\224..\225#\2 │ │ │ -00008190: 3632 0606 0b5c 3230 3326 0206 0b5c 3232 62...\203&...\22 │ │ │ -000081a0: 345c 3230 3326 025c 3335 3206 1b06 0d5c 4\203&.\352....\ │ │ │ -000081b0: 3232 3406 0e5c 3232 3523 5c32 3632 0506 224..\225#\262.. │ │ │ -000081c0: 5c6e 5c32 3033 3d02 065c 6e5c 3232 345c \n\203=..\n\224\ │ │ │ -000081d0: 3230 333d 025c 3335 3206 1b06 5c66 5c32 203=.\352...\f\2 │ │ │ -000081e0: 3234 060d 5c32 3235 235c 3236 3204 0609 24..\225#\262... │ │ │ -000081f0: 5c32 3033 5402 0609 5c32 3234 5c32 3033 \203T...\224\203 │ │ │ -00008200: 5402 5c33 3532 061b 060b 5c32 3234 065c T.\352....\224.\ │ │ │ -00008210: 665c 3232 3523 5c32 3632 0306 085c 3230 f\225#\262...\20 │ │ │ -00008220: 336b 0206 085c 3232 345c 3230 336b 025c 3k...\224\203k.\ │ │ │ -00008230: 3335 3206 1b06 5c6e 5c32 3234 060b 5c32 352...\n\224..\2 │ │ │ -00008240: 3235 235c 3236 3202 0607 5c32 3033 5c32 25#\262...\203\2 │ │ │ -00008250: 3032 0206 075c 3232 345c 3230 335c 3230 02...\224\203\20 │ │ │ -00008260: 3202 5c33 3532 061b 0609 5c32 3234 065c 2.\352....\224.\ │ │ │ -00008270: 6e5c 3232 3523 5c32 3632 0106 065c 3230 n\225#\262...\20 │ │ │ -00008280: 355c 3231 3302 5c33 3533 0607 4206 065c 5\213.\353..B..\ │ │ │ -00008290: 3230 355c 3232 3402 5c33 3534 0607 4206 205\224.\354..B. │ │ │ -000082a0: 065c 3230 355c 3233 3502 5c33 3535 0607 .\205\235.\355.. │ │ │ -000082b0: 4206 065c 3230 355c 3234 3602 5c33 3536 B..\205\246.\356 │ │ │ -000082c0: 0607 4206 065c 3230 355c 3235 3702 5c33 ..B..\205\257.\3 │ │ │ -000082d0: 3537 0607 4206 065c 3230 355c 3237 3002 57..B..\205\270. │ │ │ -000082e0: 5c33 3630 0607 4206 065c 3230 355c 3330 \360..B..\205\30 │ │ │ -000082f0: 3102 5c33 3631 0607 425c 3235 3707 5c32 1.\361..B\257.\2 │ │ │ -00008300: 3636 5c32 3037 295c 3236 365c 3232 3229 66\207)\266\222) │ │ │ -00008310: 5c32 3037 2220 5b69 6361 6c65 6e64 6172 \207" [icalendar │ │ │ -00008320: 2d69 6d70 6f72 742d 666f 726d 6174 2063 -import-format c │ │ │ -00008330: 6173 652d 666f 6c64 2d73 6561 7263 6820 ase-fold-search │ │ │ -00008340: 6963 616c 656e 6461 722d 696d 706f 7274 icalendar-import │ │ │ -00008350: 2d66 6f72 6d61 742d 7375 6d6d 6172 7920 -format-summary │ │ │ -00008360: 6963 616c 656e 6461 722d 696d 706f 7274 icalendar-import │ │ │ -00008370: 2d66 6f72 6d61 742d 636c 6173 7320 6963 -format-class ic │ │ │ -00008380: 616c 656e 6461 722d 696d 706f 7274 2d66 alendar-import-f │ │ │ -00008390: 6f72 6d61 742d 6465 7363 7269 7074 696f ormat-descriptio │ │ │ -000083a0: 6e20 6963 616c 656e 6461 722d 696d 706f n icalendar-impo │ │ │ -000083b0: 7274 2d66 6f72 6d61 742d 6c6f 6361 7469 rt-format-locati │ │ │ -000083c0: 6f6e 206d 6174 6368 2d64 6174 6120 6d61 on match-data ma │ │ │ -000083d0: 6b65 2d62 7974 652d 636f 6465 2030 2022 ke-byte-code 0 " │ │ │ -000083e0: 5c33 3031 5c33 3030 5c33 3032 5c22 5c32 \301\300\302\"\2 │ │ │ -000083f0: 3037 2220 7663 6f6e 6361 7420 7665 6374 07" vconcat vect │ │ │ -00008400: 6f72 205b 7365 742d 6d61 7463 682d 6461 or [set-match-da │ │ │ -00008410: 7461 2065 7661 706f 7261 7465 5d20 3320 ta evaporate] 3 │ │ │ -00008420: 6675 6e63 7469 6f6e 7020 6e69 6c20 7374 functionp nil st │ │ │ -00008430: 7269 6e67 2d6d 6174 6368 2022 2563 2220 ring-match "%c" │ │ │ -00008440: 2d31 2022 2564 2220 2225 6c22 2022 256f -1 "%d" "%l" "%o │ │ │ -00008450: 2220 2225 7322 2022 2574 2220 2225 7522 " "%s" "%t" "%u" │ │ │ -00008460: 2022 2555 2220 736f 7274 203c 2032 206d "%U" sort < 2 m │ │ │ -00008470: 6170 6320 3235 3720 225c 3330 305c 3330 apc 257 "\300\30 │ │ │ -00008480: 3102 4003 4140 5c33 3030 5c32 3432 5c33 1.@.A@\300\242\3 │ │ │ -00008490: 3032 5c32 3131 255c 3234 305c 3230 3722 02\211%\240\207" │ │ │ -000084a0: 205b 7265 706c 6163 652d 7265 6765 7870 [replace-regexp │ │ │ -000084b0: 2d69 6e2d 7374 7269 6e67 2074 5d20 3820 -in-string t] 8 │ │ │ -000084c0: 225c 6e5c 6e28 666e 2049 4a29 2220 225c "\n\n(fn IJ)" "\ │ │ │ -000084d0: 5c28 2220 225c 5c29 3f3f 2220 225c 5c60 \(" "\\)??" "\\` │ │ │ -000084e0: 2220 7265 706c 6163 652d 7265 6765 7870 " replace-regexp │ │ │ -000084f0: 2d69 6e2d 7374 7269 6e67 2022 5c5c 282e -in-string "\\(. │ │ │ -00008500: 2a3f 5c5c 2922 2074 2022 5c5c 2722 2073 *?\\)" t "\\'" s │ │ │ -00008510: 7562 7374 7269 6e67 2063 6c61 2064 6573 ubstring cla des │ │ │ -00008520: 206c 6f63 206f 7267 2073 7461 2075 726c loc org sta url │ │ │ -00008530: 2075 6964 2069 6361 6c65 6e64 6172 2d69 uid icalendar-i │ │ │ -00008540: 6d70 6f72 742d 666f 726d 6174 2d6f 7267 mport-format-org │ │ │ -00008550: 616e 697a 6572 2069 6361 6c65 6e64 6172 anizer icalendar │ │ │ -00008560: 2d69 6d70 6f72 742d 666f 726d 6174 2d73 -import-format-s │ │ │ -00008570: 7461 7475 7320 6963 616c 656e 6461 722d tatus icalendar- │ │ │ -00008580: 696d 706f 7274 2d66 6f72 6d61 742d 7572 import-format-ur │ │ │ -00008590: 6c20 6963 616c 656e 6461 722d 696d 706f l icalendar-impo │ │ │ -000085a0: 7274 2d66 6f72 6d61 742d 7569 645d 2033 rt-format-uid] 3 │ │ │ -000085b0: 3520 2823 2420 2e20 3331 3833 3129 5d29 5 (#$ . 31831)]) │ │ │ -000085c0: 0a23 4035 3920 5265 7475 726e 2056 414c .#@59 Return VAL │ │ │ -000085d0: 4152 4d20 626c 6f63 6b73 2066 6f72 2074 ARM blocks for t │ │ │ -000085e0: 6865 2067 6976 656e 2053 554d 4d41 5259 he given SUMMARY │ │ │ -000085f0: 2e0a 0a28 666e 2053 554d 4d41 5259 291f ...(fn SUMMARY). │ │ │ -00008600: 0a28 6465 6661 6c69 6173 2027 6963 616c .(defalias 'ical │ │ │ -00008610: 656e 6461 722d 2d63 7265 6174 652d 6963 endar--create-ic │ │ │ -00008620: 616c 2d61 6c61 726d 2023 5b32 3537 2022 al-alarm #[257 " │ │ │ -00008630: 085c 3230 351f 0008 4008 4140 5c33 3031 .\205...@.A@\301 │ │ │ -00008640: 5c33 3032 5c33 3033 5c33 3034 5c33 3035 \302\303\304\305 │ │ │ -00008650: 0607 0607 5c22 5c33 3036 5c22 5c33 3037 ....\"\306\"\307 │ │ │ -00008660: 5c33 3130 255c 3331 3101 035c 3331 3223 \310%\311..\312# │ │ │ -00008670: 5c32 3636 5c32 3033 5c32 3037 2220 5b69 \266\203\207" [i │ │ │ -00008680: 6361 6c65 6e64 6172 2d65 7870 6f72 742d calendar-export- │ │ │ -00008690: 616c 6172 6d73 206d 616b 652d 6279 7465 alarms make-byte │ │ │ -000086a0: 2d63 6f64 6520 3235 3720 225c 3330 325c -code 257 "\302\ │ │ │ -000086b0: 3330 3102 5c33 3030 235c 3230 3722 2076 301.\300#\207" v │ │ │ -000086c0: 636f 6e63 6174 2076 6563 746f 7220 5b69 concat vector [i │ │ │ -000086d0: 6361 6c65 6e64 6172 2d2d 646f 2d63 7265 calendar--do-cre │ │ │ -000086e0: 6174 652d 6963 616c 2d61 6c61 726d 5d20 ate-ical-alarm] │ │ │ -000086f0: 3520 225c 6e5c 6e28 666e 2053 5045 4329 5 "\n\n(fn SPEC) │ │ │ -00008700: 2220 6d61 7063 6f6e 6361 7420 2222 5d20 " mapconcat ""] │ │ │ -00008710: 3130 2028 2324 202e 2033 3432 3436 295d 10 (#$ . 34246)] │ │ │ -00008720: 290a 2340 3338 3120 5265 7475 726e 2061 ).#@381 Return a │ │ │ -00008730: 2056 414c 4152 4d20 626c 6f63 6b2e 0a41 VALARM block..A │ │ │ -00008740: 7267 756d 656e 7420 4144 5641 4e43 452d rgument ADVANCE- │ │ │ -00008750: 5449 4d45 2069 7320 6120 6e75 6d62 6572 TIME is a number │ │ │ -00008760: 2067 6976 696e 6720 7468 6520 7469 6d65 giving the time │ │ │ -00008770: 2077 6865 6e20 7468 6520 616c 6172 6d0a when the alarm. │ │ │ -00008780: 6669 7265 7320 286d 696e 7574 6573 2062 fires (minutes b │ │ │ -00008790: 6566 6f72 6520 7468 6520 7265 7370 6563 efore the respec │ │ │ -000087a0: 7469 7665 2065 7665 6e74 292e 2020 4172 tive event). Ar │ │ │ -000087b0: 6775 6d65 6e74 2041 4c41 524d 2d53 5045 gument ALARM-SPE │ │ │ -000087c0: 430a 6973 2061 206c 6973 7420 7768 6963 C.is a list whic │ │ │ -000087d0: 6820 6d75 7374 2062 6520 6f6e 6520 6f66 h must be one of │ │ │ -000087e0: 2028 6175 6469 6f29 2c20 2864 6973 706c (audio), (displ │ │ │ -000087f0: 6179 2920 6f72 0a28 656d 6169 6c20 2841 ay) or.(email (A │ │ │ -00008800: 4444 5245 5353 3120 2e2e 2e29 292c 2073 DDRESS1 ...)), s │ │ │ -00008810: 6565 2060 6963 616c 656e 6461 722d 6578 ee `icalendar-ex │ │ │ -00008820: 706f 7274 2d61 6c61 726d 7327 2e20 2041 port-alarms'. A │ │ │ -00008830: 7267 756d 656e 740a 5355 4d4d 4152 5920 rgument.SUMMARY │ │ │ -00008840: 6973 2061 2073 7472 696e 6720 7768 6963 is a string whic │ │ │ -00008850: 6820 636f 6e74 6169 6e73 2061 2073 686f h contains a sho │ │ │ -00008860: 7274 2064 6573 6372 6970 7469 6f6e 2066 rt description f │ │ │ -00008870: 6f72 2074 6865 0a61 6c61 726d 2e0a 0a28 or the.alarm...( │ │ │ -00008880: 666e 2041 4456 414e 4345 2d54 494d 4520 fn ADVANCE-TIME │ │ │ -00008890: 414c 4152 4d2d 5350 4543 2053 554d 4d41 ALARM-SPEC SUMMA │ │ │ -000088a0: 5259 291f 0a28 6465 6661 6c69 6173 2027 RY)..(defalias ' │ │ │ -000088b0: 6963 616c 656e 6461 722d 2d64 6f2d 6372 icalendar--do-cr │ │ │ -000088c0: 6561 7465 2d69 6361 6c2d 616c 6172 6d20 eate-ical-alarm │ │ │ -000088d0: 235b 3737 3120 2201 405c 3330 305c 3330 #[771 ".@\300\30 │ │ │ -000088e0: 315c 3330 3203 5c33 3033 5c22 415c 225c 1\302.\303\"A\"\ │ │ │ -000088f0: 3330 305c 3330 3406 065c 2202 5c33 3035 300\304..\".\305 │ │ │ -00008900: 3e5c 3230 331c 005c 3330 305c 3330 3605 >\203..\300\306. │ │ │ -00008910: 5c22 5c32 3032 1d00 5c33 3037 035c 3331 \"\202..\307.\31 │ │ │ -00008920: 303d 5c32 3033 2b00 5c33 3030 5c33 3131 0=\203+.\300\311 │ │ │ -00008930: 0606 5c22 5c32 3032 2c00 5c33 3037 045c ..\"\202,.\307.\ │ │ │ -00008940: 3331 303d 5c32 3033 3d00 5c33 3132 5c33 310=\203=.\312\3 │ │ │ -00008950: 3133 0608 4140 5c33 3037 235c 3230 323e 13..A@\307#\202> │ │ │ -00008960: 005c 3330 375c 3331 3405 0505 0505 5c33 .\307\314.....\3 │ │ │ -00008970: 3135 5c32 3630 075c 3230 3722 205b 666f 15\260.\207" [fo │ │ │ -00008980: 726d 6174 2022 5c6e 4143 5449 4f4e 3a25 rmat "\nACTION:% │ │ │ -00008990: 7322 2061 7373 6f63 2028 2861 7564 696f s" assoc ((audio │ │ │ -000089a0: 202e 2022 4155 4449 4f22 2920 2864 6973 . "AUDIO") (dis │ │ │ -000089b0: 706c 6179 202e 2022 4449 5350 4c41 5922 play . "DISPLAY" │ │ │ -000089c0: 2920 2865 6d61 696c 202e 2022 454d 4149 ) (email . "EMAI │ │ │ -000089d0: 4c22 2929 2022 5c6e 5452 4947 4745 523a L")) "\nTRIGGER: │ │ │ -000089e0: 2d50 5425 644d 2220 2864 6973 706c 6179 -PT%dM" (display │ │ │ -000089f0: 2065 6d61 696c 2920 225c 6e44 4553 4352 email) "\nDESCR │ │ │ -00008a00: 4950 5449 4f4e 3a25 7322 2022 2220 656d IPTION:%s" "" em │ │ │ -00008a10: 6169 6c20 225c 6e53 554d 4d41 5259 3a25 ail "\nSUMMARY:% │ │ │ -00008a20: 7322 206d 6170 636f 6e63 6174 2023 5b32 s" mapconcat #[2 │ │ │ -00008a30: 3537 2022 5c33 3030 5c33 3031 025c 225c 57 "\300\301.\"\ │ │ │ -00008a40: 3230 3722 205b 666f 726d 6174 2022 5c6e 207" [format "\n │ │ │ -00008a50: 4154 5445 4e44 4545 3a4d 4149 4c54 4f3a ATTENDEE:MAILTO: │ │ │ -00008a60: 2573 225d 2034 2022 5c6e 5c6e 2866 6e20 %s"] 4 "\n\n(fn │ │ │ -00008a70: 4929 225d 2022 5c6e 4245 4749 4e3a 5641 I)"] "\nBEGIN:VA │ │ │ -00008a80: 4c41 524d 2220 225c 6e45 4e44 3a56 414c LARM" "\nEND:VAL │ │ │ -00008a90: 4152 4d22 5d20 3136 2028 2324 202e 2033 ARM"] 16 (#$ . 3 │ │ │ -00008aa0: 3436 3030 295d 290a 2340 3230 3720 436f 4600)]).#@207 Co │ │ │ -00008ab0: 6e76 6572 7420 226f 7264 696e 6172 7922 nvert "ordinary" │ │ │ -00008ac0: 2064 6961 7279 2065 6e74 7279 2074 6f20 diary entry to │ │ │ -00008ad0: 6943 616c 656e 6461 7220 666f 726d 6174 iCalendar format │ │ │ -00008ae0: 2e0a 4e4f 4e4d 4152 4b45 5220 6973 2061 ..NONMARKER is a │ │ │ -00008af0: 2072 6567 756c 6172 2065 7870 7265 7373 regular express │ │ │ -00008b00: 696f 6e20 6d61 7463 6869 6e67 2074 6865 ion matching the │ │ │ -00008b10: 2073 7461 7274 206f 6620 6e6f 6e2d 6d61 start of non-ma │ │ │ -00008b20: 726b 696e 670a 656e 7472 6965 732e 2020 rking.entries. │ │ │ -00008b30: 454e 5452 592d 4d41 494e 2069 7320 7468 ENTRY-MAIN is th │ │ │ -00008b40: 6520 6669 7273 7420 6c69 6e65 206f 6620 e first line of │ │ │ -00008b50: 7468 6520 6469 6172 7920 656e 7472 792e the diary entry. │ │ │ -00008b60: 0a0a 2866 6e20 4e4f 4e4d 4152 4b45 5220 ..(fn NONMARKER │ │ │ -00008b70: 454e 5452 592d 4d41 494e 291f 0a28 6465 ENTRY-MAIN)..(de │ │ │ -00008b80: 6661 6c69 6173 2027 6963 616c 656e 6461 falias 'icalenda │ │ │ -00008b90: 722d 2d63 6f6e 7665 7274 2d6f 7264 696e r--convert-ordin │ │ │ -00008ba0: 6172 792d 746f 2d69 6361 6c20 235b 3531 ary-to-ical #[51 │ │ │ -00008bb0: 3420 225c 3330 3002 5c33 3031 5002 5c22 4 "\300.\301P.\" │ │ │ -00008bc0: 5c32 3035 5c33 3132 005c 3330 3201 5c33 \205\312.\302.\3 │ │ │ -00008bd0: 3033 5c32 3234 5c33 3033 5c32 3235 235c 03\224\303\225#\ │ │ │ -00008be0: 3330 3401 215c 3330 3402 5c33 3033 5c22 304.!\304.\303\" │ │ │ -00008bf0: 5c33 3035 5c33 3036 5c33 3037 5c32 3234 \305\306\307\224 │ │ │ -00008c00: 5c32 3035 2600 5c33 3032 0606 5c33 3037 \205&.\302..\307 │ │ │ -00008c10: 5c32 3234 5c33 3037 5c32 3235 235c 3331 \224\307\225#\31 │ │ │ -00008c20: 305c 3232 345c 3230 3533 005c 3330 3206 0\224\2053.\302. │ │ │ -00008c30: 075c 3331 305c 3232 345c 3331 305c 3232 .\310\224\310\22 │ │ │ -00008c40: 3523 5c22 5c33 3036 5c33 3131 5c32 3234 5#\"\306\311\224 │ │ │ -00008c50: 5c32 3035 4200 5c33 3032 0607 5c33 3131 \205B.\302..\311 │ │ │ -00008c60: 5c32 3234 5c33 3131 5c32 3235 235c 3331 \224\311\225#\31 │ │ │ -00008c70: 325c 3232 345c 3230 354f 005c 3330 3206 2\224\205O.\302. │ │ │ -00008c80: 085c 3331 325c 3232 345c 3331 325c 3232 .\312\224\312\22 │ │ │ -00008c90: 3523 5c22 5c33 3133 5c33 3032 0608 5c33 5#\"\313\302..\3 │ │ │ -00008ca0: 3134 5c32 3234 5c33 3134 5c32 3235 2321 14\224\314\225#! │ │ │ -00008cb0: 5c33 3135 5c33 3136 0609 5c22 5c32 3130 \315\316..\"\210 │ │ │ -00008cc0: 055c 3230 3468 005c 3331 375c 3332 3021 .\204h.\317\320! │ │ │ -00008cd0: 5c32 3130 025c 3230 3370 0005 5c32 3032 \210.\203p..\202 │ │ │ -00008ce0: 7100 045c 3236 3204 025c 3230 335c 3234 q..\262..\203\24 │ │ │ -00008cf0: 3000 015c 3230 345c 3234 3000 5c33 3231 0..\204\240.\321 │ │ │ -00008d00: 5c33 3232 5c33 3233 5c33 3234 0606 2321 \322\323\324..#! │ │ │ -00008d10: 5c32 3131 5c33 3235 575c 3230 335c 3232 \211\325W\203\22 │ │ │ -00008d20: 3400 5c33 3236 5c33 3237 5c33 3330 035c 4.\326\327\330.\ │ │ │ -00008d30: 5c5c 225c 3236 3203 5c32 3032 5c32 3337 \\"\262.\202\237 │ │ │ -00008d40: 005c 3332 365c 3332 3702 5c33 3235 5a5c .\326\327.\325Z\ │ │ │ -00008d50: 225c 3236 3203 055c 3236 3205 5c32 3130 "\262..\262.\210 │ │ │ -00008d60: 5c33 3331 035c 3230 335c 3235 3100 5c33 \331.\203\251.\3 │ │ │ -00008d70: 3332 5c32 3032 5c32 3532 005c 3333 3306 32\202\252.\333. │ │ │ -00008d80: 0705 5c32 3036 5c32 3631 005c 3332 345c ..\206\261.\324\ │ │ │ -00008d90: 3333 3406 065c 3230 335c 3237 3300 5c33 334..\203\273.\3 │ │ │ -00008da0: 3332 5c32 3032 5c32 3734 005c 3333 3306 32\202\274.\333. │ │ │ -00008db0: 0906 085c 3230 365c 3330 3400 5c33 3234 ...\206\304.\324 │ │ │ -00008dc0: 5c32 3630 0801 425c 3236 365c 3230 375c \260..B\266\207\ │ │ │ -00008dd0: 3230 3722 205b 7374 7269 6e67 2d6d 6174 207" [string-mat │ │ │ -00008de0: 6368 2022 5c5c 285b 5e20 2f5d 2b5b 202f ch "\\([^ /]+[ / │ │ │ -00008df0: 5d2b 5b5e 202f 5d2b 5b20 2f5d 2b5b 5e20 ]+[^ /]+[ /]+[^ │ │ │ -00008e00: 5d2b 5c5c 295c 5c73 2d2a 5c5c 285c 5c28 ]+\\)\\s-*\\(\\( │ │ │ -00008e10: 5b30 2d39 5d5b 302d 395d 3f5c 5c28 3a5b [0-9][0-9]?\\(:[ │ │ │ -00008e20: 302d 395d 5b30 2d39 5d5c 5c29 3f5c 5c29 0-9][0-9]\\)?\\) │ │ │ -00008e30: 5c5c 285b 6170 5d6d 5c5c 293f 5c5c 282d \\([ap]m\\)?\\(- │ │ │ -00008e40: 5c5c 285b 302d 395d 5b30 2d39 5d3f 5c5c \\([0-9][0-9]?\\ │ │ │ -00008e50: 283a 5b30 2d39 5d5b 302d 395d 5c5c 293f (:[0-9][0-9]\\)? │ │ │ -00008e60: 5c5c 295c 5c28 5b61 705d 6d5c 5c29 3f5c \\)\\([ap]m\\)?\ │ │ │ -00008e70: 5c29 3f5c 5c29 3f5c 5c73 2d2a 5c5c 282e \)?\\)?\\s-*\\(. │ │ │ -00008e80: 2a3f 5c5c 2920 3f24 2220 7375 6273 7472 *?\\) ?$" substr │ │ │ -00008e90: 696e 6720 3120 6963 616c 656e 6461 722d ing 1 icalendar- │ │ │ -00008ea0: 2d64 6174 6573 7472 696e 672d 746f 2d69 -datestring-to-i │ │ │ -00008eb0: 736f 6461 7465 206e 696c 2069 6361 6c65 sodate nil icale │ │ │ -00008ec0: 6e64 6172 2d2d 6469 6172 7974 696d 652d ndar--diarytime- │ │ │ -00008ed0: 746f 2d69 736f 7469 6d65 2033 2035 2037 to-isotime 3 5 7 │ │ │ -00008ee0: 2039 2069 6361 6c65 6e64 6172 2d2d 636f 9 icalendar--co │ │ │ -00008ef0: 6e76 6572 742d 7374 7269 6e67 2d66 6f72 nvert-string-for │ │ │ -00008f00: 2d65 7870 6f72 7420 3130 2069 6361 6c65 -export 10 icale │ │ │ -00008f10: 6e64 6172 2d2d 646d 7367 2022 6f72 6469 ndar--dmsg "ordi │ │ │ -00008f20: 6e61 7279 2025 7322 2065 7272 6f72 2022 nary %s" error " │ │ │ -00008f30: 436f 756c 6420 6e6f 7420 7061 7273 6520 Could not parse │ │ │ -00008f40: 6461 7465 2220 7265 6164 2072 6570 6c61 date" read repla │ │ │ -00008f50: 6365 2d72 6567 6578 702d 696e 2d73 7472 ce-regexp-in-str │ │ │ -00008f60: 696e 6720 225e 5430 3f22 2022 2220 3233 ing "^T0?" "" 23 │ │ │ -00008f70: 3030 3030 2066 6f72 6d61 7420 2254 2530 0000 format "T%0 │ │ │ -00008f80: 3664 2220 3130 3030 3020 225c 6e44 5453 6d" 10000 "\nDTS │ │ │ -00008f90: 5441 5254 3b22 2022 5641 4c55 453d 4441 TART;" "VALUE=DA │ │ │ -00008fa0: 5445 2d54 494d 453a 2220 2256 414c 5545 TE-TIME:" "VALUE │ │ │ -00008fb0: 3d44 4154 453a 2220 225c 6e44 5445 4e44 =DATE:" "\nDTEND │ │ │ -00008fc0: 3b22 5d20 3137 2028 2324 202e 2033 3535 ;"] 17 (#$ . 355 │ │ │ -00008fd0: 3032 295d 290a 2340 3932 2046 696e 6420 02)]).#@92 Find │ │ │ -00008fe0: 7468 6520 6669 7273 7420 4142 4252 4556 the first ABBREV │ │ │ -00008ff0: 5745 454b 4441 5920 696e 2061 2067 6976 WEEKDAY in a giv │ │ │ -00009000: 656e 2059 4541 522e 0a52 6574 7572 6e73 en YEAR..Returns │ │ │ -00009010: 2064 6179 206e 756d 6265 722e 0a0a 2866 day number...(f │ │ │ -00009020: 6e20 4142 4252 4556 5745 454b 4441 5920 n ABBREVWEEKDAY │ │ │ -00009030: 5945 4152 291f 0a28 6465 6661 6c69 6173 YEAR)..(defalias │ │ │ -00009040: 2027 6963 616c 656e 6461 722d 6669 7273 'icalendar-firs │ │ │ -00009050: 742d 7765 656b 6461 792d 6f66 2d79 6561 t-weekday-of-yea │ │ │ -00009060: 7220 235b 3531 3420 225c 3330 305c 3330 r #[514 "\300\30 │ │ │ -00009070: 315c 3231 3103 4521 5c33 3032 0321 015a 1\211.E!\302.!.Z │ │ │ -00009080: 545c 3231 315c 3330 3358 5c32 3033 1a00 T\211\303X\203.. │ │ │ -00009090: 5c32 3131 5c33 3034 5c5c 5c32 3632 015c \211\304\\\262.\ │ │ │ -000090a0: 3230 3225 005c 3231 315c 3330 3456 5c32 202%.\211\304V\2 │ │ │ -000090b0: 3033 2500 5c32 3131 5c33 3034 5a5c 3236 03%.\211\304Z\26 │ │ │ -000090c0: 3201 5c32 3037 2220 5b63 616c 656e 6461 2.\207" [calenda │ │ │ -000090d0: 722d 6461 792d 6f66 2d77 6565 6b20 3120 r-day-of-week 1 │ │ │ -000090e0: 6963 616c 656e 6461 722d 2d67 6574 2d77 icalendar--get-w │ │ │ -000090f0: 6565 6b64 6179 2d6e 756d 6265 7220 3020 eekday-number 0 │ │ │ -00009100: 375d 2036 2028 2324 202e 2033 3638 3237 7] 6 (#$ . 36827 │ │ │ -00009110: 295d 290a 2340 3230 3320 436f 6e76 6572 )]).#@203 Conver │ │ │ -00009120: 7420 7765 656b 6c79 2064 6961 7279 2065 t weekly diary e │ │ │ -00009130: 6e74 7279 2074 6f20 6943 616c 656e 6461 ntry to iCalenda │ │ │ -00009140: 7220 666f 726d 6174 2e0a 4e4f 4e4d 4152 r format..NONMAR │ │ │ -00009150: 4b45 5220 6973 2061 2072 6567 756c 6172 KER is a regular │ │ │ -00009160: 2065 7870 7265 7373 696f 6e20 6d61 7463 expression matc │ │ │ -00009170: 6869 6e67 2074 6865 2073 7461 7274 206f hing the start o │ │ │ -00009180: 6620 6e6f 6e2d 6d61 726b 696e 670a 656e f non-marking.en │ │ │ -00009190: 7472 6965 732e 2020 454e 5452 592d 4d41 tries. ENTRY-MA │ │ │ -000091a0: 494e 2069 7320 7468 6520 6669 7273 7420 IN is the first │ │ │ -000091b0: 6c69 6e65 206f 6620 7468 6520 6469 6172 line of the diar │ │ │ -000091c0: 7920 656e 7472 792e 0a0a 2866 6e20 4e4f y entry...(fn NO │ │ │ -000091d0: 4e4d 4152 4b45 5220 454e 5452 592d 4d41 NMARKER ENTRY-MA │ │ │ -000091e0: 494e 291f 0a28 6465 6661 6c69 6173 2027 IN)..(defalias ' │ │ │ -000091f0: 6963 616c 656e 6461 722d 2d63 6f6e 7665 icalendar--conve │ │ │ -00009200: 7274 2d77 6565 6b6c 792d 746f 2d69 6361 rt-weekly-to-ica │ │ │ -00009210: 6c20 235b 3531 3420 225c 3330 3102 5c33 l #[514 "\301.\3 │ │ │ -00009220: 3032 5002 5c22 5c32 3035 5c33 3032 005c 02P.\"\205\302.\ │ │ │ -00009230: 3330 335c 3330 3402 5c33 3035 5c32 3234 303\304.\305\224 │ │ │ -00009240: 5c33 3035 5c32 3235 2321 5c32 3035 5c33 \305\225#!\205\3 │ │ │ -00009250: 3032 005c 3330 335c 3330 3402 5c33 3035 02.\303\304.\305 │ │ │ -00009260: 5c32 3234 5c33 3035 5c32 3235 2321 5c33 \224\305\225#!\3 │ │ │ -00009270: 3036 5c33 3037 5c32 3234 5c32 3035 2b00 06\307\224\205+. │ │ │ -00009280: 5c33 3034 035c 3330 375c 3232 345c 3330 \304.\307\224\30 │ │ │ -00009290: 375c 3232 3523 5c33 3130 5c32 3234 5c32 7\225#\310\224\2 │ │ │ -000092a0: 3035 3700 5c33 3034 045c 3331 305c 3232 057.\304.\310\22 │ │ │ -000092b0: 345c 3331 305c 3232 3523 5c22 5c33 3036 4\310\225#\"\306 │ │ │ -000092c0: 5c33 3131 5c32 3234 5c32 3035 4500 5c33 \311\224\205E.\3 │ │ │ -000092d0: 3034 045c 3331 315c 3232 345c 3331 315c 04.\311\224\311\ │ │ │ -000092e0: 3232 3523 5c33 3132 5c32 3234 5c32 3035 225#\312\224\205 │ │ │ -000092f0: 5100 5c33 3034 055c 3331 325c 3232 345c Q.\304.\312\224\ │ │ │ -00009300: 3331 325c 3232 3523 5c22 5c33 3133 5c33 312\225#\"\313\3 │ │ │ -00009310: 3034 055c 3331 345c 3232 345c 3331 345c 04.\314\224\314\ │ │ │ -00009320: 3232 3523 215c 3331 355c 3331 3606 065c 225#!\315\316..\ │ │ │ -00009330: 225c 3231 3002 5c32 3033 7a00 015c 3230 "\210.\203z..\20 │ │ │ -00009340: 347a 005c 3331 375c 3332 305c 3332 315c 4z.\317\320\321\ │ │ │ -00009350: 3332 3206 0623 215c 3332 335c 3332 345c 322..#!\323\324\ │ │ │ -00009360: 3332 3503 5c5c 5c22 5c32 3632 035c 3231 325.\\\"\262.\21 │ │ │ -00009370: 305c 3332 3603 5c32 3033 5c32 3033 005c 0\326.\203\203.\ │ │ │ -00009380: 3332 375c 3230 325c 3230 3400 5c33 3330 327\202\204.\330 │ │ │ -00009390: 5c33 3233 5c33 3331 085c 3330 355c 3333 \323\331.\305\33 │ │ │ -000093a0: 3206 5c6e 085c 2224 055c 3230 365c 3232 2.\n.\"$.\206\22 │ │ │ -000093b0: 3300 5c33 3232 5c33 3333 0606 5c32 3033 3.\322\333..\203 │ │ │ -000093c0: 5c32 3335 005c 3332 375c 3230 325c 3233 \235.\327\202\23 │ │ │ -000093d0: 3600 5c33 3330 5c33 3233 5c33 3331 085c 6.\330\323\331.\ │ │ │ -000093e0: 3330 355c 3333 3206 0e08 5c22 065c 665c 305\332...\".\f\ │ │ │ -000093f0: 3230 335c 3236 3000 5c33 3334 5c32 3032 203\260.\334\202 │ │ │ -00009400: 5c32 3631 005c 3330 355c 5c24 0608 5c32 \261.\305\\$..\2 │ │ │ -00009410: 3036 5c32 3731 005c 3332 325c 3333 3506 06\271.\322\335. │ │ │ -00009420: 5c66 5c32 3630 5c6e 0142 5c32 3636 5c32 \f\260\n.B\266\2 │ │ │ -00009430: 3034 5c32 3037 2220 5b69 6361 6c65 6e64 04\207" [icalend │ │ │ -00009440: 6172 2d72 6563 7572 7269 6e67 2d73 7461 ar-recurring-sta │ │ │ -00009450: 7274 2d79 6561 7220 7374 7269 6e67 2d6d rt-year string-m │ │ │ -00009460: 6174 6368 2022 5c5c 285b 612d 7a5d 2b5c atch "\\([a-z]+\ │ │ │ -00009470: 5c29 5c5c 732d 2b5c 5c28 5c5c 285b 302d \)\\s-+\\(\\([0- │ │ │ -00009480: 395d 5b30 2d39 5d3f 3a5b 302d 395d 5b30 9][0-9]?:[0-9][0 │ │ │ -00009490: 2d39 5d5c 5c29 5c5c 285b 6170 5d6d 5c5c -9]\\)\\([ap]m\\ │ │ │ -000094a0: 293f 5c5c 282d 5c5c 285b 302d 395d 5b30 )?\\(-\\([0-9][0 │ │ │ -000094b0: 2d39 5d3f 3a5b 302d 395d 5b30 2d39 5d5c -9]?:[0-9][0-9]\ │ │ │ -000094c0: 5c29 5c5c 285b 6170 5d6d 5c5c 293f 5c5c \)\\([ap]m\\)?\\ │ │ │ -000094d0: 293f 5c5c 293f 5c5c 732d 2a5c 5c28 2e2a )?\\)?\\s-*\\(.* │ │ │ -000094e0: 3f5c 5c29 203f 2422 2069 6361 6c65 6e64 ?\\) ?$" icalend │ │ │ -000094f0: 6172 2d2d 6765 742d 7765 656b 6461 792d ar--get-weekday- │ │ │ -00009500: 6162 6272 6576 2073 7562 7374 7269 6e67 abbrev substring │ │ │ -00009510: 2031 2069 6361 6c65 6e64 6172 2d2d 6469 1 icalendar--di │ │ │ -00009520: 6172 7974 696d 652d 746f 2d69 736f 7469 arytime-to-isoti │ │ │ -00009530: 6d65 2033 2034 2036 2037 2069 6361 6c65 me 3 4 6 7 icale │ │ │ -00009540: 6e64 6172 2d2d 636f 6e76 6572 742d 7374 ndar--convert-st │ │ │ -00009550: 7269 6e67 2d66 6f72 2d65 7870 6f72 7420 ring-for-export │ │ │ -00009560: 3820 6963 616c 656e 6461 722d 2d64 6d73 8 icalendar--dms │ │ │ -00009570: 6720 2277 6565 6b6c 7920 2573 2220 7265 g "weekly %s" re │ │ │ -00009580: 6164 2072 6570 6c61 6365 2d72 6567 6578 ad replace-regex │ │ │ -00009590: 702d 696e 2d73 7472 696e 6720 225e 5430 p-in-string "^T0 │ │ │ -000095a0: 3f22 2022 2220 666f 726d 6174 2022 5425 ?" "" format "T% │ │ │ -000095b0: 3036 6422 2031 3030 3030 2022 5c6e 4454 06d" 10000 "\nDT │ │ │ -000095c0: 5354 4152 543b 2220 2256 414c 5545 3d44 START;" "VALUE=D │ │ │ -000095d0: 4154 452d 5449 4d45 3a22 2022 5641 4c55 ATE-TIME:" "VALU │ │ │ -000095e0: 453d 4441 5445 3a22 2022 2530 3464 2530 E=DATE:" "%04d%0 │ │ │ -000095f0: 3264 2530 3264 2220 6963 616c 656e 6461 2d%02d" icalenda │ │ │ -00009600: 722d 6669 7273 742d 7765 656b 6461 792d r-first-weekday- │ │ │ -00009610: 6f66 2d79 6561 7220 225c 6e44 5445 4e44 of-year "\nDTEND │ │ │ -00009620: 3b22 2030 2022 5c6e 5252 554c 453a 4652 ;" 0 "\nRRULE:FR │ │ │ -00009630: 4551 3d57 4545 4b4c 593b 494e 5445 5256 EQ=WEEKLY;INTERV │ │ │ -00009640: 414c 3d31 3b42 5944 4159 3d22 5d20 3139 AL=1;BYDAY="] 19 │ │ │ -00009650: 2028 2324 202e 2033 3731 3436 295d 290a (#$ . 37146)]). │ │ │ -00009660: 2340 3230 3320 436f 6e76 6572 7420 7965 #@203 Convert ye │ │ │ -00009670: 6172 6c79 2064 6961 7279 2065 6e74 7279 arly diary entry │ │ │ -00009680: 2074 6f20 6943 616c 656e 6461 7220 666f to iCalendar fo │ │ │ -00009690: 726d 6174 2e0a 4e4f 4e4d 4152 4b45 5220 rmat..NONMARKER │ │ │ -000096a0: 6973 2061 2072 6567 756c 6172 2065 7870 is a regular exp │ │ │ -000096b0: 7265 7373 696f 6e20 6d61 7463 6869 6e67 ression matching │ │ │ -000096c0: 2074 6865 2073 7461 7274 206f 6620 6e6f the start of no │ │ │ -000096d0: 6e2d 6d61 726b 696e 670a 656e 7472 6965 n-marking.entrie │ │ │ -000096e0: 732e 2020 454e 5452 592d 4d41 494e 2069 s. ENTRY-MAIN i │ │ │ -000096f0: 7320 7468 6520 6669 7273 7420 6c69 6e65 s the first line │ │ │ -00009700: 206f 6620 7468 6520 6469 6172 7920 656e of the diary en │ │ │ -00009710: 7472 792e 0a0a 2866 6e20 4e4f 4e4d 4152 try...(fn NONMAR │ │ │ -00009720: 4b45 5220 454e 5452 592d 4d41 494e 291f KER ENTRY-MAIN). │ │ │ -00009730: 0a28 6465 6661 6c69 6173 2027 6963 616c .(defalias 'ical │ │ │ -00009740: 656e 6461 722d 2d63 6f6e 7665 7274 2d79 endar--convert-y │ │ │ -00009750: 6561 726c 792d 746f 2d69 6361 6c20 235b early-to-ical #[ │ │ │ -00009760: 3531 3420 225c 3330 3102 085c 3330 323d 514 "\301..\302= │ │ │ -00009770: 5c32 3033 5c66 005c 3330 335c 3230 320d \203\f.\303\202. │ │ │ -00009780: 005c 3330 345c 3330 3551 025c 225c 3230 .\304\305Q.\"\20 │ │ │ -00009790: 355c 3335 3000 085c 3330 323d 5c32 3033 5\350..\302=\203 │ │ │ -000097a0: 1e00 5c33 3036 5c32 3032 1f00 5c33 3037 ..\306\202..\307 │ │ │ -000097b0: 085c 3330 323d 5c32 3033 2900 5c33 3037 .\302=\203).\307 │ │ │ -000097c0: 5c32 3032 2a00 5c33 3036 5c33 3130 5c33 \202*.\306\310\3 │ │ │ -000097d0: 3131 0404 5c32 3234 055c 3232 3523 215c 11..\224.\225#!\ │ │ │ -000097e0: 3331 325c 3331 3105 045c 3232 3405 5c32 312\311..\224.\2 │ │ │ -000097f0: 3235 2321 5c33 3133 5c33 3134 5c32 3234 25#!\313\314\224 │ │ │ -00009800: 5c32 3035 4a00 5c33 3131 0606 5c33 3134 \205J.\311..\314 │ │ │ -00009810: 5c32 3234 5c33 3134 5c32 3235 235c 3331 \224\314\225#\31 │ │ │ -00009820: 355c 3232 345c 3230 3557 005c 3331 3106 5\224\205W.\311. │ │ │ -00009830: 075c 3331 355c 3232 345c 3331 355c 3232 .\315\224\315\22 │ │ │ -00009840: 3523 5c22 5c33 3133 5c33 3136 5c32 3234 5#\"\313\316\224 │ │ │ -00009850: 5c32 3035 6600 5c33 3131 0607 5c33 3136 \205f.\311..\316 │ │ │ -00009860: 5c32 3234 5c33 3136 5c32 3235 235c 3331 \224\316\225#\31 │ │ │ -00009870: 375c 3232 345c 3230 3573 005c 3331 3106 7\224\205s.\311. │ │ │ -00009880: 085c 3331 375c 3232 345c 3331 375c 3232 .\317\224\317\22 │ │ │ -00009890: 3523 5c22 5c33 3230 5c33 3131 0608 5c33 5#\"\320\311..\3 │ │ │ -000098a0: 3231 5c32 3234 5c33 3231 5c32 3235 2321 21\224\321\225#! │ │ │ -000098b0: 5c33 3232 5c33 3233 0609 5c22 5c32 3130 \322\323..\"\210 │ │ │ -000098c0: 025c 3230 335c 3233 3500 015c 3230 345c .\203\235..\204\ │ │ │ -000098d0: 3233 3500 5c33 3130 5c33 3234 5c33 3235 235.\310\324\325 │ │ │ -000098e0: 5c33 3236 0606 2321 5c33 3237 5c33 3330 \326..#!\327\330 │ │ │ -000098f0: 5c33 3331 035c 5c5c 225c 3236 3203 5c32 \331.\\\"\262.\2 │ │ │ -00009900: 3130 5c33 3332 035c 3230 335c 3234 3600 10\332.\203\246. │ │ │ -00009910: 5c33 3333 5c32 3032 5c32 3437 005c 3333 \333\202\247.\33 │ │ │ -00009920: 345c 3332 375c 3333 3506 0706 0923 055c 4\327\335....#.\ │ │ │ -00009930: 3230 365c 3236 3300 5c33 3236 5c33 3336 206\263.\326\336 │ │ │ -00009940: 0606 5c32 3033 5c32 3735 005c 3333 335c ..\203\275.\333\ │ │ │ -00009950: 3230 325c 3237 3600 5c33 3334 5c33 3337 202\276.\334\337 │ │ │ -00009960: 065c 6e06 5c66 5c33 3430 4506 095c 3230 .\n.\f\340E..\20 │ │ │ -00009970: 335c 3331 3600 5c33 3431 5c32 3032 5c33 3\316.\341\202\3 │ │ │ -00009980: 3137 005c 3330 365c 2206 085c 3230 365c 17.\306\"..\206\ │ │ │ -00009990: 3332 3600 5c33 3236 5c33 3432 5c33 3237 326.\326\342\327 │ │ │ -000099a0: 5c33 3433 060e 5c22 5c33 3434 5c33 3237 \343..\"\344\327 │ │ │ -000099b0: 5c33 3433 0611 5c22 5c32 3630 5c66 0142 \343..\"\260\f.B │ │ │ -000099c0: 5c32 3636 5c32 3037 5c32 3037 2220 5b63 \266\207\207" [c │ │ │ -000099d0: 616c 656e 6461 722d 6461 7465 2d73 7479 alendar-date-sty │ │ │ -000099e0: 6c65 2073 7472 696e 672d 6d61 7463 6820 le string-match │ │ │ -000099f0: 6575 726f 7065 616e 2022 5c5c 285b 302d european "\\([0- │ │ │ -00009a00: 395d 2b5b 302d 395d 3f5c 5c29 5c5c 732d 9]+[0-9]?\\)\\s- │ │ │ -00009a10: 2b5c 5c28 5b61 2d7a 5d2b 5c5c 295c 5c73 +\\([a-z]+\\)\\s │ │ │ -00009a20: 2d2b 2220 225c 5c28 5b61 2d7a 5d2b 5c5c -+" "\\([a-z]+\\ │ │ │ -00009a30: 295c 5c73 2d2b 5c5c 285b 302d 395d 2b5b )\\s-+\\([0-9]+[ │ │ │ -00009a40: 302d 395d 3f5c 5c29 5c5c 732d 2b22 2022 0-9]?\\)\\s-+" " │ │ │ -00009a50: 5c5c 2a3f 5c5c 732d 2a5c 5c28 5c5c 285b \\*?\\s-*\\(\\([ │ │ │ -00009a60: 302d 395d 5b30 2d39 5d3f 3a5b 302d 395d 0-9][0-9]?:[0-9] │ │ │ -00009a70: 5b30 2d39 5d5c 5c29 5c5c 285b 6170 5d6d [0-9]\\)\\([ap]m │ │ │ -00009a80: 5c5c 293f 5c5c 282d 5c5c 285b 302d 395d \\)?\\(-\\([0-9] │ │ │ -00009a90: 5b30 2d39 5d3f 3a5b 302d 395d 5b30 2d39 [0-9]?:[0-9][0-9 │ │ │ -00009aa0: 5d5c 5c29 5c5c 285b 6170 5d6d 5c5c 293f ]\\)\\([ap]m\\)? │ │ │ -00009ab0: 5c5c 293f 5c5c 293f 5c5c 732d 2a5c 5c28 \\)?\\)?\\s-*\\( │ │ │ -00009ac0: 5b5e 302d 395d 2b2e 2a3f 5c5c 2920 3f24 [^0-9]+.*?\\) ?$ │ │ │ -00009ad0: 2220 3120 3220 7265 6164 2073 7562 7374 " 1 2 read subst │ │ │ -00009ae0: 7269 6e67 2069 6361 6c65 6e64 6172 2d2d ring icalendar-- │ │ │ -00009af0: 6765 742d 6d6f 6e74 682d 6e75 6d62 6572 get-month-number │ │ │ -00009b00: 2069 6361 6c65 6e64 6172 2d2d 6469 6172 icalendar--diar │ │ │ -00009b10: 7974 696d 652d 746f 2d69 736f 7469 6d65 ytime-to-isotime │ │ │ -00009b20: 2034 2035 2037 2038 2069 6361 6c65 6e64 4 5 7 8 icalend │ │ │ -00009b30: 6172 2d2d 636f 6e76 6572 742d 7374 7269 ar--convert-stri │ │ │ -00009b40: 6e67 2d66 6f72 2d65 7870 6f72 7420 3920 ng-for-export 9 │ │ │ -00009b50: 6963 616c 656e 6461 722d 2d64 6d73 6720 icalendar--dmsg │ │ │ -00009b60: 2279 6561 726c 7920 2573 2220 7265 706c "yearly %s" repl │ │ │ -00009b70: 6163 652d 7265 6765 7870 2d69 6e2d 7374 ace-regexp-in-st │ │ │ -00009b80: 7269 6e67 2022 5e54 303f 2220 2222 2066 ring "^T0?" "" f │ │ │ -00009b90: 6f72 6d61 7420 2254 2530 3664 2220 3130 ormat "T%06d" 10 │ │ │ -00009ba0: 3030 3020 225c 6e44 5453 5441 5254 3b22 000 "\nDTSTART;" │ │ │ -00009bb0: 2022 5641 4c55 453d 4441 5445 2d54 494d "VALUE=DATE-TIM │ │ │ -00009bc0: 453a 2220 2256 414c 5545 3d44 4154 453a E:" "VALUE=DATE: │ │ │ -00009bd0: 2220 2231 3930 3025 3032 6425 3032 6422 " "1900%02d%02d" │ │ │ -00009be0: 2022 5c6e 4454 454e 443b 2220 6963 616c "\nDTEND;" ical │ │ │ -00009bf0: 656e 6461 722d 2d64 6174 652d 746f 2d69 endar--date-to-i │ │ │ -00009c00: 736f 6461 7465 2031 3930 3020 3020 225c sodate 1900 0 "\ │ │ │ -00009c10: 6e52 5255 4c45 3a46 5245 513d 5945 4152 nRRULE:FREQ=YEAR │ │ │ -00009c20: 4c59 3b49 4e54 4552 5641 4c3d 313b 4259 LY;INTERVAL=1;BY │ │ │ -00009c30: 4d4f 4e54 483d 2220 2225 6422 2022 3b42 MONTH=" "%d" ";B │ │ │ -00009c40: 594d 4f4e 5448 4441 593d 225d 2032 3320 YMONTHDAY="] 23 │ │ │ -00009c50: 2823 2420 2e20 3338 3530 3229 5d29 0a23 (#$ . 38502)]).# │ │ │ -00009c60: 4034 3336 2043 6f6e 7665 7274 2073 6578 @436 Convert sex │ │ │ -00009c70: 7020 6469 6172 7920 656e 7472 7920 746f p diary entry to │ │ │ -00009c80: 2069 4361 6c65 6e64 6172 2066 6f72 6d61 iCalendar forma │ │ │ -00009c90: 742e 0a45 6e75 6d65 7261 7465 2074 6865 t..Enumerate the │ │ │ -00009ca0: 2065 7661 6c75 6174 6564 2073 6578 7020 evaluated sexp │ │ │ -00009cb0: 656e 7472 7920 666f 7220 7468 6520 6e65 entry for the ne │ │ │ -00009cc0: 7874 0a60 6963 616c 656e 6461 722d 6578 xt.`icalendar-ex │ │ │ -00009cd0: 706f 7274 2d73 6578 702d 656e 756d 6572 port-sexp-enumer │ │ │ -00009ce0: 6174 696f 6e2d 6461 7973 2720 6461 7973 ation-days' days │ │ │ -00009cf0: 2e20 204e 4f4e 4d41 524b 4552 2069 7320 . NONMARKER is │ │ │ -00009d00: 610a 7265 6775 6c61 7220 6578 7072 6573 a.regular expres │ │ │ -00009d10: 7369 6f6e 206d 6174 6368 696e 6720 7468 sion matching th │ │ │ -00009d20: 6520 7374 6172 7420 6f66 206e 6f6e 2d6d e start of non-m │ │ │ -00009d30: 6172 6b69 6e67 2065 6e74 7269 6573 2e0a arking entries.. │ │ │ -00009d40: 454e 5452 592d 4d41 494e 2069 7320 7468 ENTRY-MAIN is th │ │ │ -00009d50: 6520 6669 7273 7420 6c69 6e65 206f 6620 e first line of │ │ │ -00009d60: 7468 6520 6469 6172 7920 656e 7472 792e the diary entry. │ │ │ -00009d70: 0a0a 4f70 7469 6f6e 616c 2061 7267 756d ..Optional argum │ │ │ -00009d80: 656e 7420 5354 4152 5420 6465 7465 726d ent START determ │ │ │ -00009d90: 696e 6573 2074 6865 2066 6972 7374 2064 ines the first d │ │ │ -00009da0: 6179 206f 6620 7468 650a 656e 756d 6572 ay of the.enumer │ │ │ -00009db0: 6174 696f 6e2c 2067 6976 656e 2061 7320 ation, given as │ │ │ -00009dc0: 6120 4c69 7370 2074 696d 6520 7661 6c75 a Lisp time valu │ │ │ -00009dd0: 6520 2d2d 2075 7365 6420 666f 7220 7465 e -- used for te │ │ │ -00009de0: 7374 2070 7572 706f 7365 732e 0a0a 2866 st purposes...(f │ │ │ -00009df0: 6e20 4e4f 4e4d 4152 4b45 5220 454e 5452 n NONMARKER ENTR │ │ │ -00009e00: 592d 4d41 494e 2026 6f70 7469 6f6e 616c Y-MAIN &optional │ │ │ -00009e10: 2053 5441 5254 291f 0a28 6465 6661 6c69 START)..(defali │ │ │ -00009e20: 6173 2027 6963 616c 656e 6461 722d 2d63 as 'icalendar--c │ │ │ -00009e30: 6f6e 7665 7274 2d73 6578 702d 746f 2d69 onvert-sexp-to-i │ │ │ -00009e40: 6361 6c20 235b 3737 3020 225c 3330 3103 cal #[770 "\301. │ │ │ -00009e50: 5c33 3032 5003 5c22 5c32 3033 2300 5c33 \302P.\"\203#.\3 │ │ │ -00009e60: 3033 5c33 3034 035c 225c 3231 305c 3330 03\304.\"\210\30 │ │ │ -00009e70: 3503 5c33 3036 5c33 3037 055c 3331 305c 5.\306\307.\310\ │ │ │ -00009e80: 3232 345c 3331 305c 3232 3523 5c33 3037 224\310\225#\307 │ │ │ -00009e90: 0606 5c33 3131 5c32 3234 5c33 3131 5c32 ..\311\224\311\2 │ │ │ -00009ea0: 3235 2351 5c22 5c32 3037 5c33 3031 035c 25#Q\"\207\301.\ │ │ │ -00009eb0: 3331 3250 035c 225c 3230 3365 005c 3330 312P.\"\203e.\30 │ │ │ -00009ec0: 335c 3331 3303 5c22 5c32 3130 5c33 3037 3\313.\"\210\307 │ │ │ -00009ed0: 025c 3331 305c 3232 345c 3331 305c 3232 .\310\224\310\22 │ │ │ -00009ee0: 3523 5c33 3037 035c 3331 315c 3232 345c 5#\307.\311\224\ │ │ │ -00009ef0: 3331 315c 3232 3523 025c 3230 3645 005c 311\225#.\206E.\ │ │ │ -00009f00: 3331 3420 5c33 3135 5c33 3136 5c33 3137 314 \315\316\317 │ │ │ -00009f10: 5c33 3230 5c33 3231 5c33 3232 5c33 3233 \320\321\322\323 │ │ │ -00009f20: 5c33 3234 060d 060d 065c 6606 5c66 065c \324.....\f.\f.\ │ │ │ -00009f30: 6625 5c33 3235 5c22 5c33 3236 5c33 3237 f%\325\"\326\327 │ │ │ -00009f40: 255c 3333 305c 3333 3108 535c 225c 225c %\330\331.S\"\"\ │ │ │ -00009f50: 225c 3230 375c 3331 365c 3230 3722 205b "\207\316\207" [ │ │ │ -00009f60: 6963 616c 656e 6461 722d 6578 706f 7274 icalendar-export │ │ │ -00009f70: 2d73 6578 702d 656e 756d 6572 6174 696f -sexp-enumeratio │ │ │ -00009f80: 6e2d 6461 7973 2073 7472 696e 672d 6d61 n-days string-ma │ │ │ -00009f90: 7463 6820 2225 2528 616e 6420 5c5c 2828 tch "%%(and \\(( │ │ │ -00009fa0: 5b5e 295d 2b29 5c5c 2929 5c5c 285c 5c73 [^)]+)\\))\\(\\s │ │ │ -00009fb0: 2d2a 2e2a 3f5c 5c29 203f 2422 2069 6361 -*.*?\\) ?$" ica │ │ │ -00009fc0: 6c65 6e64 6172 2d2d 646d 7367 2022 6469 lendar--dmsg "di │ │ │ -00009fd0: 6172 792d 7365 7870 2066 726f 6d20 6963 ary-sexp from ic │ │ │ -00009fe0: 616c 656e 6461 722e 656c 2025 7322 2069 alendar.el %s" i │ │ │ -00009ff0: 6361 6c65 6e64 6172 2d2d 636f 6e76 6572 calendar--conver │ │ │ -0000a000: 742d 746f 2d69 6361 6c20 2225 2522 2073 t-to-ical "%%" s │ │ │ -0000a010: 7562 7374 7269 6e67 2031 2032 2022 2525 ubstring 1 2 "%% │ │ │ -0000a020: 5c5c 2828 5b5e 295d 2b29 5c5c 295c 5c73 \\(([^)]+)\\)\\s │ │ │ -0000a030: 2d2a 5c5c 282e 2a5c 5c29 2220 2264 6961 -*\\(.*\\)" "dia │ │ │ -0000a040: 7279 2d73 6578 7020 2573 2220 6375 7272 ry-sexp %s" curr │ │ │ -0000a050: 656e 742d 7469 6d65 2064 656c 6574 6520 ent-time delete │ │ │ -0000a060: 6e69 6c20 6d61 7063 6172 206d 616b 652d nil mapcar make- │ │ │ -0000a070: 6279 7465 2d63 6f64 6520 3235 3720 225c byte-code 257 "\ │ │ │ -0000a080: 3330 365c 3330 375c 3330 345c 3331 3004 306\307\304\310. │ │ │ -0000a090: 5f5c 2221 5c33 3131 0138 5c33 3132 0238 _\"!\311.8\312.8 │ │ │ -0000a0a0: 5c33 3133 0338 5c33 3134 5c33 3032 5c33 \313.8\314\302\3 │ │ │ -0000a0b0: 3033 0406 0605 4523 5c32 3131 3b5c 3230 03....E#\211;\20 │ │ │ -0000a0c0: 3323 005c 3231 315c 3230 322e 005c 3231 3#.\211\202..\21 │ │ │ -0000a0d0: 313a 5c32 3033 2d00 5c32 3131 415c 3230 1:\203-.\211A\20 │ │ │ -0000a0e0: 322e 005c 3331 355c 3231 315c 3230 3436 2..\315\211\2046 │ │ │ -0000a0f0: 005c 3331 355c 3230 3253 005c 3231 313b .\315\202S.\211; │ │ │ -0000a100: 5c32 3033 4f00 5c33 3136 1d5c 3331 375c \203O.\316.\317\ │ │ │ -0000a110: 3330 305c 3332 305c 3332 3106 0606 0806 300\320\321..... │ │ │ -0000a120: 5c6e 0607 255c 2229 5c32 3032 5300 5c33 \n..%\")\202S.\3 │ │ │ -0000a130: 3232 5c33 3233 5c33 3031 5c22 5c32 3037 22\323\301\"\207 │ │ │ -0000a140: 2220 7663 6f6e 6361 7420 7665 6374 6f72 " vconcat vector │ │ │ -0000a150: 205b 6361 6c65 6e64 6172 2d64 6174 652d [calendar-date- │ │ │ -0000a160: 7374 796c 6520 6465 636f 6465 2d74 696d style decode-tim │ │ │ -0000a170: 6520 7469 6d65 2d61 6464 2038 3634 3030 e time-add 86400 │ │ │ -0000a180: 2033 2034 2035 2064 6961 7279 2d73 6578 3 4 5 diary-sex │ │ │ -0000a190: 702d 656e 7472 7920 6e69 6c20 6973 6f20 p-entry nil iso │ │ │ -0000a1a0: 6963 616c 656e 6461 722d 2d63 6f6e 7665 icalendar--conve │ │ │ -0000a1b0: 7274 2d6f 7264 696e 6172 792d 746f 2d69 rt-ordinary-to-i │ │ │ -0000a1c0: 6361 6c20 666f 726d 6174 2022 2534 642f cal format "%4d/ │ │ │ -0000a1d0: 2530 3264 2f25 3032 6420 2573 2220 6572 %02d/%02d %s" er │ │ │ -0000a1e0: 726f 7220 2255 6e73 7570 706f 7274 6564 ror "Unsupported │ │ │ -0000a1f0: 2053 6578 702d 656e 7472 793a 2025 7322 Sexp-entry: %s" │ │ │ -0000a200: 5d20 3135 2022 5c6e 5c6e 2866 6e20 4f46 ] 15 "\n\n(fn OF │ │ │ -0000a210: 4653 4554 2922 206e 756d 6265 722d 7365 FSET)" number-se │ │ │ -0000a220: 7175 656e 6365 2030 5d20 3139 2028 2324 quence 0] 19 (#$ │ │ │ -0000a230: 202e 2034 3030 3337 295d 290a 2340 3230 . 40037)]).#@20 │ │ │ -0000a240: 3220 436f 6e76 6572 7420 626c 6f63 6b20 2 Convert block │ │ │ -0000a250: 6469 6172 7920 656e 7472 7920 746f 2069 diary entry to i │ │ │ -0000a260: 4361 6c65 6e64 6172 2066 6f72 6d61 742e Calendar format. │ │ │ -0000a270: 0a4e 4f4e 4d41 524b 4552 2069 7320 6120 .NONMARKER is a │ │ │ -0000a280: 7265 6775 6c61 7220 6578 7072 6573 7369 regular expressi │ │ │ -0000a290: 6f6e 206d 6174 6368 696e 6720 7468 6520 on matching the │ │ │ -0000a2a0: 7374 6172 7420 6f66 206e 6f6e 2d6d 6172 start of non-mar │ │ │ -0000a2b0: 6b69 6e67 0a65 6e74 7269 6573 2e20 2045 king.entries. E │ │ │ -0000a2c0: 4e54 5259 2d4d 4149 4e20 6973 2074 6865 NTRY-MAIN is the │ │ │ -0000a2d0: 2066 6972 7374 206c 696e 6520 6f66 2074 first line of t │ │ │ -0000a2e0: 6865 2064 6961 7279 2065 6e74 7279 2e0a he diary entry.. │ │ │ -0000a2f0: 0a28 666e 204e 4f4e 4d41 524b 4552 2045 .(fn NONMARKER E │ │ │ -0000a300: 4e54 5259 2d4d 4149 4e29 1f0a 2864 6566 NTRY-MAIN)..(def │ │ │ -0000a310: 616c 6961 7320 2769 6361 6c65 6e64 6172 alias 'icalendar │ │ │ -0000a320: 2d2d 636f 6e76 6572 742d 626c 6f63 6b2d --convert-block- │ │ │ -0000a330: 746f 2d69 6361 6c20 235b 3531 3420 225c to-ical #[514 "\ │ │ │ -0000a340: 3330 3002 5c33 3031 5002 5c22 5c32 3035 300.\301P.\"\205 │ │ │ -0000a350: 5c32 3434 005c 3330 3201 5c33 3033 5c32 \244.\302.\303\2 │ │ │ -0000a360: 3234 5c33 3033 5c32 3235 235c 3330 3202 24\303\225#\302. │ │ │ -0000a370: 5c33 3034 5c32 3234 5c33 3034 5c32 3235 \304\224\304\225 │ │ │ -0000a380: 235c 3330 3502 215c 3330 3502 215c 3330 #\305.!\305.!\30 │ │ │ -0000a390: 3503 5c33 3033 5c22 5c33 3036 5c33 3037 5.\303\"\306\307 │ │ │ -0000a3a0: 5c32 3234 5c32 3035 2f00 5c33 3032 0607 \224\205/.\302.. │ │ │ -0000a3b0: 5c33 3037 5c32 3234 5c33 3037 5c32 3235 \307\224\307\225 │ │ │ -0000a3c0: 235c 3331 305c 3232 345c 3230 353c 005c #\310\224\205<.\ │ │ │ -0000a3d0: 3330 3206 085c 3331 305c 3232 345c 3331 302..\310\224\31 │ │ │ -0000a3e0: 305c 3232 3523 5c22 5c33 3036 5c33 3131 0\225#\"\306\311 │ │ │ -0000a3f0: 5c32 3234 5c32 3035 4b00 5c33 3032 0608 \224\205K.\302.. │ │ │ -0000a400: 5c33 3131 5c32 3234 5c33 3131 5c32 3235 \311\224\311\225 │ │ │ -0000a410: 235c 3331 325c 3232 345c 3230 3558 005c #\312\224\205X.\ │ │ │ -0000a420: 3330 3206 095c 3331 325c 3232 345c 3331 302..\312\224\31 │ │ │ -0000a430: 325c 3232 3523 5c22 5c33 3133 5c33 3032 2\225#\"\313\302 │ │ │ -0000a440: 0609 5c33 3134 5c32 3234 5c33 3134 5c32 ..\314\224\314\2 │ │ │ -0000a450: 3235 2321 5c33 3135 5c33 3136 065c 6e5c 25#!\315\316.\n\ │ │ │ -0000a460: 225c 3231 3002 5c32 3033 5c32 3032 0001 "\210.\203\202.. │ │ │ -0000a470: 5c32 3034 5c32 3032 005c 3331 375c 3332 \204\202.\317\32 │ │ │ -0000a480: 305c 3332 315c 3332 3206 0623 215c 3332 0\321\322..#!\32 │ │ │ -0000a490: 335c 3332 345c 3332 3503 5c5c 5c22 5c32 3\324\325.\\\"\2 │ │ │ -0000a4a0: 3632 035c 3231 3002 5c32 3033 5c32 3331 62.\210.\203\231 │ │ │ -0000a4b0: 005c 3332 3606 0604 5c33 3237 0609 0606 .\326...\327.... │ │ │ -0000a4c0: 5c33 3330 060b 5c32 3630 0801 425c 3230 \330..\260..B\20 │ │ │ -0000a4d0: 325c 3234 3200 5c33 3331 0606 5c33 3332 2\242.\331..\332 │ │ │ -0000a4e0: 0606 5201 425c 3236 365c 3231 305c 3230 ..R.B\266\210\20 │ │ │ -0000a4f0: 3722 205b 7374 7269 6e67 2d6d 6174 6368 7" [string-match │ │ │ -0000a500: 2022 2525 2864 6961 7279 2d62 6c6f 636b "%%(diary-block │ │ │ -0000a510: 205c 5c28 5b5e 202f 5d2b 5b20 2f5d 2b5b \\([^ /]+[ /]+[ │ │ │ -0000a520: 5e20 2f5d 2b5b 202f 5d2b 5b5e 205d 2b5c ^ /]+[ /]+[^ ]+\ │ │ │ -0000a530: 5c29 202b 5c5c 285b 5e20 2f5d 2b5b 202f \) +\\([^ /]+[ / │ │ │ -0000a540: 5d2b 5b5e 202f 5d2b 5b20 2f5d 2b5b 5e20 ]+[^ /]+[ /]+[^ │ │ │ -0000a550: 5d2b 5c5c 2929 5c5c 732d 2a5c 5c28 5c5c ]+\\))\\s-*\\(\\ │ │ │ -0000a560: 285b 302d 395d 5b30 2d39 5d3f 3a5b 302d ([0-9][0-9]?:[0- │ │ │ -0000a570: 395d 5b30 2d39 5d5c 5c29 5c5c 285b 6170 9][0-9]\\)\\([ap │ │ │ -0000a580: 5d6d 5c5c 293f 5c5c 282d 5c5c 285b 302d ]m\\)?\\(-\\([0- │ │ │ -0000a590: 395d 5b30 2d39 5d3f 3a5b 302d 395d 5b30 9][0-9]?:[0-9][0 │ │ │ -0000a5a0: 2d39 5d5c 5c29 5c5c 285b 6170 5d6d 5c5c -9]\\)\\([ap]m\\ │ │ │ -0000a5b0: 293f 5c5c 293f 5c5c 293f 5c5c 732d 2a5c )?\\)?\\)?\\s-*\ │ │ │ -0000a5c0: 5c28 2e2a 3f5c 5c29 203f 2422 2073 7562 \(.*?\\) ?$" sub │ │ │ -0000a5d0: 7374 7269 6e67 2031 2032 2069 6361 6c65 string 1 2 icale │ │ │ -0000a5e0: 6e64 6172 2d2d 6461 7465 7374 7269 6e67 ndar--datestring │ │ │ -0000a5f0: 2d74 6f2d 6973 6f64 6174 6520 6963 616c -to-isodate ical │ │ │ -0000a600: 656e 6461 722d 2d64 6961 7279 7469 6d65 endar--diarytime │ │ │ -0000a610: 2d74 6f2d 6973 6f74 696d 6520 3420 3520 -to-isotime 4 5 │ │ │ -0000a620: 3720 3820 6963 616c 656e 6461 722d 2d63 7 8 icalendar--c │ │ │ -0000a630: 6f6e 7665 7274 2d73 7472 696e 672d 666f onvert-string-fo │ │ │ -0000a640: 722d 6578 706f 7274 2039 2069 6361 6c65 r-export 9 icale │ │ │ -0000a650: 6e64 6172 2d2d 646d 7367 2022 6469 6172 ndar--dmsg "diar │ │ │ -0000a660: 792d 626c 6f63 6b20 2573 2220 7265 6164 y-block %s" read │ │ │ -0000a670: 2072 6570 6c61 6365 2d72 6567 6578 702d replace-regexp- │ │ │ -0000a680: 696e 2d73 7472 696e 6720 225e 5430 3f22 in-string "^T0?" │ │ │ -0000a690: 2022 2220 666f 726d 6174 2022 5425 3036 "" format "T%06 │ │ │ -0000a6a0: 6422 2031 3030 3030 2022 5c6e 4454 5354 d" 10000 "\nDTST │ │ │ -0000a6b0: 4152 543b 5641 4c55 453d 4441 5445 2d54 ART;VALUE=DATE-T │ │ │ -0000a6c0: 494d 453a 2220 225c 6e44 5445 4e44 3b56 IME:" "\nDTEND;V │ │ │ -0000a6d0: 414c 5545 3d44 4154 452d 5449 4d45 3a22 ALUE=DATE-TIME:" │ │ │ -0000a6e0: 2022 5c6e 5252 554c 453a 4652 4551 3d44 "\nRRULE:FREQ=D │ │ │ -0000a6f0: 4149 4c59 3b49 4e54 4552 5641 4c3d 313b AILY;INTERVAL=1; │ │ │ -0000a700: 554e 5449 4c3d 2220 225c 6e44 5453 5441 UNTIL=" "\nDTSTA │ │ │ -0000a710: 5254 3b56 414c 5545 3d44 4154 453a 2220 RT;VALUE=DATE:" │ │ │ -0000a720: 225c 6e44 5445 4e44 3b56 414c 5545 3d44 "\nDTEND;VALUE=D │ │ │ -0000a730: 4154 453a 225d 2031 3820 2823 2420 2e20 ATE:"] 18 (#$ . │ │ │ -0000a740: 3431 3533 3829 5d29 0a23 4032 3832 2043 41538)]).#@282 C │ │ │ -0000a750: 6f6e 7665 7274 2066 6c6f 6174 2064 6961 onvert float dia │ │ │ -0000a760: 7279 2065 6e74 7279 2074 6f20 6943 616c ry entry to iCal │ │ │ -0000a770: 656e 6461 7220 666f 726d 6174 202d 2d20 endar format -- │ │ │ -0000a780: 7061 7274 6961 6c6c 7920 756e 7375 7070 partially unsupp │ │ │ -0000a790: 6f72 7465 6421 0a0a 2020 4649 584d 4521 orted!.. FIXME! │ │ │ -0000a7a0: 2044 4159 2066 726f 6d20 6469 6172 792d DAY from diary- │ │ │ -0000a7b0: 666c 6f61 7420 7965 7420 756e 696d 706c float yet unimpl │ │ │ -0000a7c0: 656d 656e 7465 642e 0a0a 2020 4e4f 4e4d emented... NONM │ │ │ -0000a7d0: 4152 4b45 5220 6973 2061 2072 6567 756c ARKER is a regul │ │ │ -0000a7e0: 6172 2065 7870 7265 7373 696f 6e20 6d61 ar expression ma │ │ │ -0000a7f0: 7463 6869 6e67 2074 6865 2073 7461 7274 tching the start │ │ │ -0000a800: 206f 6620 6e6f 6e2d 6d61 726b 696e 670a of non-marking. │ │ │ -0000a810: 2020 656e 7472 6965 732e 2020 454e 5452 entries. ENTR │ │ │ -0000a820: 592d 4d41 494e 2069 7320 7468 6520 6669 Y-MAIN is the fi │ │ │ -0000a830: 7273 7420 6c69 6e65 206f 6620 7468 6520 rst line of the │ │ │ -0000a840: 6469 6172 7920 656e 7472 792e 0a0a 2866 diary entry...(f │ │ │ -0000a850: 6e20 4e4f 4e4d 4152 4b45 5220 454e 5452 n NONMARKER ENTR │ │ │ -0000a860: 592d 4d41 494e 291f 0a28 6465 6661 6c69 Y-MAIN)..(defali │ │ │ -0000a870: 6173 2027 6963 616c 656e 6461 722d 2d63 as 'icalendar--c │ │ │ -0000a880: 6f6e 7665 7274 2d66 6c6f 6174 2d74 6f2d onvert-float-to- │ │ │ -0000a890: 6963 616c 2023 5b35 3134 2022 5c33 3033 ical #[514 "\303 │ │ │ -0000a8a0: 025c 3330 3450 025c 225c 3230 355c 3234 .\304P.\"\205\24 │ │ │ -0000a8b0: 3100 5c33 3035 5c33 3036 2172 5c32 3131 1.\305\306!r\211 │ │ │ -0000a8c0: 715c 3231 305c 3330 375c 3331 305c 3331 q\210\307\310\31 │ │ │ -0000a8d0: 315c 3331 325c 3331 3305 215c 3331 345c 1\312\313.!\314\ │ │ │ -0000a8e0: 225c 3331 3524 5c32 3136 5c33 3136 5c33 "\315$\216\316\3 │ │ │ -0000a8f0: 3137 035c 2263 5c32 3130 6562 5c32 3130 17.\"c\210eb\210 │ │ │ -0000a900: 5c33 3230 7021 5c32 3131 4140 5c33 3135 \320p!\211A@\315 │ │ │ -0000a910: 0238 5c33 3231 0338 5c33 3232 0438 5c33 .8\321.8\322.8\3 │ │ │ -0000a920: 3233 5c33 3234 5c33 3235 6064 7b23 015c 23\324\325`d{#.\ │ │ │ -0000a930: 3230 3349 005c 3332 365c 3332 3706 095c 203I.\326\327..\ │ │ │ -0000a940: 225c 3231 305c 3333 305c 3333 3121 5c32 "\210\330\331!\2 │ │ │ -0000a950: 3130 5c33 3332 5c33 3333 5c33 3334 215c 10\332\333\334!\ │ │ │ -0000a960: 3333 3520 1806 0919 5c33 3336 0607 0607 335 ....\336.... │ │ │ -0000a970: 0607 232a 3f5c 3230 3565 005c 3333 375c ..#*?\205e.\337\ │ │ │ -0000a980: 3333 335c 3333 3421 505c 3334 3006 085c 333\334!P\340..\ │ │ │ -0000a990: 3234 375c 3230 3472 0006 083c 5c32 3033 247\204r...<\203 │ │ │ -0000a9a0: 7600 5c33 3431 5c32 3032 7700 5c33 3432 v.\341\202w.\342 │ │ │ -0000a9b0: 0609 3c5c 3230 355c 3230 3500 5c33 3433 ..<\205\205.\343 │ │ │ -0000a9c0: 5c33 3434 060b 4140 5c33 3435 2306 5c6e \344..A@\345#.\n │ │ │ -0000a9d0: 5c32 3437 5c32 3035 5c32 3137 005c 3334 \247\205\217.\34 │ │ │ -0000a9e0: 3606 0b21 5c33 3437 5c33 3436 060b 215c 6..!\347\346..!\ │ │ │ -0000a9f0: 6e06 0d48 5c32 3630 5c6e 0142 5c32 3636 n..H\260\n.B\266 │ │ │ -0000aa00: 5c32 3036 2a5c 3236 3201 5c32 3037 2220 \206*\262.\207" │ │ │ -0000aa10: 5b64 6174 6520 656e 7472 7920 6963 616c [date entry ical │ │ │ -0000aa20: 656e 6461 722d 2d77 6565 6b64 6179 2d61 endar--weekday-a │ │ │ -0000aa30: 7272 6179 2073 7472 696e 672d 6d61 7463 rray string-matc │ │ │ -0000aa40: 6820 2225 255c 5c28 2864 6961 7279 2d66 h "%%\\((diary-f │ │ │ -0000aa50: 6c6f 6174 202e 2b5c 5c29 203f 2422 2067 loat .+\\) ?$" g │ │ │ -0000aa60: 656e 6572 6174 652d 6e65 772d 6275 6666 enerate-new-buff │ │ │ -0000aa70: 6572 2022 202a 7465 6d70 2a22 206d 616b er " *temp*" mak │ │ │ -0000aa80: 652d 6279 7465 2d63 6f64 6520 3020 225c e-byte-code 0 "\ │ │ │ -0000aa90: 3330 315c 3330 3021 5c32 3035 0900 5c33 301\300!\205..\3 │ │ │ -0000aaa0: 3032 5c33 3030 215c 3230 3722 2076 636f 02\300!\207" vco │ │ │ -0000aab0: 6e63 6174 2076 6563 746f 7220 5b62 7566 ncat vector [buf │ │ │ -0000aac0: 6665 722d 6e61 6d65 206b 696c 6c2d 6275 fer-name kill-bu │ │ │ -0000aad0: 6666 6572 5d20 3220 6d61 7463 682d 7374 ffer] 2 match-st │ │ │ -0000aae0: 7269 6e67 2031 2072 6561 6420 3320 3420 ring 1 read 3 4 │ │ │ -0000aaf0: 7265 706c 6163 652d 7265 6765 7870 2d69 replace-regexp-i │ │ │ -0000ab00: 6e2d 7374 7269 6e67 2022 5c5c 285e 202b n-string "\\(^ + │ │ │ -0000ab10: 5c5c 7c20 2b24 5c5c 2922 2022 2220 6963 \\| +$\\)" "" ic │ │ │ -0000ab20: 616c 656e 6461 722d 2d64 6d73 6720 2264 alendar--dmsg "d │ │ │ -0000ab30: 6961 7279 2d66 6c6f 6174 2025 7322 2065 iary-float %s" e │ │ │ -0000ab40: 7272 6f72 2022 446f 6e27 7420 6b6e 6f77 rror "Don't know │ │ │ -0000ab50: 2069 6620 6f72 2068 6f77 2074 6f20 696d if or how to im │ │ │ -0000ab60: 706c 656d 656e 7420 6461 7920 696e 2060 plement day in ` │ │ │ -0000ab70: 6469 6172 792d 666c 6f61 7427 2220 225c diary-float'" "\ │ │ │ -0000ab80: 6e44 5453 5441 5254 3b56 414c 5545 3d44 nDTSTART;VALUE=D │ │ │ -0000ab90: 4154 453a 2220 666f 726d 6174 2d74 696d ATE:" format-tim │ │ │ -0000aba0: 652d 7374 7269 6e67 2022 2559 256d 2564 e-string "%Y%m%d │ │ │ -0000abb0: 2220 6361 6c65 6e64 6172 2d63 7572 7265 " calendar-curre │ │ │ -0000abc0: 6e74 2d64 6174 6520 6469 6172 792d 666c nt-date diary-fl │ │ │ -0000abd0: 6f61 7420 225c 6e45 5844 4154 453b 5641 oat "\nEXDATE;VA │ │ │ -0000abe0: 4c55 453d 4441 5445 3a22 2022 5c6e 5252 LUE=DATE:" "\nRR │ │ │ -0000abf0: 554c 453a 2220 2246 5245 513d 5945 4152 ULE:" "FREQ=YEAR │ │ │ -0000ac00: 4c59 3b42 594d 4f4e 5448 3d22 2022 4652 LY;BYMONTH=" "FR │ │ │ -0000ac10: 4551 3d4d 4f4e 5448 4c59 2220 6d61 7063 EQ=MONTHLY" mapc │ │ │ -0000ac20: 6f6e 6361 7420 235b 3235 3720 225c 3330 oncat #[257 "\30 │ │ │ -0000ac30: 3001 215c 3230 3722 205b 6e75 6d62 6572 0.!\207" [number │ │ │ -0000ac40: 2d74 6f2d 7374 7269 6e67 5d20 3320 225c -to-string] 3 "\ │ │ │ -0000ac50: 6e5c 6e28 666e 204d 2922 5d20 222c 2220 n\n(fn M)"] "," │ │ │ -0000ac60: 6e75 6d62 6572 2d74 6f2d 7374 7269 6e67 number-to-string │ │ │ -0000ac70: 2022 3b42 5944 4159 3d22 5d20 3230 2028 ";BYDAY="] 20 ( │ │ │ -0000ac80: 2324 202e 2034 3238 3331 295d 290a 2340 #$ . 42831)]).#@ │ │ │ -0000ac90: 3233 3320 436f 6e76 6572 7420 6064 6961 233 Convert `dia │ │ │ -0000aca0: 7279 2d64 6174 6527 2064 6961 7279 2065 ry-date' diary e │ │ │ -0000acb0: 6e74 7279 2074 6f20 6943 616c 656e 6461 ntry to iCalenda │ │ │ -0000acc0: 7220 666f 726d 6174 202d 2d20 756e 7375 r format -- unsu │ │ │ -0000acd0: 7070 6f72 7465 6421 0a0a 4649 584d 4521 pported!..FIXME! │ │ │ -0000ace0: 0a0a 4e4f 4e4d 4152 4b45 5220 6973 2061 ..NONMARKER is a │ │ │ -0000acf0: 2072 6567 756c 6172 2065 7870 7265 7373 regular express │ │ │ -0000ad00: 696f 6e20 6d61 7463 6869 6e67 2074 6865 ion matching the │ │ │ -0000ad10: 2073 7461 7274 206f 6620 6e6f 6e2d 6d61 start of non-ma │ │ │ -0000ad20: 726b 696e 670a 656e 7472 6965 732e 2020 rking.entries. │ │ │ -0000ad30: 454e 5452 592d 4d41 494e 2069 7320 7468 ENTRY-MAIN is th │ │ │ -0000ad40: 6520 6669 7273 7420 6c69 6e65 206f 6620 e first line of │ │ │ -0000ad50: 7468 6520 6469 6172 7920 656e 7472 792e the diary entry. │ │ │ -0000ad60: 0a0a 2866 6e20 4e4f 4e4d 4152 4b45 5220 ..(fn NONMARKER │ │ │ -0000ad70: 454e 5452 592d 4d41 494e 291f 0a28 6465 ENTRY-MAIN)..(de │ │ │ -0000ad80: 6661 6c69 6173 2027 6963 616c 656e 6461 falias 'icalenda │ │ │ -0000ad90: 722d 2d63 6f6e 7665 7274 2d64 6174 652d r--convert-date- │ │ │ -0000ada0: 746f 2d69 6361 6c20 235b 3531 3420 225c to-ical #[514 "\ │ │ │ -0000adb0: 3330 3002 5c33 3031 5002 5c22 5c32 3035 300.\301P.\"\205 │ │ │ -0000adc0: 1100 5c33 3032 5c33 3033 025c 225c 3231 ..\302\303.\"\21 │ │ │ -0000add0: 305c 3330 345c 3330 3521 5c32 3037 2220 0\304\305!\207" │ │ │ -0000ade0: 5b73 7472 696e 672d 6d61 7463 6820 2225 [string-match "% │ │ │ -0000adf0: 2528 6469 6172 792d 6461 7465 205c 5c28 %(diary-date \\( │ │ │ -0000ae00: 5b5e 295d 2b5c 5c29 295c 5c73 2d2a 5c5c [^)]+\\))\\s-*\\ │ │ │ -0000ae10: 282e 2a3f 5c5c 2920 3f24 2220 6963 616c (.*?\\) ?$" ical │ │ │ -0000ae20: 656e 6461 722d 2d64 6d73 6720 2264 6961 endar--dmsg "dia │ │ │ -0000ae30: 7279 2d64 6174 6520 2573 2220 6572 726f ry-date %s" erro │ │ │ -0000ae40: 7220 2260 6469 6172 792d 6461 7465 2720 r "`diary-date' │ │ │ -0000ae50: 6973 206e 6f74 2073 7570 706f 7274 6564 is not supported │ │ │ -0000ae60: 2079 6574 225d 2035 2028 2324 202e 2034 yet"] 5 (#$ . 4 │ │ │ -0000ae70: 3431 3830 295d 290a 2340 3231 3120 436f 4180)]).#@211 Co │ │ │ -0000ae80: 6e76 6572 7420 6064 6961 7279 2d63 7963 nvert `diary-cyc │ │ │ -0000ae90: 6c69 6327 2064 6961 7279 2065 6e74 7279 lic' diary entry │ │ │ -0000aea0: 2074 6f20 6943 616c 656e 6461 7220 666f to iCalendar fo │ │ │ -0000aeb0: 726d 6174 2e0a 4e4f 4e4d 4152 4b45 5220 rmat..NONMARKER │ │ │ -0000aec0: 6973 2061 2072 6567 756c 6172 2065 7870 is a regular exp │ │ │ -0000aed0: 7265 7373 696f 6e20 6d61 7463 6869 6e67 ression matching │ │ │ -0000aee0: 2074 6865 2073 7461 7274 206f 6620 6e6f the start of no │ │ │ -0000aef0: 6e2d 6d61 726b 696e 670a 656e 7472 6965 n-marking.entrie │ │ │ -0000af00: 732e 2020 454e 5452 592d 4d41 494e 2069 s. ENTRY-MAIN i │ │ │ -0000af10: 7320 7468 6520 6669 7273 7420 6c69 6e65 s the first line │ │ │ -0000af20: 206f 6620 7468 6520 6469 6172 7920 656e of the diary en │ │ │ -0000af30: 7472 792e 0a0a 2866 6e20 4e4f 4e4d 4152 try...(fn NONMAR │ │ │ -0000af40: 4b45 5220 454e 5452 592d 4d41 494e 291f KER ENTRY-MAIN). │ │ │ -0000af50: 0a28 6465 6661 6c69 6173 2027 6963 616c .(defalias 'ical │ │ │ -0000af60: 656e 6461 722d 2d63 6f6e 7665 7274 2d63 endar--convert-c │ │ │ -0000af70: 7963 6c69 632d 746f 2d69 6361 6c20 235b yclic-to-ical #[ │ │ │ -0000af80: 3531 3420 225c 3330 3002 5c33 3031 5002 514 "\300.\301P. │ │ │ -0000af90: 5c22 5c32 3035 5c32 3731 005c 3330 3201 \"\205\271.\302. │ │ │ -0000afa0: 5c33 3033 5c32 3234 5c33 3033 5c32 3235 \303\224\303\225 │ │ │ -0000afb0: 235c 3330 3202 5c33 3034 5c32 3234 5c33 #\302.\304\224\3 │ │ │ -0000afc0: 3034 5c32 3235 235c 3330 3501 215c 3330 04\225#\305.!\30 │ │ │ -0000afd0: 3502 215c 3330 3503 5c33 3033 5c22 5c33 5.!\305.\303\"\3 │ │ │ -0000afe0: 3036 5c33 3037 5c32 3234 5c32 3035 2f00 06\307\224\205/. │ │ │ -0000aff0: 5c33 3032 0607 5c33 3037 5c32 3234 5c33 \302..\307\224\3 │ │ │ -0000b000: 3037 5c32 3235 235c 3331 305c 3232 345c 07\225#\310\224\ │ │ │ -0000b010: 3230 353c 005c 3330 3206 085c 3331 305c 205<.\302..\310\ │ │ │ -0000b020: 3232 345c 3331 305c 3232 3523 5c22 5c33 224\310\225#\"\3 │ │ │ -0000b030: 3036 5c33 3131 5c32 3234 5c32 3035 4b00 06\311\224\205K. │ │ │ -0000b040: 5c33 3032 0608 5c33 3131 5c32 3234 5c33 \302..\311\224\3 │ │ │ -0000b050: 3131 5c32 3235 235c 3331 325c 3232 345c 11\225#\312\224\ │ │ │ -0000b060: 3230 3558 005c 3330 3206 095c 3331 325c 205X.\302..\312\ │ │ │ -0000b070: 3232 345c 3331 325c 3232 3523 5c22 5c33 224\312\225#\"\3 │ │ │ -0000b080: 3133 5c33 3032 0609 5c33 3134 5c32 3234 13\302..\314\224 │ │ │ -0000b090: 5c33 3134 5c32 3235 2321 5c33 3135 5c33 \314\225#!\315\3 │ │ │ -0000b0a0: 3136 065c 6e5c 225c 3231 3002 5c32 3033 16.\n\"\210.\203 │ │ │ -0000b0b0: 5c32 3032 0001 5c32 3034 5c32 3032 005c \202..\204\202.\ │ │ │ -0000b0c0: 3331 375c 3332 305c 3332 315c 3332 3206 317\320\321\322. │ │ │ -0000b0d0: 0623 215c 3332 335c 3332 345c 3332 3503 .#!\323\324\325. │ │ │ -0000b0e0: 5c5c 5c22 5c32 3632 035c 3231 305c 3332 \\\"\262.\210\32 │ │ │ -0000b0f0: 3603 5c32 3033 5c32 3133 005c 3332 375c 6.\203\213.\327\ │ │ │ -0000b100: 3230 325c 3231 3400 5c33 3330 0607 055c 202\214.\330...\ │ │ │ -0000b110: 3230 365c 3232 3300 5c33 3232 5c33 3331 206\223.\322\331 │ │ │ -0000b120: 0606 5c32 3033 5c32 3335 005c 3332 375c ..\203\235.\327\ │ │ │ -0000b130: 3230 325c 3233 3600 5c33 3330 0607 5c32 202\236.\330..\2 │ │ │ -0000b140: 3033 5c32 3530 0006 5c6e 5c32 3032 5c32 03\250..\n\202\2 │ │ │ -0000b150: 3532 0006 0906 085c 3230 365c 3236 3000 52.....\206\260. │ │ │ -0000b160: 5c33 3232 5c33 3332 0610 5c32 3630 5c6e \322\332..\260\n │ │ │ -0000b170: 0142 5c32 3636 5c32 3130 5c32 3037 2220 .B\266\210\207" │ │ │ -0000b180: 5b73 7472 696e 672d 6d61 7463 6820 2225 [string-match "% │ │ │ -0000b190: 2528 6469 6172 792d 6379 636c 6963 205c %(diary-cyclic \ │ │ │ -0000b1a0: 5c28 5b5e 205d 2b5c 5c29 202b 5c5c 285b \([^ ]+\\) +\\([ │ │ │ -0000b1b0: 5e20 2f5d 2b5b 202f 5d2b 5b5e 202f 5d2b ^ /]+[ /]+[^ /]+ │ │ │ -0000b1c0: 5b20 2f5d 2b5b 5e20 5d2b 5c5c 2929 5c5c [ /]+[^ ]+\\))\\ │ │ │ -0000b1d0: 732d 2a5c 5c28 5c5c 285b 302d 395d 5b30 s-*\\(\\([0-9][0 │ │ │ -0000b1e0: 2d39 5d3f 3a5b 302d 395d 5b30 2d39 5d5c -9]?:[0-9][0-9]\ │ │ │ -0000b1f0: 5c29 5c5c 285b 6170 5d6d 5c5c 293f 5c5c \)\\([ap]m\\)?\\ │ │ │ -0000b200: 282d 5c5c 285b 302d 395d 5b30 2d39 5d3f (-\\([0-9][0-9]? │ │ │ -0000b210: 3a5b 302d 395d 5b30 2d39 5d5c 5c29 5c5c :[0-9][0-9]\\)\\ │ │ │ -0000b220: 285b 6170 5d6d 5c5c 293f 5c5c 293f 5c5c ([ap]m\\)?\\)?\\ │ │ │ -0000b230: 293f 5c5c 732d 2a5c 5c28 2e2a 3f5c 5c29 )?\\s-*\\(.*?\\) │ │ │ -0000b240: 203f 2422 2073 7562 7374 7269 6e67 2031 ?$" substring 1 │ │ │ -0000b250: 2032 2069 6361 6c65 6e64 6172 2d2d 6461 2 icalendar--da │ │ │ -0000b260: 7465 7374 7269 6e67 2d74 6f2d 6973 6f64 testring-to-isod │ │ │ -0000b270: 6174 6520 6963 616c 656e 6461 722d 2d64 ate icalendar--d │ │ │ -0000b280: 6961 7279 7469 6d65 2d74 6f2d 6973 6f74 iarytime-to-isot │ │ │ -0000b290: 696d 6520 3420 3520 3720 3820 6963 616c ime 4 5 7 8 ical │ │ │ -0000b2a0: 656e 6461 722d 2d63 6f6e 7665 7274 2d73 endar--convert-s │ │ │ -0000b2b0: 7472 696e 672d 666f 722d 6578 706f 7274 tring-for-export │ │ │ -0000b2c0: 2039 2069 6361 6c65 6e64 6172 2d2d 646d 9 icalendar--dm │ │ │ -0000b2d0: 7367 2022 6469 6172 792d 6379 636c 6963 sg "diary-cyclic │ │ │ -0000b2e0: 2025 7322 2072 6561 6420 7265 706c 6163 %s" read replac │ │ │ -0000b2f0: 652d 7265 6765 7870 2d69 6e2d 7374 7269 e-regexp-in-stri │ │ │ -0000b300: 6e67 2022 5e54 303f 2220 2222 2066 6f72 ng "^T0?" "" for │ │ │ -0000b310: 6d61 7420 2254 2530 3664 2220 3130 3030 mat "T%06d" 1000 │ │ │ -0000b320: 3020 225c 6e44 5453 5441 5254 3b22 2022 0 "\nDTSTART;" " │ │ │ -0000b330: 5641 4c55 453d 4441 5445 2d54 494d 453a VALUE=DATE-TIME: │ │ │ -0000b340: 2220 2256 414c 5545 3d44 4154 453a 2220 " "VALUE=DATE:" │ │ │ -0000b350: 225c 6e44 5445 4e44 3b22 2022 5c6e 5252 "\nDTEND;" "\nRR │ │ │ -0000b360: 554c 453a 4652 4551 3d44 4149 4c59 3b49 ULE:FREQ=DAILY;I │ │ │ -0000b370: 4e54 4552 5641 4c3d 225d 2032 3020 2823 NTERVAL="] 20 (# │ │ │ -0000b380: 2420 2e20 3434 3637 3029 5d29 0a23 4032 $ . 44670)]).#@2 │ │ │ -0000b390: 3136 2043 6f6e 7665 7274 2060 6469 6172 16 Convert `diar │ │ │ -0000b3a0: 792d 616e 6e69 7665 7273 6172 7927 2064 y-anniversary' d │ │ │ -0000b3b0: 6961 7279 2065 6e74 7279 2074 6f20 6943 iary entry to iC │ │ │ -0000b3c0: 616c 656e 6461 7220 666f 726d 6174 2e0a alendar format.. │ │ │ -0000b3d0: 4e4f 4e4d 4152 4b45 5220 6973 2061 2072 NONMARKER is a r │ │ │ -0000b3e0: 6567 756c 6172 2065 7870 7265 7373 696f egular expressio │ │ │ -0000b3f0: 6e20 6d61 7463 6869 6e67 2074 6865 2073 n matching the s │ │ │ -0000b400: 7461 7274 206f 6620 6e6f 6e2d 6d61 726b tart of non-mark │ │ │ -0000b410: 696e 670a 656e 7472 6965 732e 2020 454e ing.entries. EN │ │ │ -0000b420: 5452 592d 4d41 494e 2069 7320 7468 6520 TRY-MAIN is the │ │ │ -0000b430: 6669 7273 7420 6c69 6e65 206f 6620 7468 first line of th │ │ │ -0000b440: 6520 6469 6172 7920 656e 7472 792e 0a0a e diary entry... │ │ │ -0000b450: 2866 6e20 4e4f 4e4d 4152 4b45 5220 454e (fn NONMARKER EN │ │ │ -0000b460: 5452 592d 4d41 494e 291f 0a28 6465 6661 TRY-MAIN)..(defa │ │ │ -0000b470: 6c69 6173 2027 6963 616c 656e 6461 722d lias 'icalendar- │ │ │ -0000b480: 2d63 6f6e 7665 7274 2d61 6e6e 6976 6572 -convert-anniver │ │ │ -0000b490: 7361 7279 2d74 6f2d 6963 616c 2023 5b35 sary-to-ical #[5 │ │ │ -0000b4a0: 3134 2022 5c33 3030 025c 3330 3150 025c 14 "\300.\301P.\ │ │ │ -0000b4b0: 225c 3230 355c 3235 3700 5c33 3032 015c "\205\257.\302.\ │ │ │ -0000b4c0: 3330 335c 3232 345c 3330 335c 3232 3523 303\224\303\225# │ │ │ -0000b4d0: 5c33 3034 0121 5c33 3034 025c 3330 335c \304.!\304.\303\ │ │ │ -0000b4e0: 225c 3330 355c 3330 365c 3232 345c 3230 "\305\306\224\20 │ │ │ -0000b4f0: 3524 005c 3330 3205 5c33 3036 5c32 3234 5$.\302.\306\224 │ │ │ -0000b500: 5c33 3036 5c32 3235 235c 3330 375c 3232 \306\225#\307\22 │ │ │ -0000b510: 345c 3230 3531 005c 3330 3206 065c 3330 4\2051.\302..\30 │ │ │ -0000b520: 375c 3232 345c 3330 375c 3232 3523 5c22 7\224\307\225#\" │ │ │ -0000b530: 5c33 3035 5c33 3130 5c32 3234 5c32 3035 \305\310\224\205 │ │ │ -0000b540: 4000 5c33 3032 0606 5c33 3130 5c32 3234 @.\302..\310\224 │ │ │ -0000b550: 5c33 3130 5c32 3235 235c 3331 315c 3232 \310\225#\311\22 │ │ │ -0000b560: 345c 3230 354d 005c 3330 3206 075c 3331 4\205M.\302..\31 │ │ │ -0000b570: 315c 3232 345c 3331 315c 3232 3523 5c22 1\224\311\225#\" │ │ │ -0000b580: 5c33 3132 5c33 3032 0607 5c33 3133 5c32 \312\302..\313\2 │ │ │ -0000b590: 3234 5c33 3133 5c32 3235 2321 5c33 3134 24\313\225#!\314 │ │ │ -0000b5a0: 5c33 3135 0608 5c22 5c32 3130 025c 3230 \315..\"\210.\20 │ │ │ -0000b5b0: 3377 0001 5c32 3034 7700 5c33 3136 5c33 3w..\204w.\316\3 │ │ │ -0000b5c0: 3137 5c33 3230 5c33 3231 0606 2321 5c33 17\320\321..#!\3 │ │ │ -0000b5d0: 3232 5c33 3233 5c33 3234 035c 5c5c 225c 22\323\324.\\\"\ │ │ │ -0000b5e0: 3236 3203 5c32 3130 5c33 3235 035c 3230 262.\210\325.\20 │ │ │ -0000b5f0: 335c 3230 3000 5c33 3236 5c32 3032 5c32 3\200.\326\202\2 │ │ │ -0000b600: 3031 005c 3332 3706 0605 5c32 3036 5c32 01.\327...\206\2 │ │ │ -0000b610: 3130 005c 3332 315c 3333 3006 065c 3230 10.\321\330..\20 │ │ │ -0000b620: 335c 3232 3200 5c33 3236 5c32 3032 5c32 3\222.\326\202\2 │ │ │ -0000b630: 3233 005c 3332 3706 0906 085c 3230 365c 23.\327....\206\ │ │ │ -0000b640: 3233 3300 5c33 3231 5c33 3331 5c33 3032 233.\321\331\302 │ │ │ -0000b650: 060e 5c33 3037 5c33 3130 235c 3333 325c ..\307\310#\332\ │ │ │ -0000b660: 3330 3206 105c 3331 305c 3331 3323 5c32 302..\310\313#\2 │ │ │ -0000b670: 3630 5c66 0142 5c32 3636 5c32 3036 5c32 60\f.B\266\206\2 │ │ │ -0000b680: 3037 2220 5b73 7472 696e 672d 6d61 7463 07" [string-matc │ │ │ -0000b690: 6820 2225 2528 6469 6172 792d 616e 6e69 h "%%(diary-anni │ │ │ -0000b6a0: 7665 7273 6172 7920 5c5c 285b 5e29 5d2b versary \\([^)]+ │ │ │ -0000b6b0: 5c5c 2929 5c5c 732d 2a5c 5c28 5c5c 285b \\))\\s-*\\(\\([ │ │ │ -0000b6c0: 302d 395d 5b30 2d39 5d3f 3a5b 302d 395d 0-9][0-9]?:[0-9] │ │ │ -0000b6d0: 5b30 2d39 5d5c 5c29 5c5c 285b 6170 5d6d [0-9]\\)\\([ap]m │ │ │ -0000b6e0: 5c5c 293f 5c5c 282d 5c5c 285b 302d 395d \\)?\\(-\\([0-9] │ │ │ -0000b6f0: 5b30 2d39 5d3f 3a5b 302d 395d 5b30 2d39 [0-9]?:[0-9][0-9 │ │ │ -0000b700: 5d5c 5c29 5c5c 285b 6170 5d6d 5c5c 293f ]\\)\\([ap]m\\)? │ │ │ -0000b710: 5c5c 293f 5c5c 293f 5c5c 732d 2a5c 5c28 \\)?\\)?\\s-*\\( │ │ │ -0000b720: 2e2a 3f5c 5c29 203f 2422 2073 7562 7374 .*?\\) ?$" subst │ │ │ -0000b730: 7269 6e67 2031 2069 6361 6c65 6e64 6172 ring 1 icalendar │ │ │ -0000b740: 2d2d 6461 7465 7374 7269 6e67 2d74 6f2d --datestring-to- │ │ │ -0000b750: 6973 6f64 6174 6520 6963 616c 656e 6461 isodate icalenda │ │ │ -0000b760: 722d 2d64 6961 7279 7469 6d65 2d74 6f2d r--diarytime-to- │ │ │ -0000b770: 6973 6f74 696d 6520 3320 3420 3620 3720 isotime 3 4 6 7 │ │ │ -0000b780: 6963 616c 656e 6461 722d 2d63 6f6e 7665 icalendar--conve │ │ │ -0000b790: 7274 2d73 7472 696e 672d 666f 722d 6578 rt-string-for-ex │ │ │ -0000b7a0: 706f 7274 2038 2069 6361 6c65 6e64 6172 port 8 icalendar │ │ │ -0000b7b0: 2d2d 646d 7367 2022 6469 6172 792d 616e --dmsg "diary-an │ │ │ -0000b7c0: 6e69 7665 7273 6172 7920 2573 2220 7265 niversary %s" re │ │ │ -0000b7d0: 6164 2072 6570 6c61 6365 2d72 6567 6578 ad replace-regex │ │ │ -0000b7e0: 702d 696e 2d73 7472 696e 6720 225e 5430 p-in-string "^T0 │ │ │ -0000b7f0: 3f22 2022 2220 666f 726d 6174 2022 5425 ?" "" format "T% │ │ │ -0000b800: 3036 6422 2031 3030 3030 2022 5c6e 4454 06d" 10000 "\nDT │ │ │ -0000b810: 5354 4152 543b 2220 2256 414c 5545 3d44 START;" "VALUE=D │ │ │ -0000b820: 4154 452d 5449 4d45 3a22 2022 5641 4c55 ATE-TIME:" "VALU │ │ │ -0000b830: 453d 4441 5445 3a22 2022 5c6e 4454 454e E=DATE:" "\nDTEN │ │ │ -0000b840: 443b 2220 225c 6e52 5255 4c45 3a46 5245 D;" "\nRRULE:FRE │ │ │ -0000b850: 513d 5945 4152 4c59 3b49 4e54 4552 5641 Q=YEARLY;INTERVA │ │ │ -0000b860: 4c3d 313b 4259 4d4f 4e54 483d 2220 223b L=1;BYMONTH=" "; │ │ │ -0000b870: 4259 4d4f 4e54 4844 4159 3d22 5d20 3233 BYMONTHDAY="] 23 │ │ │ -0000b880: 2028 2324 202e 2034 3539 3731 295d 290a (#$ . 45971)]). │ │ │ -0000b890: 2340 3239 3220 496d 706f 7274 2061 6e20 #@292 Import an │ │ │ -0000b8a0: 6943 616c 656e 6461 7220 6669 6c65 2061 iCalendar file a │ │ │ -0000b8b0: 6e64 2061 7070 656e 6420 746f 2061 2064 nd append to a d │ │ │ -0000b8c0: 6961 7279 2066 696c 652e 0a41 7267 756d iary file..Argum │ │ │ -0000b8d0: 656e 7420 4943 414c 2d46 494c 454e 414d ent ICAL-FILENAM │ │ │ -0000b8e0: 4520 6f75 7470 7574 2069 4361 6c65 6e64 E output iCalend │ │ │ -0000b8f0: 6172 2066 696c 652e 0a41 7267 756d 656e ar file..Argumen │ │ │ -0000b900: 7420 4449 4152 592d 4649 4c45 4e41 4d45 t DIARY-FILENAME │ │ │ -0000b910: 2069 6e70 7574 2060 6469 6172 792d 6669 input `diary-fi │ │ │ -0000b920: 6c65 272e 0a4f 7074 696f 6e61 6c20 6172 le'..Optional ar │ │ │ -0000b930: 6775 6d65 6e74 204e 4f4e 2d4d 4152 4b49 gument NON-MARKI │ │ │ -0000b940: 4e47 2064 6574 6572 6d69 6e65 7320 7768 NG determines wh │ │ │ -0000b950: 6574 6865 7220 6576 656e 7473 2061 7265 ether events are │ │ │ -0000b960: 2063 7265 6174 6564 2061 730a 6e6f 6e2d created as.non- │ │ │ -0000b970: 6d61 726b 696e 6720 6f72 206e 6f74 2e0a marking or not.. │ │ │ -0000b980: 0a28 666e 2049 4341 4c2d 4649 4c45 4e41 .(fn ICAL-FILENA │ │ │ -0000b990: 4d45 2044 4941 5259 2d46 494c 454e 414d ME DIARY-FILENAM │ │ │ -0000b9a0: 4520 266f 7074 696f 6e61 6c20 4e4f 4e2d E &optional NON- │ │ │ -0000b9b0: 4d41 524b 494e 4729 1f0a 2864 6566 616c MARKING)..(defal │ │ │ -0000b9c0: 6961 7320 2769 6361 6c65 6e64 6172 2d69 ias 'icalendar-i │ │ │ -0000b9d0: 6d70 6f72 742d 6669 6c65 2023 5b37 3730 mport-file #[770 │ │ │ -0000b9e0: 2022 725c 3330 3003 2171 5c32 3130 5c33 "r\300.!q\210\3 │ │ │ -0000b9f0: 3031 025c 3330 3203 2329 5c32 3037 2220 01.\302.#)\207" │ │ │ -0000ba00: 5b66 696e 642d 6669 6c65 2069 6361 6c65 [find-file icale │ │ │ -0000ba10: 6e64 6172 2d69 6d70 6f72 742d 6275 6666 ndar-import-buff │ │ │ -0000ba20: 6572 2074 5d20 3720 2823 2420 2e20 3437 er t] 7 (#$ . 47 │ │ │ -0000ba30: 3235 3429 2022 6649 6d70 6f72 7420 6943 254) "fImport iC │ │ │ -0000ba40: 616c 656e 6461 7220 6461 7461 2066 726f alendar data fro │ │ │ -0000ba50: 6d20 6669 6c65 3a20 5c6e 4669 6e74 6f20 m file: \nFinto │ │ │ -0000ba60: 6469 6172 7920 6669 6c65 3a5c 6e50 225d diary file:\nP"] │ │ │ -0000ba70: 290a 2340 3635 3520 4578 7472 6163 7420 ).#@655 Extract │ │ │ -0000ba80: 6943 616c 656e 6461 7220 6576 656e 7473 iCalendar events │ │ │ -0000ba90: 2066 726f 6d20 6375 7272 656e 7420 6275 from current bu │ │ │ -0000baa0: 6666 6572 2e0a 0a54 6869 7320 6675 6e63 ffer...This func │ │ │ -0000bab0: 7469 6f6e 2073 6561 7263 6865 7320 7468 tion searches th │ │ │ -0000bac0: 6520 6375 7272 656e 7420 6275 6666 6572 e current buffer │ │ │ -0000bad0: 2066 6f72 2074 6865 2066 6972 7374 2069 for the first i │ │ │ -0000bae0: 4361 6c65 6e64 6172 0a6f 626a 6563 742c Calendar.object, │ │ │ -0000baf0: 2072 6561 6473 2069 7420 616e 6420 6164 reads it and ad │ │ │ -0000bb00: 6473 2061 6c6c 2056 4556 454e 5420 656c ds all VEVENT el │ │ │ -0000bb10: 656d 656e 7473 2074 6f20 7468 6520 6469 ements to the di │ │ │ -0000bb20: 6172 790a 4449 4152 592d 4649 4c45 4e41 ary.DIARY-FILENA │ │ │ -0000bb30: 4d45 2e0a 0a49 7420 7769 6c6c 2061 736b ME...It will ask │ │ │ -0000bb40: 2066 6f72 2065 6163 6820 6170 706f 696e for each appoin │ │ │ -0000bb50: 746d 656e 7420 7768 6574 6865 7220 746f tment whether to │ │ │ -0000bb60: 2061 6464 2069 7420 746f 2074 6865 2064 add it to the d │ │ │ -0000bb70: 6961 7279 0a75 6e6c 6573 7320 444f 2d4e iary.unless DO-N │ │ │ -0000bb80: 4f54 2d41 534b 2069 7320 6e6f 6e2d 6e69 OT-ASK is non-ni │ │ │ -0000bb90: 6c2e 2020 5768 656e 2063 616c 6c65 6420 l. When called │ │ │ -0000bba0: 696e 7465 7261 6374 6976 656c 792c 0a44 interactively,.D │ │ │ -0000bbb0: 4f2d 4e4f 542d 4153 4b20 6973 206e 696c O-NOT-ASK is nil │ │ │ -0000bbc0: 2c20 736f 2074 6861 7420 796f 7520 6172 , so that you ar │ │ │ -0000bbd0: 6520 6173 6b65 6420 666f 7220 6561 6368 e asked for each │ │ │ -0000bbe0: 2065 7665 6e74 2e0a 0a4e 4f4e 2d4d 4152 event...NON-MAR │ │ │ -0000bbf0: 4b49 4e47 2064 6574 6572 6d69 6e65 7320 KING determines │ │ │ -0000bc00: 7768 6574 6865 7220 6469 6172 7920 6576 whether diary ev │ │ │ -0000bc10: 656e 7473 2061 7265 2063 7265 6174 6564 ents are created │ │ │ -0000bc20: 2061 730a 6e6f 6e2d 6d61 726b 696e 672e as.non-marking. │ │ │ -0000bc30: 0a0a 5265 7475 726e 2063 6f64 6520 7420 ..Return code t │ │ │ -0000bc40: 6d65 616e 7320 7468 6174 2069 6d70 6f72 means that impor │ │ │ -0000bc50: 7469 6e67 2077 6f72 6b65 6420 7765 6c6c ting worked well │ │ │ -0000bc60: 2c20 7265 7475 726e 2063 6f64 6520 6e69 , return code ni │ │ │ -0000bc70: 6c0a 6d65 616e 7320 7468 6174 2061 6e20 l.means that an │ │ │ -0000bc80: 6572 726f 7220 6861 7320 6f63 6375 7272 error has occurr │ │ │ -0000bc90: 6564 2e20 2045 7272 6f72 206d 6573 7361 ed. Error messa │ │ │ -0000bca0: 6765 7320 7769 6c6c 2062 6520 696e 2074 ges will be in t │ │ │ -0000bcb0: 6865 0a62 7566 6665 7220 602a 6963 616c he.buffer `*ical │ │ │ -0000bcc0: 656e 6461 722d 6572 726f 7273 2a27 2e0a endar-errors*'.. │ │ │ -0000bcd0: 0a28 666e 2026 6f70 7469 6f6e 616c 2044 .(fn &optional D │ │ │ -0000bce0: 4941 5259 2d46 494c 454e 414d 4520 444f IARY-FILENAME DO │ │ │ -0000bcf0: 2d4e 4f54 2d41 534b 204e 4f4e 2d4d 4152 -NOT-ASK NON-MAR │ │ │ -0000bd00: 4b49 4e47 291f 0a28 6465 6661 6c69 6173 KING)..(defalias │ │ │ -0000bd10: 2027 6963 616c 656e 6461 722d 696d 706f 'icalendar-impo │ │ │ -0000bd20: 7274 2d62 7566 6665 7220 235b 3736 3820 rt-buffer #[768 │ │ │ -0000bd30: 2272 5c33 3030 5c33 3031 215c 3231 305c "r\300\301!\210\ │ │ │ -0000bd40: 3330 3270 2171 5c32 3130 6562 5c32 3130 302p!q\210eb\210 │ │ │ -0000bd50: 5c33 3030 5c33 3033 215c 3231 305c 3330 \300\303!\210\30 │ │ │ -0000bd60: 345c 3330 355c 3330 365c 3330 3723 5c32 4\305\306\307#\2 │ │ │ -0000bd70: 3033 5a00 5c33 3036 5c32 3131 5c33 3030 03Z.\306\211\300 │ │ │ -0000bd80: 5c33 3130 215c 3231 305c 3331 3120 5c32 \310!\210\311 \2 │ │ │ -0000bd90: 3130 5c33 3132 5c33 3036 5c32 3131 5c22 10\312\306\211\" │ │ │ -0000bda0: 5c32 3632 025c 3330 305c 3331 3321 5c32 \262.\300\313!\2 │ │ │ -0000bdb0: 3130 5c33 3030 5c33 3134 215c 3231 305c 10\300\314!\210\ │ │ │ -0000bdc0: 3331 3502 0606 0606 0606 245c 3236 3201 315.......$\262. │ │ │ -0000bdd0: 045c 3230 334f 005c 3331 3605 215c 3231 .\203O.\316.!\21 │ │ │ -0000bde0: 315c 3230 334e 0072 5c32 3131 715c 3231 1\203N.r\211q\21 │ │ │ -0000bdf0: 305c 3331 3720 5c32 3130 295c 3231 305c 0\317 \210)\210\ │ │ │ -0000be00: 3330 305c 3332 3021 5c32 3130 5c32 3131 300\320!\210\211 │ │ │ -0000be10: 3f5c 3236 365c 3230 325c 3230 325f 005c ?\266\202\202_.\ │ │ │ -0000be20: 3330 305c 3332 3121 5c32 3130 5c33 3036 300\321!\210\306 │ │ │ -0000be30: 295c 3230 3722 205b 6d65 7373 6167 6520 )\207" [message │ │ │ -0000be40: 2250 7265 7061 7269 6e67 2069 4361 6c65 "Preparing iCale │ │ │ -0000be50: 6e64 6172 2e2e 2e22 2069 6361 6c65 6e64 ndar..." icalend │ │ │ -0000be60: 6172 2d2d 6765 742d 756e 666f 6c64 6564 ar--get-unfolded │ │ │ -0000be70: 2d62 7566 6665 7220 2250 7265 7061 7269 -buffer "Prepari │ │ │ -0000be80: 6e67 2069 4361 6c65 6e64 6172 2e2e 2e64 ng iCalendar...d │ │ │ -0000be90: 6f6e 6522 2072 652d 7365 6172 6368 2d66 one" re-search-f │ │ │ -0000bea0: 6f72 7761 7264 2022 5e42 4547 494e 3a56 orward "^BEGIN:V │ │ │ -0000beb0: 4341 4c45 4e44 4152 5c5c 732d 2a24 2220 CALENDAR\\s-*$" │ │ │ -0000bec0: 6e69 6c20 7420 2252 6561 6469 6e67 2069 nil t "Reading i │ │ │ -0000bed0: 4361 6c65 6e64 6172 2e2e 2e22 2062 6567 Calendar..." beg │ │ │ -0000bee0: 696e 6e69 6e67 2d6f 662d 6c69 6e65 2069 inning-of-line i │ │ │ -0000bef0: 6361 6c65 6e64 6172 2d2d 7265 6164 2d65 calendar--read-e │ │ │ -0000bf00: 6c65 6d65 6e74 2022 5265 6164 696e 6720 lement "Reading │ │ │ -0000bf10: 6943 616c 656e 6461 722e 2e2e 646f 6e65 iCalendar...done │ │ │ -0000bf20: 2220 2243 6f6e 7665 7274 696e 6720 6943 " "Converting iC │ │ │ -0000bf30: 616c 656e 6461 722e 2e2e 2220 6963 616c alendar..." ical │ │ │ -0000bf40: 656e 6461 722d 2d63 6f6e 7665 7274 2d69 endar--convert-i │ │ │ -0000bf50: 6361 6c2d 746f 2d64 6961 7279 2066 696e cal-to-diary fin │ │ │ -0000bf60: 642d 6275 6666 6572 2d76 6973 6974 696e d-buffer-visitin │ │ │ -0000bf70: 6720 7361 7665 2d62 7566 6665 7220 2243 g save-buffer "C │ │ │ -0000bf80: 6f6e 7665 7274 696e 6720 6943 616c 656e onverting iCalen │ │ │ -0000bf90: 6461 722e 2e2e 646f 6e65 2220 2243 7572 dar...done" "Cur │ │ │ -0000bfa0: 7265 6e74 2062 7566 6665 7220 646f 6573 rent buffer does │ │ │ -0000bfb0: 206e 6f74 2063 6f6e 7461 696e 2069 4361 not contain iCa │ │ │ -0000bfc0: 6c65 6e64 6172 2063 6f6e 7465 6e74 7321 lendar contents! │ │ │ -0000bfd0: 225d 2031 3020 2823 2420 2e20 3437 3733 "] 10 (#$ . 4773 │ │ │ -0000bfe0: 3629 206e 696c 5d29 0a23 4036 3720 4372 6) nil]).#@67 Cr │ │ │ -0000bff0: 6561 7465 2061 2073 7472 696e 6720 7265 eate a string re │ │ │ -0000c000: 7072 6573 656e 7461 7469 6f6e 206f 6620 presentation of │ │ │ -0000c010: 616e 2069 4361 6c65 6e64 6172 2045 5645 an iCalendar EVE │ │ │ -0000c020: 4e54 2e0a 0a28 666e 2045 5645 4e54 291f NT...(fn EVENT). │ │ │ -0000c030: 0a28 6465 6661 6c69 6173 2027 6963 616c .(defalias 'ical │ │ │ -0000c040: 656e 6461 722d 2d66 6f72 6d61 742d 6963 endar--format-ic │ │ │ -0000c050: 616c 2d65 7665 6e74 2023 5b32 3537 2022 al-event #[257 " │ │ │ -0000c060: 5c33 3032 0821 5c32 3033 5c6e 0008 0121 \302.!\203\n...! │ │ │ -0000c070: 5c32 3037 0843 5c33 3033 5c33 3034 0119 \207.C\303\304.. │ │ │ -0000c080: 5c33 3035 5c33 3036 5c33 3037 5c33 3130 \305\306\307\310 │ │ │ -0000c090: 5c33 3131 5c33 3132 0609 0609 5c22 5c33 \311\312....\"\3 │ │ │ -0000c0a0: 3133 5c22 5c33 3134 5c33 3135 2502 5c22 13\"\314\315%.\" │ │ │ -0000c0b0: 5c32 3130 025c 3234 3229 5c32 3037 2220 \210.\242)\207" │ │ │ -0000c0c0: 5b69 6361 6c65 6e64 6172 2d69 6d70 6f72 [icalendar-impor │ │ │ -0000c0d0: 742d 666f 726d 6174 2063 6173 652d 666f t-format case-fo │ │ │ -0000c0e0: 6c64 2d73 6561 7263 6820 6675 6e63 7469 ld-search functi │ │ │ -0000c0f0: 6f6e 7020 6e69 6c20 2828 2225 6322 2043 onp nil (("%c" C │ │ │ -0000c100: 4c41 5353 2069 6361 6c65 6e64 6172 2d69 LASS icalendar-i │ │ │ -0000c110: 6d70 6f72 742d 666f 726d 6174 2d63 6c61 mport-format-cla │ │ │ -0000c120: 7373 2920 2822 2564 2220 4445 5343 5249 ss) ("%d" DESCRI │ │ │ -0000c130: 5054 494f 4e20 6963 616c 656e 6461 722d PTION icalendar- │ │ │ -0000c140: 696d 706f 7274 2d66 6f72 6d61 742d 6465 import-format-de │ │ │ -0000c150: 7363 7269 7074 696f 6e29 2028 2225 6c22 scription) ("%l" │ │ │ -0000c160: 204c 4f43 4154 494f 4e20 6963 616c 656e LOCATION icalen │ │ │ -0000c170: 6461 722d 696d 706f 7274 2d66 6f72 6d61 dar-import-forma │ │ │ -0000c180: 742d 6c6f 6361 7469 6f6e 2920 2822 256f t-location) ("%o │ │ │ -0000c190: 2220 4f52 4741 4e49 5a45 5220 6963 616c " ORGANIZER ical │ │ │ -0000c1a0: 656e 6461 722d 696d 706f 7274 2d66 6f72 endar-import-for │ │ │ -0000c1b0: 6d61 742d 6f72 6761 6e69 7a65 7229 2028 mat-organizer) ( │ │ │ -0000c1c0: 2225 7322 2053 554d 4d41 5259 2069 6361 "%s" SUMMARY ica │ │ │ -0000c1d0: 6c65 6e64 6172 2d69 6d70 6f72 742d 666f lendar-import-fo │ │ │ -0000c1e0: 726d 6174 2d73 756d 6d61 7279 2920 2822 rmat-summary) (" │ │ │ -0000c1f0: 2574 2220 5354 4154 5553 2069 6361 6c65 %t" STATUS icale │ │ │ -0000c200: 6e64 6172 2d69 6d70 6f72 742d 666f 726d ndar-import-form │ │ │ -0000c210: 6174 2d73 7461 7475 7329 2028 2225 7522 at-status) ("%u" │ │ │ -0000c220: 2055 524c 2069 6361 6c65 6e64 6172 2d69 URL icalendar-i │ │ │ -0000c230: 6d70 6f72 742d 666f 726d 6174 2d75 726c mport-format-url │ │ │ -0000c240: 2920 2822 2555 2220 5549 4420 6963 616c ) ("%U" UID ical │ │ │ -0000c250: 656e 6461 722d 696d 706f 7274 2d66 6f72 endar-import-for │ │ │ -0000c260: 6d61 742d 7569 6429 2920 6d61 7063 206d mat-uid)) mapc m │ │ │ -0000c270: 616b 652d 6279 7465 2d63 6f64 6520 3235 ake-byte-code 25 │ │ │ -0000c280: 3720 225c 3231 3140 0141 4002 4141 405c 7 "\211@.A@.AA@\ │ │ │ -0000c290: 3330 325c 3330 3003 5c22 5c33 3033 015c 302\300.\"\303.\ │ │ │ -0000c2a0: 3230 3325 0001 475c 3330 3456 5c32 3033 203%..G\304V\203 │ │ │ -0000c2b0: 2500 5c33 3035 5c33 3036 5c33 3037 0421 %.\305\306\307.! │ │ │ -0000c2c0: 054a 5c33 3130 5c32 3131 255c 3236 3201 .J\310\211%\262. │ │ │ -0000c2d0: 5c33 3031 5c33 3035 0606 035c 3330 315c \301\305...\301\ │ │ │ -0000c2e0: 3234 325c 3331 305c 3231 3125 5c32 3430 242\310\211%\240 │ │ │ -0000c2f0: 5c32 3037 2220 7663 6f6e 6361 7420 7665 \207" vconcat ve │ │ │ -0000c300: 6374 6f72 205b 6963 616c 656e 6461 722d ctor [icalendar- │ │ │ -0000c310: 2d67 6574 2d65 7665 6e74 2d70 726f 7065 -get-event-prope │ │ │ -0000c320: 7274 7920 2222 2030 2072 6570 6c61 6365 rty "" 0 replace │ │ │ -0000c330: 2d72 6567 6578 702d 696e 2d73 7472 696e -regexp-in-strin │ │ │ -0000c340: 6720 2225 7322 2069 6361 6c65 6e64 6172 g "%s" icalendar │ │ │ -0000c350: 2d2d 636f 6e76 6572 742d 7374 7269 6e67 --convert-string │ │ │ -0000c360: 2d66 6f72 2d69 6d70 6f72 7420 745d 2031 -for-import t] 1 │ │ │ -0000c370: 3320 225c 6e5c 6e28 666e 2049 2922 5d20 3 "\n\n(fn I)"] │ │ │ -0000c380: 3132 2028 2324 202e 2034 3931 3334 295d 12 (#$ . 49134)] │ │ │ -0000c390: 290a 2340 3534 3120 436f 6e76 6572 7420 ).#@541 Convert │ │ │ -0000c3a0: 6943 616c 656e 6461 7220 6461 7461 2074 iCalendar data t │ │ │ -0000c3b0: 6f20 616e 2045 6d61 6373 2064 6961 7279 o an Emacs diary │ │ │ -0000c3c0: 2066 696c 652e 0a49 6d70 6f72 7420 5645 file..Import VE │ │ │ -0000c3d0: 5645 4e54 5320 6672 6f6d 2074 6865 2069 VENTS from the i │ │ │ -0000c3e0: 4361 6c65 6e64 6172 206f 626a 6563 7420 Calendar object │ │ │ -0000c3f0: 4943 414c 2d4c 4953 5420 616e 6420 7361 ICAL-LIST and sa │ │ │ -0000c400: 7665 7320 7468 656d 2074 6f20 610a 4449 ves them to a.DI │ │ │ -0000c410: 4152 592d 4649 4c45 4e41 4d45 2e20 2049 ARY-FILENAME. I │ │ │ -0000c420: 6620 444f 2d4e 4f54 2d41 534b 2069 7320 f DO-NOT-ASK is │ │ │ -0000c430: 6e69 6c20 7468 6520 7573 6572 2069 7320 nil the user is │ │ │ -0000c440: 6173 6b65 6420 666f 7220 6561 6368 2065 asked for each e │ │ │ -0000c450: 7665 6e74 0a77 6865 7468 6572 2074 6f20 vent.whether to │ │ │ -0000c460: 6163 7475 616c 6c79 2069 6d70 6f72 7420 actually import │ │ │ -0000c470: 6974 2e20 204e 4f4e 2d4d 4152 4b49 4e47 it. NON-MARKING │ │ │ -0000c480: 2064 6574 6572 6d69 6e65 7320 7768 6574 determines whet │ │ │ -0000c490: 6865 7220 6469 6172 790a 6576 656e 7473 her diary.events │ │ │ -0000c4a0: 2061 7265 2063 7265 6174 6564 2061 7320 are created as │ │ │ -0000c4b0: 6e6f 6e2d 6d61 726b 696e 672e 0a54 6869 non-marking..Thi │ │ │ -0000c4c0: 7320 6675 6e63 7469 6f6e 2061 7474 656d s function attem │ │ │ -0000c4d0: 7074 7320 746f 2072 6574 7572 6e20 7420 pts to return t │ │ │ -0000c4e0: 6966 2073 6f6d 6574 6869 6e67 2067 6f65 if something goe │ │ │ -0000c4f0: 7320 7772 6f6e 672e 2020 496e 2074 6869 s wrong. In thi │ │ │ -0000c500: 730a 6361 7365 2061 6e20 6572 726f 7220 s.case an error │ │ │ -0000c510: 7374 7269 6e67 2077 6869 6368 2064 6573 string which des │ │ │ -0000c520: 6372 6962 6573 2061 6c6c 2074 6865 2065 cribes all the e │ │ │ -0000c530: 7272 6f72 7320 616e 6420 7072 6f62 6c65 rrors and proble │ │ │ -0000c540: 6d73 2069 730a 7772 6974 7465 6e20 696e ms is.written in │ │ │ -0000c550: 746f 2074 6865 2062 7566 6665 7220 602a to the buffer `* │ │ │ -0000c560: 6963 616c 656e 6461 722d 6572 726f 7273 icalendar-errors │ │ │ -0000c570: 2a27 2e0a 0a28 666e 2049 4341 4c2d 4c49 *'...(fn ICAL-LI │ │ │ -0000c580: 5354 2044 4941 5259 2d46 494c 454e 414d ST DIARY-FILENAM │ │ │ -0000c590: 4520 266f 7074 696f 6e61 6c20 444f 2d4e E &optional DO-N │ │ │ -0000c5a0: 4f54 2d41 534b 204e 4f4e 2d4d 4152 4b49 OT-ASK NON-MARKI │ │ │ -0000c5b0: 4e47 291f 0a28 6465 6661 6c69 6173 2027 NG)..(defalias ' │ │ │ -0000c5c0: 6963 616c 656e 6461 722d 2d63 6f6e 7665 icalendar--conve │ │ │ -0000c5d0: 7274 2d69 6361 6c2d 746f 2d64 6961 7279 rt-ical-to-diary │ │ │ -0000c5e0: 2023 5b31 3032 3620 225c 3330 3004 215c #[1026 "\300.!\ │ │ │ -0000c5f0: 3330 315c 3330 325c 3330 335c 3330 3406 301\302\303\304. │ │ │ -0000c600: 0821 5c33 3033 5c32 3131 4306 065c 3230 .!\303\211C..\20 │ │ │ -0000c610: 335c 3333 3701 0606 405c 3236 3202 0606 3\337...@\262... │ │ │ -0000c620: 415c 3236 3207 5c33 3033 5c32 3632 055c A\262.\303\262.\ │ │ │ -0000c630: 3330 3531 5c33 3032 015c 3330 3602 5c33 3051\302.\306.\3 │ │ │ -0000c640: 3037 5c22 5c33 3130 5c33 3131 045c 3330 07\"\310\311.\30 │ │ │ -0000c650: 375c 2205 5c22 5c33 3132 025c 3330 3303 7\".\"\312.\303. │ │ │ -0000c660: 235c 3331 3301 2103 5c32 3035 4400 0347 #\313.!.\205D..G │ │ │ -0000c670: 5c33 3134 565c 3230 3544 005c 3331 3502 \314V\205D.\315. │ │ │ -0000c680: 215c 3330 3606 075c 3331 365c 225c 3331 !\306..\316\"\31 │ │ │ -0000c690: 305c 3331 3106 095c 3331 365c 2206 5c6e 0\311..\316\".\n │ │ │ -0000c6a0: 5c22 5c33 3132 025c 3330 3303 235c 3331 \"\312.\303.#\31 │ │ │ -0000c6b0: 3203 5c33 3137 0423 5c33 3033 5c32 3131 2.\317.#\303\211 │ │ │ -0000c6c0: 5c32 3131 5c33 3230 5c33 3036 060f 5c33 \211\320\306..\3 │ │ │ -0000c6d0: 3231 5c22 5c32 3036 6900 5c33 3232 215c 21\"\206i.\322!\ │ │ │ -0000c6e0: 3330 3606 0f5c 3332 335c 225c 3330 3606 306..\323\"\306. │ │ │ -0000c6f0: 105c 3332 345c 225c 3330 3606 115c 3332 .\324\"\306..\32 │ │ │ -0000c700: 355c 225c 3332 365c 3332 3706 0e06 0623 5\"\326\327....# │ │ │ -0000c710: 5c32 3130 060f 5c32 3033 5c32 3235 005c \210..\203\225.\ │ │ │ -0000c720: 3331 3106 125c 3330 375c 2241 405c 3333 311..\307\"A@\33 │ │ │ -0000c730: 305c 3233 305c 3230 335c 3232 3500 5c33 0\230\203\225.\3 │ │ │ -0000c740: 3033 5c32 3632 5c66 5c32 3131 5c32 3033 03\262\f\211\203 │ │ │ -0000c750: 5c33 3030 005c 3333 3106 0e5c 3333 3203 \300.\331..\332. │ │ │ -0000c760: 215c 225c 3333 3106 0f5c 3333 3204 5c33 !\"\331..\332.\3 │ │ │ -0000c770: 3032 5c22 5c22 065c 6e5c 3230 335c 3237 02\"\".\n\203\27 │ │ │ -0000c780: 3200 065c 6e02 3d5c 3230 345c 3237 3200 2..\n.=\204\272. │ │ │ -0000c790: 5c33 3333 5c33 3334 0607 5c22 5c32 3130 \333\334..\"\210 │ │ │ -0000c7a0: 015c 3236 320b 5c32 3632 095c 3231 3006 .\262.\262.\210. │ │ │ -0000c7b0: 085c 3230 335c 3331 3400 5c33 3133 0609 .\203\314.\313.. │ │ │ -0000c7c0: 215c 3230 325c 3331 3600 065c 665c 3236 !\202\316..\f\26 │ │ │ -0000c7d0: 3207 0607 5c32 3033 5c33 3334 005c 3331 2...\203\334.\31 │ │ │ -0000c7e0: 3306 0821 5c32 3032 5c33 3336 0006 5c66 3..!\202\336..\f │ │ │ -0000c7f0: 5c32 3632 0606 085c 3230 355c 3336 3600 \262...\205\366. │ │ │ -0000c800: 5c33 3131 0612 5c33 3136 5c22 4140 5c33 \311..\316\"A@\3 │ │ │ -0000c810: 3330 5c32 3330 3f5c 3230 355c 3336 3600 30\230?\205\366. │ │ │ -0000c820: 5c33 3135 0609 215c 3236 3205 5c33 3236 \315..!\262.\326 │ │ │ -0000c830: 5c33 3335 060e 0609 235c 3231 3002 5c32 \335....#\210.\2 │ │ │ -0000c840: 3033 1801 0610 5c33 3336 0613 0610 060f 03....\336...... │ │ │ -0000c850: 0609 245c 3234 305c 3231 305c 3330 325c ..$\240\210\302\ │ │ │ -0000c860: 3236 3215 5c32 3032 5c32 3035 0101 5c32 262.\202\205..\2 │ │ │ -0000c870: 3033 3b01 5c33 3236 5c33 3337 215c 3231 03;.\326\337!\21 │ │ │ -0000c880: 3006 105c 3330 315c 3234 305c 3231 305c 0..\301\240\210\ │ │ │ -0000c890: 3334 305c 3334 315c 3334 325c 3334 335c 340\341\342\343\ │ │ │ -0000c8a0: 3334 345c 3334 3506 1621 5c33 3436 5c22 344\345..!\346\" │ │ │ -0000c8b0: 5c33 3437 5c33 3530 255c 3335 3104 215c \347\350%\351.!\ │ │ │ -0000c8c0: 225c 3231 305c 3230 325c 3230 3501 065c "\210\202\205..\ │ │ │ -0000c8d0: 6606 075c 3233 305c 3230 3453 0106 105c f..\230\204S...\ │ │ │ -0000c8e0: 3335 3206 0e06 085c 225c 3234 305c 3231 352....\"\240\21 │ │ │ -0000c8f0: 305c 3330 325c 3236 3215 5c32 3032 5c32 0\302\262.\202\2 │ │ │ -0000c900: 3035 0106 0b5c 3230 3375 0104 5c32 3033 05...\203u..\203 │ │ │ -0000c910: 6301 060b 055c 3233 305c 3230 3475 0106 c....\230\204u.. │ │ │ -0000c920: 105c 3335 3306 0f06 0e06 0823 5c32 3430 .\353......#\240 │ │ │ -0000c930: 5c32 3130 5c33 3032 5c32 3632 155c 3230 \210\302\262.\20 │ │ │ -0000c940: 325c 3230 3501 5c33 3236 5c33 3534 215c 2\205.\326\354!\ │ │ │ -0000c950: 3231 3006 105c 3331 3306 0f5c 3335 355c 210..\313..\355\ │ │ │ -0000c960: 225c 3234 305c 3231 305c 3330 325c 3236 "\240\210\302\26 │ │ │ -0000c970: 3215 0614 5c32 3033 5c32 3537 0106 105c 2...\203\257...\ │ │ │ -0000c980: 3231 315c 3234 325c 3335 365c 3335 3706 211\242\356\357. │ │ │ -0000c990: 1521 515c 3234 305c 3231 3006 185c 3230 .!Q\240\210..\20 │ │ │ -0000c9a0: 335c 3233 3601 5c33 3033 5c32 3632 045c 3\236.\303\262.\ │ │ │ -0000c9b0: 3336 3006 115c 3234 3206 1b06 1a06 0724 360..\242......$ │ │ │ -0000c9c0: 5c32 3131 5c32 3632 1b5c 3230 325c 3237 \211\262.\202\27 │ │ │ -0000c9d0: 3401 5c33 3032 5c32 3632 145c 3336 315c 4.\302\262.\361\ │ │ │ -0000c9e0: 3336 3206 1706 1423 5c32 3131 5c32 3632 362....#\211\262 │ │ │ -0000c9f0: 175c 3236 365c 3232 3030 5c32 3032 5c33 .\266\2200\202\3 │ │ │ -0000ca00: 3333 015c 3333 335c 3336 3304 5c22 5c32 33.\333\363.\"\2 │ │ │ -0000ca10: 3130 5c33 3032 5c32 3632 055c 3336 315c 10\302\262.\361\ │ │ │ -0000ca20: 3336 3402 0609 0606 245c 3236 3207 5c33 364.....$\262.\3 │ │ │ -0000ca30: 3333 5c33 3635 0608 5c22 5c32 3632 015c 33\365..\"\262.\ │ │ │ -0000ca40: 3231 305c 3230 320d 0006 095c 3230 335c 210\202....\203\ │ │ │ -0000ca50: 3337 3001 5c33 3636 065c 6e21 5c32 3131 370.\366.\n!\211 │ │ │ -0000ca60: 5c32 3033 5c33 3637 0172 5c32 3131 715c \203\367.r\211q\ │ │ │ -0000ca70: 3231 3064 625c 3231 305c 3336 3763 5c32 210db\210\367c\2 │ │ │ -0000ca80: 3130 295c 3231 3003 5c32 3033 0902 725c 10)\210.\203..r\ │ │ │ -0000ca90: 3337 305c 3337 3121 715c 3231 305c 3337 370\371!q\210\37 │ │ │ -0000caa0: 3220 5c32 3130 0563 5c32 3130 295c 3333 2 \210.c\210)\33 │ │ │ -0000cab0: 335c 3337 3321 5c32 3130 035c 3230 3722 3\373!\210.\207" │ │ │ -0000cac0: 205b 6963 616c 656e 6461 722d 2d61 6c6c [icalendar--all │ │ │ -0000cad0: 2d65 7665 6e74 7320 2222 2074 206e 696c -events "" t nil │ │ │ -0000cae0: 2069 6361 6c65 6e64 6172 2d2d 636f 6e76 icalendar--conv │ │ │ -0000caf0: 6572 742d 616c 6c2d 7469 6d65 7a6f 6e65 ert-all-timezone │ │ │ -0000cb00: 7320 2865 7272 6f72 2920 6963 616c 656e s (error) icalen │ │ │ -0000cb10: 6461 722d 2d67 6574 2d65 7665 6e74 2d70 dar--get-event-p │ │ │ -0000cb20: 726f 7065 7274 7920 4454 5354 4152 5420 roperty DTSTART │ │ │ -0000cb30: 6963 616c 656e 6461 722d 2d66 696e 642d icalendar--find- │ │ │ -0000cb40: 7469 6d65 2d7a 6f6e 6520 6963 616c 656e time-zone icalen │ │ │ -0000cb50: 6461 722d 2d67 6574 2d65 7665 6e74 2d70 dar--get-event-p │ │ │ -0000cb60: 726f 7065 7274 792d 6174 7472 6962 7574 roperty-attribut │ │ │ -0000cb70: 6573 2069 6361 6c65 6e64 6172 2d2d 6465 es icalendar--de │ │ │ -0000cb80: 636f 6465 2d69 736f 6461 7465 7469 6d65 code-isodatetime │ │ │ -0000cb90: 2069 6361 6c65 6e64 6172 2d2d 6461 7465 icalendar--date │ │ │ -0000cba0: 7469 6d65 2d74 6f2d 6469 6172 792d 6461 time-to-diary-da │ │ │ -0000cbb0: 7465 2038 2069 6361 6c65 6e64 6172 2d2d te 8 icalendar-- │ │ │ -0000cbc0: 6461 7465 7469 6d65 2d74 6f2d 636f 6c6f datetime-to-colo │ │ │ -0000cbd0: 6e74 696d 6520 4454 454e 4420 2d31 2069 ntime DTEND -1 i │ │ │ -0000cbe0: 6361 6c65 6e64 6172 2d2d 636f 6e76 6572 calendar--conver │ │ │ -0000cbf0: 742d 7374 7269 6e67 2d66 6f72 2d69 6d70 t-string-for-imp │ │ │ -0000cc00: 6f72 7420 5355 4d4d 4152 5920 224e 6f20 ort SUMMARY "No │ │ │ -0000cc10: 7375 6d6d 6172 7922 2052 5255 4c45 2052 summary" RRULE R │ │ │ -0000cc20: 4441 5445 2044 5552 4154 494f 4e20 6963 DATE DURATION ic │ │ │ -0000cc30: 616c 656e 6461 722d 2d64 6d73 6720 2225 alendar--dmsg "% │ │ │ -0000cc40: 733a 2060 2573 2722 2022 4441 5445 2220 s: `%s'" "DATE" │ │ │ -0000cc50: 6963 616c 656e 6461 722d 2d61 6464 2d64 icalendar--add-d │ │ │ -0000cc60: 6563 6f64 6564 2d74 696d 6573 2069 6361 ecoded-times ica │ │ │ -0000cc70: 6c65 6e64 6172 2d2d 6465 636f 6465 2d69 lendar--decode-i │ │ │ -0000cc80: 736f 6475 7261 7469 6f6e 206d 6573 7361 soduration messa │ │ │ -0000cc90: 6765 2022 496e 636f 6e73 6973 7465 6e74 ge "Inconsistent │ │ │ -0000cca0: 2065 6e64 7469 6d65 2061 6e64 2064 7572 endtime and dur │ │ │ -0000ccb0: 6174 696f 6e20 666f 7220 2573 2220 2273 ation for %s" "s │ │ │ -0000ccc0: 7461 7274 2d64 3a20 2573 2c20 656e 642d tart-d: %s, end- │ │ │ -0000ccd0: 643a 2025 7322 2069 6361 6c65 6e64 6172 d: %s" icalendar │ │ │ -0000cce0: 2d2d 636f 6e76 6572 742d 7265 6375 7272 --convert-recurr │ │ │ -0000ccf0: 696e 672d 746f 2d64 6961 7279 2022 7264 ing-to-diary "rd │ │ │ -0000cd00: 6174 6520 6576 656e 7422 206d 6170 6320 ate event" mapc │ │ │ -0000cd10: 6d61 6b65 2d62 7974 652d 636f 6465 2032 make-byte-code 2 │ │ │ -0000cd20: 3537 2022 5c33 3030 5c32 3131 5c32 3432 57 "\300\211\242 │ │ │ -0000cd30: 5c33 3031 5c33 3032 2150 5c32 3430 5c32 \301\302!P\240\2 │ │ │ -0000cd40: 3037 2220 7663 6f6e 6361 7420 7665 6374 07" vconcat vect │ │ │ -0000cd50: 6f72 205b 666f 726d 6174 2022 2e2e 2e2e or [format ".... │ │ │ -0000cd60: 2e2e 225d 2035 2022 5c6e 5c6e 2866 6e20 .."] 5 "\n\n(fn │ │ │ -0000cd70: 4441 5445 5354 5249 4e47 2922 2069 6361 DATESTRING)" ica │ │ │ -0000cd80: 6c65 6e64 6172 2d2d 7370 6c69 742d 7661 lendar--split-va │ │ │ -0000cd90: 6c75 6520 6963 616c 656e 6461 722d 2d63 lue icalendar--c │ │ │ -0000cda0: 6f6e 7665 7274 2d6e 6f6e 2d72 6563 7572 onvert-non-recur │ │ │ -0000cdb0: 7269 6e67 2d61 6c6c 2d64 6179 2d74 6f2d ring-all-day-to- │ │ │ -0000cdc0: 6469 6172 7920 6963 616c 656e 6461 722d diary icalendar- │ │ │ -0000cdd0: 2d63 6f6e 7665 7274 2d6e 6f6e 2d72 6563 -convert-non-rec │ │ │ -0000cde0: 7572 7269 6e67 2d6e 6f74 2d61 6c6c 2d64 urring-not-all-d │ │ │ -0000cdf0: 6179 2d74 6f2d 6469 6172 7920 2261 6c6c ay-to-diary "all │ │ │ -0000ce00: 2064 6179 2065 7665 6e74 2220 222f 2220 day event" "/" │ │ │ -0000ce10: 2220 2220 6963 616c 656e 6461 722d 2d66 " " icalendar--f │ │ │ -0000ce20: 6f72 6d61 742d 6963 616c 2d65 7665 6e74 ormat-ical-event │ │ │ -0000ce30: 2069 6361 6c65 6e64 6172 2d2d 6164 642d icalendar--add- │ │ │ -0000ce40: 6469 6172 792d 656e 7472 7920 666f 726d diary-entry form │ │ │ -0000ce50: 6174 2022 2573 5c6e 4361 6e6e 6f74 2068 at "%s\nCannot h │ │ │ -0000ce60: 616e 646c 6520 7468 6973 2065 7665 6e74 andle this event │ │ │ -0000ce70: 3a25 7322 2022 4967 6e6f 7269 6e67 2065 :%s" "Ignoring e │ │ │ -0000ce80: 7665 6e74 205c 2225 735c 2222 2022 2573 vent \"%s\"" "%s │ │ │ -0000ce90: 5c6e 2573 5c6e 4361 6e6e 6f74 2068 616e \n%s\nCannot han │ │ │ -0000cea0: 646c 6520 7468 6973 2065 7665 6e74 3a20 dle this event: │ │ │ -0000ceb0: 2573 2220 2225 7322 2066 696e 642d 6275 %s" "%s" find-bu │ │ │ -0000cec0: 6666 6572 2d76 6973 6974 696e 6720 225c ffer-visiting "\ │ │ │ -0000ced0: 6e22 2067 6574 2d62 7566 6665 722d 6372 n" get-buffer-cr │ │ │ -0000cee0: 6561 7465 2022 2a69 6361 6c65 6e64 6172 eate "*icalendar │ │ │ -0000cef0: 2d65 7272 6f72 732a 2220 6572 6173 652d -errors*" erase- │ │ │ -0000cf00: 6275 6666 6572 2022 436f 6e76 6572 7469 buffer "Converti │ │ │ -0000cf10: 6e67 2069 4361 6c65 6e64 6172 2e2e 2e64 ng iCalendar...d │ │ │ -0000cf20: 6f6e 6522 5d20 3334 2028 2324 202e 2035 one"] 34 (#$ . 5 │ │ │ -0000cf30: 3030 3732 295d 290a 2340 3232 3920 436f 0072)]).#@229 Co │ │ │ -0000cf40: 6e76 6572 7420 7265 6375 7272 696e 6720 nvert recurring │ │ │ -0000cf50: 6943 616c 656e 6461 7220 6576 656e 7420 iCalendar event │ │ │ -0000cf60: 4520 746f 2064 6961 7279 2066 6f72 6d61 E to diary forma │ │ │ -0000cf70: 742e 0a0a 4454 5354 4152 542d 4445 4320 t...DTSTART-DEC │ │ │ -0000cf80: 6973 2074 6865 2044 5453 5441 5254 2070 is the DTSTART p │ │ │ -0000cf90: 726f 7065 7274 7920 6f66 2045 2e0a 5354 roperty of E..ST │ │ │ -0000cfa0: 4152 542d 5420 6973 2074 6865 2065 7665 ART-T is the eve │ │ │ -0000cfb0: 6e74 2773 2073 7461 7274 2074 696d 6520 nt's start time │ │ │ -0000cfc0: 696e 2064 6961 7279 2066 6f72 6d61 742e in diary format. │ │ │ -0000cfd0: 0a45 4e44 2d54 2069 7320 7468 6520 6576 .END-T is the ev │ │ │ -0000cfe0: 656e 7427 7320 656e 6420 7469 6d65 2069 ent's end time i │ │ │ -0000cff0: 6e20 6469 6172 7920 666f 726d 6174 2e0a n diary format.. │ │ │ -0000d000: 0a28 666e 2045 2044 5453 5441 5254 2d44 .(fn E DTSTART-D │ │ │ -0000d010: 4543 2053 5441 5254 2d54 2045 4e44 2d54 EC START-T END-T │ │ │ -0000d020: 291f 0a28 6465 6661 6c69 6173 2027 6963 )..(defalias 'ic │ │ │ -0000d030: 616c 656e 6461 722d 2d63 6f6e 7665 7274 alendar--convert │ │ │ -0000d040: 2d72 6563 7572 7269 6e67 2d74 6f2d 6469 -recurring-to-di │ │ │ -0000d050: 6172 7920 235b 3130 3238 2022 5c33 3031 ary #[1028 "\301 │ │ │ -0000d060: 5c33 3032 215c 3231 305c 3330 3304 5c33 \302!\210\303.\3 │ │ │ -0000d070: 3034 5c22 5c33 3035 0121 5c33 3036 5c33 04\"\305.!\306\3 │ │ │ -0000d080: 3037 025c 2241 405c 3330 365c 3331 3003 07.\"A@\306\310. │ │ │ -0000d090: 5c22 4140 5c33 3036 5c33 3131 045c 2241 \"A@\306\311.\"A │ │ │ -0000d0a0: 405c 3331 325c 3330 365c 3331 3306 065c @\312\306\313..\ │ │ │ -0000d0b0: 2241 405c 3230 3629 005c 3331 3421 5c33 "A@\206).\314!\3 │ │ │ -0000d0c0: 3135 0609 215c 3331 355c 3331 3605 2121 15..!\315\316.!! │ │ │ -0000d0d0: 5c33 3135 5c33 3136 0606 5c33 3137 5c22 \315\316..\317\" │ │ │ -0000d0e0: 215c 3332 3005 5c32 3033 3001 0606 5c32 !\320.\2030...\2 │ │ │ -0000d0f0: 3033 4b00 5c33 3231 5c33 3232 215c 3231 03K.\321\322!\21 │ │ │ -0000d100: 305c 3230 3230 015c 3332 3306 085c 3332 0\2020.\323..\32 │ │ │ -0000d110: 345c 3233 305c 3230 337f 005c 3332 3506 4\230\203..\325. │ │ │ -0000d120: 0e5c 3332 335c 3231 315c 3231 315c 3331 .\323\211\211\31 │ │ │ -0000d130: 3206 5c66 2106 0b5f 5c33 3233 5c32 3131 2.\f!.._\323\211 │ │ │ -0000d140: 5c32 3537 065c 225c 3236 3208 5c33 3235 \257.\"\262.\325 │ │ │ -0000d150: 060e 5c33 3233 5c32 3131 5c32 3131 5c33 ..\323\211\211\3 │ │ │ -0000d160: 3132 065c 6621 5306 0b5f 5c33 3233 5c32 12.\f!S.._\323\2 │ │ │ -0000d170: 3131 5c32 3537 065c 225c 3236 3201 5c32 11\257.\"\262.\2 │ │ │ -0000d180: 3032 2401 0608 5c33 3236 5c32 3330 5c32 02$...\326\230\2 │ │ │ -0000d190: 3033 5c32 3636 005c 3332 3506 0e5c 3332 03\266.\325..\32 │ │ │ -0000d1a0: 335c 3231 315c 3231 315c 3332 375c 3331 3\211\211\327\31 │ │ │ -0000d1b0: 3206 0d21 5c33 3330 060d 235c 3332 335c 2..!\330..#\323\ │ │ │ -0000d1c0: 3231 315c 3235 3706 5c22 5c32 3632 085c 211\257.\"\262.\ │ │ │ -0000d1d0: 3332 3506 0e5c 3332 335c 3231 315c 3231 325..\323\211\21 │ │ │ -0000d1e0: 315c 3332 375c 3331 3206 0d21 535c 3333 1\327\312..!S\33 │ │ │ -0000d1f0: 3006 0d23 5c33 3233 5c32 3131 5c32 3537 0..#\323\211\257 │ │ │ -0000d200: 065c 225c 3236 3201 5c32 3032 2401 0608 .\"\262.\202$... │ │ │ -0000d210: 5c33 3331 5c32 3330 5c32 3033 5c33 3532 \331\230\203\352 │ │ │ -0000d220: 005c 3332 3506 0e5c 3332 335c 3231 315c .\325..\323\211\ │ │ │ -0000d230: 3231 315c 3231 315c 3331 3206 0d21 5306 211\211\312..!S. │ │ │ -0000d240: 5c66 5f5c 3332 335c 3235 3706 5c22 5c32 \f_\323\257.\"\2 │ │ │ -0000d250: 3632 085c 3332 3506 0e5c 3332 335c 3231 62.\325..\323\21 │ │ │ -0000d260: 315c 3231 315c 3231 315c 3331 3206 0d21 1\211\211\312..! │ │ │ -0000d270: 5306 5c66 5f5c 3332 335c 3235 3706 5c22 S.\f_\323\257.\" │ │ │ -0000d280: 5c32 3632 015c 3230 3224 0106 085c 3333 \262.\202$...\33 │ │ │ -0000d290: 325c 3233 305c 3230 331e 015c 3332 3506 2\230\203..\325. │ │ │ -0000d2a0: 0e5c 3332 335c 3231 315c 3231 315c 3231 .\323\211\211\21 │ │ │ -0000d2b0: 315c 3231 315c 3331 3206 0e21 5306 0d5f 1\211\312..!S.._ │ │ │ -0000d2c0: 5c32 3537 065c 225c 3236 3208 5c33 3235 \257.\"\262.\325 │ │ │ -0000d2d0: 060e 5c33 3233 5c32 3131 5c32 3131 5c32 ..\323\211\211\2 │ │ │ -0000d2e0: 3131 5c32 3131 5c33 3132 060e 2153 060d 11\211\312..!S.. │ │ │ -0000d2f0: 5f5c 3235 3706 5c22 5c32 3632 015c 3230 _\257.\"\262.\20 │ │ │ -0000d300: 3224 015c 3332 315c 3333 3306 5c6e 5c22 2$.\321\333.\n\" │ │ │ -0000d310: 5c32 3130 5c33 3135 0608 215c 3236 3204 \210\315..!\262. │ │ │ -0000d320: 5c33 3135 0121 5c32 3632 035c 3231 3006 \315.!\262.\210. │ │ │ -0000d330: 075c 3332 365c 3233 305c 3230 3305 025c .\326\230\203..\ │ │ │ -0000d340: 3330 365c 3333 3406 5c6e 5c22 4140 5c33 306\334.\n\"A@\3 │ │ │ -0000d350: 3335 0121 5c32 3131 475c 3333 3656 5c32 35.!\211G\336V\2 │ │ │ -0000d360: 3035 4c01 5c33 3337 5c33 3430 025c 2206 05L.\337\340.\". │ │ │ -0000d370: 0e5c 3230 345c 3233 3001 5c33 3031 5c33 .\204\230.\301\3 │ │ │ -0000d380: 3431 215c 3231 3006 095c 3230 337d 015c 41!\210..\203}.\ │ │ │ -0000d390: 3333 375c 3334 3202 5c32 3036 6901 5c33 337\342.\206i.\3 │ │ │ -0000d3a0: 3337 5c33 3433 060b 5c33 3330 5f06 0b23 37\343..\330_..# │ │ │ -0000d3b0: 0609 065c 665c 3230 3375 0106 085c 3230 ...\f\203u...\20 │ │ │ -0000d3c0: 3277 0106 0924 5c32 3632 045c 3230 3200 2w...$\262.\202. │ │ │ -0000d3d0: 025c 3333 375c 3334 3402 5c32 3036 5c32 .\337\344.\206\2 │ │ │ -0000d3e0: 3034 015c 3332 3003 5c32 3033 5c32 3134 04.\320.\203\214 │ │ │ -0000d3f0: 015c 3333 365c 3230 325c 3232 3001 065c .\336\202\220..\ │ │ │ -0000d400: 6e5c 3333 305f 065c 6e24 5c32 3632 045c n\330_.\n$\262.\ │ │ │ -0000d410: 3230 3200 025c 3330 315c 3334 3521 5c32 202..\301\345!\2 │ │ │ -0000d420: 3130 0609 5c32 3033 5c33 3231 015c 3333 10..\203\321.\33 │ │ │ -0000d430: 375c 3334 3602 5c32 3036 5c32 3630 015c 7\346.\206\260.\ │ │ │ -0000d440: 3333 375c 3334 3306 0b5c 3333 305f 060b 337\343..\330_.. │ │ │ -0000d450: 2306 0906 0906 135c 3230 365c 3237 3201 #......\206\272. │ │ │ -0000d460: 5c33 3230 0613 5c32 3033 5c33 3033 015c \320..\203\303.\ │ │ │ -0000d470: 3334 375c 3230 325c 3330 3401 5c33 3230 347\202\304.\320 │ │ │ -0000d480: 0614 5c32 3036 5c33 3132 015c 3332 3026 ..\206\312.\320& │ │ │ -0000d490: 075c 3236 3204 5c32 3032 0002 5c33 3337 .\262.\202..\337 │ │ │ -0000d4a0: 5c33 3530 025c 3230 365c 3333 3001 5c33 \350.\206\330.\3 │ │ │ -0000d4b0: 3230 035c 3230 335c 3334 3001 5c33 3336 20.\203\340.\336 │ │ │ -0000d4c0: 5c32 3032 5c33 3434 0106 5c6e 5c33 3330 \202\344..\n\330 │ │ │ -0000d4d0: 5f06 5c6e 0613 5c32 3036 5c33 3534 015c _.\n..\206\354.\ │ │ │ -0000d4e0: 3332 3006 135c 3230 335c 3336 3501 5c33 320..\203\365.\3 │ │ │ -0000d4f0: 3437 5c32 3032 5c33 3636 015c 3332 3006 47\202\366.\320. │ │ │ -0000d500: 145c 3230 365c 3337 3401 5c33 3230 2607 .\206\374.\320&. │ │ │ -0000d510: 5c32 3632 045c 3236 3603 5c32 3032 5c32 \262.\266.\202\2 │ │ │ -0000d520: 3433 0306 075c 3333 325c 3233 305c 3230 43...\332\230\20 │ │ │ -0000d530: 335c 3230 3002 5c33 3031 5c33 3531 215c 3\200.\301\351!\ │ │ │ -0000d540: 3231 3006 065c 3230 3361 025c 3335 3206 210..\203a.\352. │ │ │ -0000d550: 0d38 5c33 3533 060e 385c 3335 3408 5c33 .8\353..8\354.\3 │ │ │ -0000d560: 3535 5c32 3637 5c32 3032 3c02 5c33 3337 55\267\202<.\337 │ │ │ -0000d570: 5c33 3536 0305 235c 3230 323d 025c 3333 \356..#\202=.\33 │ │ │ -0000d580: 375c 3335 3704 0423 5c32 3032 3d02 5c33 7\357..#\202=.\3 │ │ │ -0000d590: 3337 5c33 3537 0305 235c 3230 323d 025c 37\357..#\202=.\ │ │ │ -0000d5a0: 3336 305c 3336 3106 085c 3336 3206 095c 360\361..\362..\ │ │ │ -0000d5b0: 3336 3306 145c 3230 364a 025c 3332 3006 363..\206J.\320. │ │ │ -0000d5c0: 145c 3230 3353 025c 3334 375c 3230 3254 .\203S.\347\202T │ │ │ -0000d5d0: 025c 3332 3006 155c 3230 365a 025c 3332 .\320..\206Z.\32 │ │ │ -0000d5e0: 305c 3236 305c 6e5c 3236 365c 3230 335c 0\260\n\266\203\ │ │ │ -0000d5f0: 3230 325c 3234 3303 5c33 3337 5c33 3634 202\243.\337\364 │ │ │ -0000d600: 0506 0e5c 3230 366a 025c 3332 3006 0e5c ...\206j.\320..\ │ │ │ -0000d610: 3230 3373 025c 3334 375c 3230 3274 025c 203s.\347\202t.\ │ │ │ -0000d620: 3332 3006 0f5c 3230 367a 025c 3332 3025 320..\206z.\320% │ │ │ -0000d630: 5c32 3632 015c 3230 325c 3234 3303 0607 \262.\202\243... │ │ │ -0000d640: 5c33 3331 5c32 3330 5c32 3033 4303 5c33 \331\230\203C.\3 │ │ │ -0000d650: 3031 5c33 3635 215c 3231 305c 3330 365c 01\365!\210\306\ │ │ │ -0000d660: 3333 3406 5c6e 5c22 4140 5c32 3131 5c32 334.\n\"A@\211\2 │ │ │ -0000d670: 3035 5c32 3735 025c 3336 3620 5c33 3637 05\275.\366 \367 │ │ │ -0000d680: 5c33 3233 5c33 3730 5c33 3731 5c33 3732 \323\370\371\372 │ │ │ -0000d690: 0521 5c33 3733 5c22 5c33 3532 245c 3231 .!\373\"\352$\21 │ │ │ -0000d6a0: 365c 3337 345c 3337 3503 5c22 5c32 3035 6\374\375.\"\205 │ │ │ -0000d6b0: 5c32 3732 025c 3337 3602 5c33 3336 5c32 \272.\376.\336\2 │ │ │ -0000d6c0: 3234 5c33 3336 5c32 3235 235c 3337 3603 24\336\225#\376. │ │ │ -0000d6d0: 5c33 3737 5c32 3234 5c33 3737 5c32 3235 \377\224\377\225 │ │ │ -0000d6e0: 2342 295c 3236 3201 5c32 3131 5c32 3033 #B)\262.\211\203 │ │ │ -0000d6f0: 5c33 3235 025c 3231 3140 5c32 3031 4000 \325.\211@\201@. │ │ │ -0000d700: 0241 215c 3333 375c 3230 3141 0002 0423 .A!\337\201A...# │ │ │ -0000d710: 5c32 3636 5c32 3032 5c32 3032 0403 5c33 \266\202\202..\3 │ │ │ -0000d720: 3337 5c32 3031 4200 5c33 3532 0611 3808 37\201B.\352..8. │ │ │ -0000d730: 5c32 3031 4300 5c32 3637 5c32 3032 0003 \201C.\267\202.. │ │ │ -0000d740: 5c33 3337 5c32 3031 4400 025c 225c 3230 \337\201D..\"\20 │ │ │ -0000d750: 3201 035c 3333 375c 3230 3145 0002 5c22 2..\337\201E..\" │ │ │ -0000d760: 5c32 3032 0103 5c33 3337 5c32 3031 4600 \202..\337\201F. │ │ │ -0000d770: 025c 225c 3230 3201 035c 3336 305c 3236 .\"\202..\360\26 │ │ │ -0000d780: 3201 5c22 5c33 3337 5c32 3031 4700 0206 2.\"\337\201G... │ │ │ -0000d790: 0906 0d5c 3230 3315 0306 095c 3230 3226 ...\203....\202& │ │ │ -0000d7a0: 0308 5c32 3031 4800 3d5c 3230 3323 035c ..\201H.=\203#.\ │ │ │ -0000d7b0: 3230 3149 005c 3230 3226 035c 3230 314a 201I.\202&.\201J │ │ │ -0000d7c0: 0006 135c 3230 362c 035c 3332 3006 135c ...\206,.\320..\ │ │ │ -0000d7d0: 3230 3335 035c 3334 375c 3230 3236 035c 2035.\347\2026.\ │ │ │ -0000d7e0: 3332 3006 145c 3230 363c 035c 3332 3026 320..\206<.\320& │ │ │ -0000d7f0: 075c 3236 365c 3230 345c 3230 325c 3234 .\266\204\202\24 │ │ │ -0000d800: 3303 0607 5c33 3234 5c32 3330 5c32 3033 3...\324\230\203 │ │ │ -0000d810: 5c32 3433 0306 065c 3230 335c 3230 3103 \243...\203\201. │ │ │ -0000d820: 5c33 3337 5c32 3031 4b00 0606 0606 5c32 \337\201K.....\2 │ │ │ -0000d830: 3131 065c 6e5c 3230 3362 0306 065c 3230 11.\n\203b...\20 │ │ │ -0000d840: 3264 0306 0706 115c 3230 366a 035c 3332 2d.....\206j.\32 │ │ │ -0000d850: 3006 115c 3230 3373 035c 3334 375c 3230 0..\203s.\347\20 │ │ │ -0000d860: 3274 035c 3332 3006 125c 3230 367a 035c 2t.\320..\206z.\ │ │ │ -0000d870: 3332 3026 085c 3236 3201 5c32 3032 5c32 320&.\262.\202\2 │ │ │ -0000d880: 3433 035c 3333 375c 3230 314c 0006 0606 43.\337\201L.... │ │ │ -0000d890: 0606 0f5c 3230 365c 3231 3703 5c33 3230 ...\206\217.\320 │ │ │ -0000d8a0: 060f 5c32 3033 5c32 3330 035c 3334 375c ..\203\230.\347\ │ │ │ -0000d8b0: 3230 325c 3233 3103 5c33 3230 0610 5c32 202\231.\320..\2 │ │ │ -0000d8c0: 3036 5c32 3337 035c 3332 3026 065c 3236 06\237.\320&.\26 │ │ │ -0000d8d0: 3201 5c32 3031 4d00 060e 5c32 3031 4e00 2.\201M...\201N. │ │ │ -0000d8e0: 5c22 5c32 3131 5c32 3033 5c33 3231 035c \"\211\203\321.\ │ │ │ -0000d8f0: 3331 3601 4021 5c33 3135 0121 5c32 3031 316.@!\315.!\201 │ │ │ -0000d900: 4f00 5c32 3031 5000 5c33 3337 5c32 3031 O.\201P.\337\201 │ │ │ -0000d910: 5100 045c 2206 0623 5c32 3632 045c 3236 Q..\"..#\262.\26 │ │ │ -0000d920: 3602 5c32 3131 415c 3236 3201 5c32 3032 6.\211A\262.\202 │ │ │ -0000d930: 5c32 3534 035c 3231 305c 3330 3306 0e5c \254.\210\303..\ │ │ │ -0000d940: 3230 3152 005c 225c 3230 335c 3335 3403 201R.\"\203\354. │ │ │ -0000d950: 5c32 3131 5c32 3031 5300 5c32 3031 4d00 \211\201S.\201M. │ │ │ -0000d960: 0610 5c32 3031 5200 5c22 515c 3236 3201 ..\201R.\"Q\262. │ │ │ -0000d970: 5c32 3037 2220 5b63 616c 656e 6461 722d \207" [calendar- │ │ │ -0000d980: 6461 7465 2d73 7479 6c65 2069 6361 6c65 date-style icale │ │ │ -0000d990: 6e64 6172 2d2d 646d 7367 2022 7265 6375 ndar--dmsg "recu │ │ │ -0000d9a0: 7272 696e 6720 6576 656e 7422 2069 6361 rring event" ica │ │ │ -0000d9b0: 6c65 6e64 6172 2d2d 6765 742d 6576 656e lendar--get-even │ │ │ -0000d9c0: 742d 7072 6f70 6572 7479 2052 5255 4c45 t-property RRULE │ │ │ -0000d9d0: 2069 6361 6c65 6e64 6172 2d2d 7370 6c69 icalendar--spli │ │ │ -0000d9e0: 742d 7661 6c75 6520 6173 736f 6320 4652 t-value assoc FR │ │ │ -0000d9f0: 4551 2055 4e54 494c 2043 4f55 4e54 2072 EQ UNTIL COUNT r │ │ │ -0000da00: 6561 6420 494e 5445 5256 414c 2022 3122 ead INTERVAL "1" │ │ │ -0000da10: 2069 6361 6c65 6e64 6172 2d2d 6461 7465 icalendar--date │ │ │ -0000da20: 7469 6d65 2d74 6f2d 6469 6172 792d 6461 time-to-diary-da │ │ │ -0000da30: 7465 2069 6361 6c65 6e64 6172 2d2d 6465 te icalendar--de │ │ │ -0000da40: 636f 6465 2d69 736f 6461 7465 7469 6d65 code-isodatetime │ │ │ -0000da50: 202d 3120 2222 206d 6573 7361 6765 2022 -1 "" message " │ │ │ -0000da60: 4d75 7374 206e 6f74 2068 6176 6520 554e Must not have UN │ │ │ -0000da70: 5449 4c20 616e 6420 434f 554e 5420 2d2d TIL and COUNT -- │ │ │ -0000da80: 2069 676e 6f72 696e 6720 434f 554e 5420 ignoring COUNT │ │ │ -0000da90: 656c 656d 656e 7421 2220 3020 2244 4149 element!" 0 "DAI │ │ │ -0000daa0: 4c59 2220 6963 616c 656e 6461 722d 2d61 LY" icalendar--a │ │ │ -0000dab0: 6464 2d64 6563 6f64 6564 2d74 696d 6573 dd-decoded-times │ │ │ -0000dac0: 2022 5745 454b 4c59 2220 2a20 3720 224d "WEEKLY" * 7 "M │ │ │ -0000dad0: 4f4e 5448 4c59 2220 2259 4541 524c 5922 ONTHLY" "YEARLY" │ │ │ -0000dae0: 2022 4361 6e6e 6f74 2068 616e 646c 6520 "Cannot handle │ │ │ -0000daf0: 434f 554e 5420 6174 7472 6962 7574 6520 COUNT attribute │ │ │ -0000db00: 666f 7220 6025 7327 2065 7665 6e74 732e for `%s' events. │ │ │ -0000db10: 2220 4259 4441 5920 6963 616c 656e 6461 " BYDAY icalenda │ │ │ -0000db20: 722d 2d67 6574 2d77 6565 6b64 6179 2d6e r--get-weekday-n │ │ │ -0000db30: 756d 6265 7273 2031 2066 6f72 6d61 7420 umbers 1 format │ │ │ -0000db40: 2228 6d65 6d71 2028 6361 6c65 6e64 6172 "(memq (calendar │ │ │ -0000db50: 2d64 6179 2d6f 662d 7765 656b 2064 6174 -day-of-week dat │ │ │ -0000db60: 6529 2027 2573 2920 2220 2277 6565 6b6c e) '%s) " "weekl │ │ │ -0000db70: 7920 616c 6c2d 6461 7922 2022 2525 2525 y all-day" "%%%% │ │ │ -0000db80: 2861 6e64 2025 7328 6469 6172 792d 626c (and %s(diary-bl │ │ │ -0000db90: 6f63 6b20 2573 2025 7329 2922 2022 2864 ock %s %s))" "(d │ │ │ -0000dba0: 6961 7279 2d63 7963 6c69 6320 2564 2025 iary-cyclic %d % │ │ │ -0000dbb0: 7329 2022 2022 2525 2525 2861 6e64 2025 s) " "%%%%(and % │ │ │ -0000dbc0: 7328 6469 6172 792d 6379 636c 6963 2025 s(diary-cyclic % │ │ │ -0000dbd0: 6420 2573 2929 2220 2277 6565 6b6c 7920 d %s))" "weekly │ │ │ -0000dbe0: 6e6f 742d 616c 6c2d 6461 7922 2022 2525 not-all-day" "%% │ │ │ -0000dbf0: 2525 2861 6e64 2025 7328 6469 6172 792d %%(and %s(diary- │ │ │ -0000dc00: 626c 6f63 6b20 2573 2025 7329 2920 2573 block %s %s)) %s │ │ │ -0000dc10: 2573 2573 2220 222d 2220 2225 2525 2528 %s%s" "-" "%%%%( │ │ │ -0000dc20: 616e 6420 2573 2864 6961 7279 2d63 7963 and %s(diary-cyc │ │ │ -0000dc30: 6c69 6320 2564 2025 7329 2920 2573 2573 lic %d %s)) %s%s │ │ │ -0000dc40: 2573 2220 2279 6561 726c 7922 2033 2034 %s" "yearly" 3 4 │ │ │ -0000dc50: 2022 2525 2861 6e64 2028 6469 6172 792d "%%(and (diary- │ │ │ -0000dc60: 6461 7465 2022 2023 7328 6861 7368 2d74 date " #s(hash-t │ │ │ -0000dc70: 6162 6c65 2073 697a 6520 3320 7465 7374 able size 3 test │ │ │ -0000dc80: 2065 7120 7265 6861 7368 2d73 697a 6520 eq rehash-size │ │ │ -0000dc90: 312e 3520 7265 6861 7368 2d74 6872 6573 1.5 rehash-thres │ │ │ -0000dca0: 686f 6c64 2030 2e38 3132 3520 7075 7265 hold 0.8125 pure │ │ │ -0000dcb0: 636f 7079 2074 2064 6174 6120 2869 736f copy t data (iso │ │ │ -0000dcc0: 2035 3438 2065 7572 6f70 6561 6e20 3535 548 european 55 │ │ │ -0000dcd0: 3620 616d 6572 6963 616e 2035 3634 2929 6 american 564)) │ │ │ -0000dce0: 2022 7420 2564 2025 6422 2022 2564 2025 "t %d %d" "%d % │ │ │ -0000dcf0: 6420 7422 206e 696c 2022 2920 2864 6961 d t" nil ") (dia │ │ │ -0000dd00: 7279 2d62 6c6f 636b 2022 2022 2022 2022 ry-block " " " " │ │ │ -0000dd10: 2929 2022 2022 2525 2525 2861 6e64 2028 )) " "%%%%(and ( │ │ │ -0000dd20: 6469 6172 792d 616e 6e69 7665 7273 6172 diary-anniversar │ │ │ -0000dd30: 7920 2573 2929 2025 7325 7325 7322 2022 y %s)) %s%s%s" " │ │ │ -0000dd40: 6d6f 6e74 686c 7922 206d 6174 6368 2d64 monthly" match-d │ │ │ -0000dd50: 6174 6120 6d61 6b65 2d62 7974 652d 636f ata make-byte-co │ │ │ -0000dd60: 6465 2022 5c33 3031 5c33 3030 5c33 3032 de "\301\300\302 │ │ │ -0000dd70: 5c22 5c32 3037 2220 7663 6f6e 6361 7420 \"\207" vconcat │ │ │ -0000dd80: 7665 6374 6f72 205b 7365 742d 6d61 7463 vector [set-matc │ │ │ -0000dd90: 682d 6461 7461 2065 7661 706f 7261 7465 h-data evaporate │ │ │ -0000dda0: 5d20 7374 7269 6e67 2d6d 6174 6368 2022 ] string-match " │ │ │ -0000ddb0: 5c5c 282d 3f5b 302d 395d 2b5c 5c29 5c5c \\(-?[0-9]+\\)\\ │ │ │ -0000ddc0: 285b 412d 5a5d 5b41 2d5a 5d5c 5c29 2220 ([A-Z][A-Z]\\)" │ │ │ -0000ddd0: 7375 6273 7472 696e 6720 3220 6963 616c substring 2 ical │ │ │ -0000dde0: 656e 6461 722d 2d67 6574 2d77 6565 6b64 endar--get-weekd │ │ │ -0000ddf0: 6179 2d6e 756d 6265 7220 2228 6469 6172 ay-number "(diar │ │ │ -0000de00: 792d 666c 6f61 7420 7420 2573 2025 7329 y-float t %s %s) │ │ │ -0000de10: 2220 2228 6469 6172 792d 6461 7465 2025 " "(diary-date % │ │ │ -0000de20: 7329 2220 2373 2868 6173 682d 7461 626c s)" #s(hash-tabl │ │ │ -0000de30: 6520 7369 7a65 2033 2074 6573 7420 6571 e size 3 test eq │ │ │ -0000de40: 2072 6568 6173 682d 7369 7a65 2031 2e35 rehash-size 1.5 │ │ │ -0000de50: 2072 6568 6173 682d 7468 7265 7368 6f6c rehash-threshol │ │ │ -0000de60: 6420 302e 3831 3235 2070 7572 6563 6f70 d 0.8125 purecop │ │ │ -0000de70: 7920 7420 6461 7461 2028 6973 6f20 3734 y t data (iso 74 │ │ │ -0000de80: 3120 6575 726f 7065 616e 2037 3530 2061 1 european 750 a │ │ │ -0000de90: 6d65 7269 6361 6e20 3735 3929 2920 2274 merican 759)) "t │ │ │ -0000dea0: 2074 2025 6422 2022 2564 2074 2074 2220 t %d" "%d t t" │ │ │ -0000deb0: 2274 2025 6420 7422 2022 2525 2525 2861 "t %d t" "%%%%(a │ │ │ -0000dec0: 6e64 2025 7320 2864 6961 7279 2d62 6c6f nd %s (diary-blo │ │ │ -0000ded0: 636b 2025 7320 2573 2929 2025 7325 7325 ck %s %s)) %s%s% │ │ │ -0000dee0: 7322 2069 736f 2022 3939 3939 2031 2031 s" iso "9999 1 1 │ │ │ -0000def0: 2220 2231 2031 2039 3939 3922 2022 2525 " "1 1 9999" "%% │ │ │ -0000df00: 2525 2861 6e64 2028 6469 6172 792d 6379 %%(and (diary-cy │ │ │ -0000df10: 636c 6963 2025 7320 2573 2920 2864 6961 clic %s %s) (dia │ │ │ -0000df20: 7279 2d62 6c6f 636b 2025 7320 2573 2929 ry-block %s %s)) │ │ │ -0000df30: 2025 7325 7325 7322 2022 2525 2525 2861 %s%s%s" "%%%%(a │ │ │ -0000df40: 6e64 2028 6469 6172 792d 6379 636c 6963 nd (diary-cyclic │ │ │ -0000df50: 2025 7320 2573 2929 2025 7325 7325 7322 %s %s)) %s%s%s" │ │ │ -0000df60: 2069 6361 6c65 6e64 6172 2d2d 6765 742d icalendar--get- │ │ │ -0000df70: 6576 656e 742d 7072 6f70 6572 7469 6573 event-properties │ │ │ -0000df80: 2045 5844 4154 4520 7265 706c 6163 652d EXDATE replace- │ │ │ -0000df90: 7265 6765 7870 2d69 6e2d 7374 7269 6e67 regexp-in-string │ │ │ -0000dfa0: 2022 5e25 2528 5c5c 2861 6e64 205c 5c29 "^%%(\\(and \\) │ │ │ -0000dfb0: 3f22 2022 2525 2525 2861 6e64 2028 6e6f ?" "%%%%(and (no │ │ │ -0000dfc0: 7420 2864 6961 7279 2d64 6174 6520 2573 t (diary-date %s │ │ │ -0000dfd0: 2929 2022 2045 5852 554c 4520 225c 6e20 )) " EXRULE "\n │ │ │ -0000dfe0: 4578 6365 7074 696f 6e20 7275 6c65 733a Exception rules: │ │ │ -0000dff0: 2022 5d20 3236 2028 2324 202e 2035 3330 "] 26 (#$ . 530 │ │ │ -0000e000: 3534 295d 290a 2340 3139 3620 436f 6e76 54)]).#@196 Conv │ │ │ -0000e010: 6572 7420 6e6f 6e2d 7265 6375 7272 696e ert non-recurrin │ │ │ -0000e020: 6720 6943 616c 656e 6461 7220 4556 454e g iCalendar EVEN │ │ │ -0000e030: 5420 746f 2064 6961 7279 2066 6f72 6d61 T to diary forma │ │ │ -0000e040: 742e 0a0a 4454 5354 4152 5420 6973 2074 t...DTSTART is t │ │ │ -0000e050: 6865 2064 6563 6f64 6564 2044 5453 5441 he decoded DTSTA │ │ │ -0000e060: 5254 2070 726f 7065 7274 7920 6f66 2045 RT property of E │ │ │ -0000e070: 2e0a 4172 6775 6d65 6e74 2053 5441 5254 ..Argument START │ │ │ -0000e080: 2d44 2067 6976 6573 2074 6865 2066 6972 -D gives the fir │ │ │ -0000e090: 7374 2064 6179 2e0a 4172 6775 6d65 6e74 st day..Argument │ │ │ -0000e0a0: 2045 4e44 2d44 2067 6976 6573 2074 6865 END-D gives the │ │ │ -0000e0b0: 206c 6173 7420 6461 792e 0a0a 2866 6e20 last day...(fn │ │ │ -0000e0c0: 5354 4152 542d 4420 454e 442d 4429 1f0a START-D END-D).. │ │ │ -0000e0d0: 2864 6566 616c 6961 7320 2769 6361 6c65 (defalias 'icale │ │ │ -0000e0e0: 6e64 6172 2d2d 636f 6e76 6572 742d 6e6f ndar--convert-no │ │ │ -0000e0f0: 6e2d 7265 6375 7272 696e 672d 616c 6c2d n-recurring-all- │ │ │ -0000e100: 6461 792d 746f 2d64 6961 7279 2023 5b35 day-to-diary #[5 │ │ │ -0000e110: 3134 2022 5c33 3030 5c33 3031 215c 3231 14 "\300\301!\21 │ │ │ -0000e120: 305c 3330 325c 3330 3303 0323 5c32 3037 0\302\303..#\207 │ │ │ -0000e130: 2220 5b69 6361 6c65 6e64 6172 2d2d 646d " [icalendar--dm │ │ │ -0000e140: 7367 2022 6e6f 6e2d 7265 6375 7272 696e sg "non-recurrin │ │ │ -0000e150: 6720 616c 6c2d 6461 7920 6576 656e 7422 g all-day event" │ │ │ -0000e160: 2066 6f72 6d61 7420 2225 2525 2528 616e format "%%%%(an │ │ │ -0000e170: 6420 2864 6961 7279 2d62 6c6f 636b 2025 d (diary-block % │ │ │ -0000e180: 7320 2573 2929 225d 2036 2028 2324 202e s %s))"] 6 (#$ . │ │ │ -0000e190: 2035 3733 3536 295d 290a 2340 3233 3320 57356)]).#@233 │ │ │ -0000e1a0: 436f 6e76 6572 7420 7265 6375 7272 696e Convert recurrin │ │ │ -0000e1b0: 6720 6963 616c 656e 6461 7220 4556 454e g icalendar EVEN │ │ │ -0000e1c0: 5420 746f 2064 6961 7279 2066 6f72 6d61 T to diary forma │ │ │ -0000e1d0: 742e 0a0a 4454 5354 4152 542d 4445 4320 t...DTSTART-DEC │ │ │ -0000e1e0: 6973 2074 6865 2064 6563 6f64 6564 2044 is the decoded D │ │ │ -0000e1f0: 5453 5441 5254 2070 726f 7065 7274 7920 TSTART property │ │ │ -0000e200: 6f66 2045 2e0a 5354 4152 542d 5420 6973 of E..START-T is │ │ │ -0000e210: 2074 6865 2065 7665 6e74 2773 2073 7461 the event's sta │ │ │ -0000e220: 7274 2074 696d 6520 696e 2064 6961 7279 rt time in diary │ │ │ -0000e230: 2066 6f72 6d61 742e 0a45 4e44 2d54 2069 format..END-T i │ │ │ -0000e240: 7320 7468 6520 6576 656e 7427 7320 656e s the event's en │ │ │ -0000e250: 6420 7469 6d65 2069 6e20 6469 6172 7920 d time in diary │ │ │ -0000e260: 666f 726d 6174 2e0a 0a28 666e 2044 5453 format...(fn DTS │ │ │ -0000e270: 5441 5254 2d44 4543 2053 5441 5254 2d54 TART-DEC START-T │ │ │ -0000e280: 2045 4e44 2d54 291f 0a28 6465 6661 6c69 END-T)..(defali │ │ │ -0000e290: 6173 2027 6963 616c 656e 6461 722d 2d63 as 'icalendar--c │ │ │ -0000e2a0: 6f6e 7665 7274 2d6e 6f6e 2d72 6563 7572 onvert-non-recur │ │ │ -0000e2b0: 7269 6e67 2d6e 6f74 2d61 6c6c 2d64 6179 ring-not-all-day │ │ │ -0000e2c0: 2d74 6f2d 6469 6172 7920 235b 3737 3120 -to-diary #[771 │ │ │ -0000e2d0: 225c 3330 305c 3330 3121 5c32 3130 5c32 "\300\301!\210\2 │ │ │ -0000e2e0: 3131 5c32 3033 1200 5c33 3032 5c33 3033 11\203..\302\303 │ │ │ -0000e2f0: 5c33 3034 055c 3330 355c 2204 0424 5c32 \304.\305\"..$\2 │ │ │ -0000e300: 3037 5c33 3032 5c33 3036 5c33 3034 055c 07\302\306\304.\ │ │ │ -0000e310: 3330 355c 2204 235c 3230 3722 205b 6963 305\".#\207" [ic │ │ │ -0000e320: 616c 656e 6461 722d 2d64 6d73 6720 226e alendar--dmsg "n │ │ │ -0000e330: 6f74 2061 6c6c 2064 6179 2065 7665 6e74 ot all day event │ │ │ -0000e340: 2220 666f 726d 6174 2022 2573 2025 732d " format "%s %s- │ │ │ -0000e350: 2573 2220 6963 616c 656e 6461 722d 2d64 %s" icalendar--d │ │ │ -0000e360: 6174 6574 696d 652d 746f 2d64 6961 7279 atetime-to-diary │ │ │ -0000e370: 2d64 6174 6520 222f 2220 2225 7320 2573 -date "/" "%s %s │ │ │ -0000e380: 225d 2038 2028 2324 202e 2035 3737 3630 "] 8 (#$ . 57760 │ │ │ -0000e390: 295d 290a 2340 3338 3720 4164 6420 5354 )]).#@387 Add ST │ │ │ -0000e3a0: 5249 4e47 2074 6f20 7468 6520 6469 6172 RING to the diar │ │ │ -0000e3b0: 7920 6669 6c65 2044 4941 5259 2d46 494c y file DIARY-FIL │ │ │ -0000e3c0: 454e 414d 452e 0a53 5452 494e 4720 6d75 ENAME..STRING mu │ │ │ -0000e3d0: 7374 2062 6520 6120 7072 6f70 6572 6c79 st be a properly │ │ │ -0000e3e0: 2066 6f72 6d61 7474 6564 2076 616c 6964 formatted valid │ │ │ -0000e3f0: 2064 6961 7279 2065 6e74 7279 2e20 204e diary entry. N │ │ │ -0000e400: 4f4e 2d4d 4152 4b49 4e47 0a64 6574 6572 ON-MARKING.deter │ │ │ -0000e410: 6d69 6e65 7320 7768 6574 6865 7220 6469 mines whether di │ │ │ -0000e420: 6172 7920 6576 656e 7473 2061 7265 2063 ary events are c │ │ │ -0000e430: 7265 6174 6564 2061 7320 6e6f 6e2d 6d61 reated as non-ma │ │ │ -0000e440: 726b 696e 672e 2020 4966 0a53 554d 4d41 rking. If.SUMMA │ │ │ -0000e450: 5259 2069 7320 6e6f 7420 6e69 6c20 6974 RY is not nil it │ │ │ -0000e460: 206d 7573 7420 6265 2061 2073 7472 696e must be a strin │ │ │ -0000e470: 6720 7468 6174 2067 6976 6573 2074 6865 g that gives the │ │ │ -0000e480: 2073 756d 6d61 7279 206f 6620 7468 650a summary of the. │ │ │ -0000e490: 656e 7472 792e 2020 496e 2074 6869 7320 entry. In this │ │ │ -0000e4a0: 6361 7365 2074 6865 2075 7365 7220 7769 case the user wi │ │ │ -0000e4b0: 6c6c 2062 6520 6173 6b65 6420 7768 6574 ll be asked whet │ │ │ -0000e4c0: 6865 7220 6865 2077 616e 7473 2074 6f20 her he wants to │ │ │ -0000e4d0: 696e 7365 7274 0a74 6865 2065 6e74 7279 insert.the entry │ │ │ -0000e4e0: 2e0a 0a28 666e 2053 5452 494e 4720 4449 ...(fn STRING DI │ │ │ -0000e4f0: 4152 592d 4649 4c45 4e41 4d45 204e 4f4e ARY-FILENAME NON │ │ │ -0000e500: 2d4d 4152 4b49 4e47 2026 6f70 7469 6f6e -MARKING &option │ │ │ -0000e510: 616c 2053 554d 4d41 5259 291f 0a28 6465 al SUMMARY)..(de │ │ │ -0000e520: 6661 6c69 6173 2027 6963 616c 656e 6461 falias 'icalenda │ │ │ -0000e530: 722d 2d61 6464 2d64 6961 7279 2d65 6e74 r--add-diary-ent │ │ │ -0000e540: 7279 2023 5b31 3032 3720 225c 3231 315c ry #[1027 "\211\ │ │ │ -0000e550: 3230 330d 005c 3330 305c 3330 315c 3330 203..\300\301\30 │ │ │ -0000e560: 3203 5c22 215c 3230 3329 005c 3231 315c 2.\"!\203).\211\ │ │ │ -0000e570: 3230 3318 005c 3330 305c 3330 335c 3330 203..\300\303\30 │ │ │ -0000e580: 3421 215c 3236 3202 025c 3230 3421 005c 4!!\262..\204!.\ │ │ │ -0000e590: 3330 355c 3330 3621 5c32 3632 035c 3330 305\306!\262.\30 │ │ │ -0000e5a0: 3704 0305 5c33 3130 5c32 3131 255c 3231 7...\310\211%\21 │ │ │ -0000e5b0: 3002 5c32 3037 2220 5b79 2d6f 722d 6e2d 0.\207" [y-or-n- │ │ │ -0000e5c0: 7020 666f 726d 6174 2d6d 6573 7361 6765 p format-message │ │ │ -0000e5d0: 2022 4164 6420 6170 706f 696e 746d 656e "Add appointmen │ │ │ -0000e5e0: 7420 666f 7220 6025 7327 2074 6f20 6469 t for `%s' to di │ │ │ -0000e5f0: 6172 793f 2022 2066 6f72 6d61 7420 224d ary? " format "M │ │ │ -0000e600: 616b 6520 6170 706f 696e 746d 656e 7420 ake appointment │ │ │ -0000e610: 6e6f 6e2d 6d61 726b 696e 673f 2022 2072 non-marking? " r │ │ │ -0000e620: 6561 642d 6669 6c65 2d6e 616d 6520 2241 ead-file-name "A │ │ │ -0000e630: 6464 2061 7070 6f69 6e74 6d65 6e74 2074 dd appointment t │ │ │ -0000e640: 6f20 7468 6973 2064 6961 7279 2066 696c o this diary fil │ │ │ -0000e650: 653a 2022 2064 6961 7279 2d6d 616b 652d e: " diary-make- │ │ │ -0000e660: 656e 7472 7920 745d 2031 3020 2823 2420 entry t] 10 (#$ │ │ │ -0000e670: 2e20 3538 3236 3629 5d29 0a23 4036 3520 . 58266)]).#@65 │ │ │ -0000e680: 4578 616d 706c 6520 6675 6e63 7469 6f6e Example function │ │ │ -0000e690: 2066 6f72 2066 6f72 6d61 7474 696e 6720 for formatting │ │ │ -0000e6a0: 616e 2069 4361 6c65 6e64 6172 2045 5645 an iCalendar EVE │ │ │ -0000e6b0: 4e54 2e0a 0a28 666e 2045 5645 4e54 291f NT...(fn EVENT). │ │ │ -0000e6c0: 0a28 6465 6661 6c69 6173 2027 6963 616c .(defalias 'ical │ │ │ -0000e6d0: 656e 6461 722d 696d 706f 7274 2d66 6f72 endar-import-for │ │ │ -0000e6e0: 6d61 742d 7361 6d70 6c65 2023 5b32 3537 mat-sample #[257 │ │ │ -0000e6f0: 2022 5c33 3030 5c33 3031 5c33 3032 035c "\300\301\302.\ │ │ │ -0000e700: 3330 335c 225c 3230 365c 6e00 5c33 3034 303\"\206\n.\304 │ │ │ -0000e710: 5c33 3032 045c 3330 355c 225c 3230 3612 \302.\305\"\206. │ │ │ -0000e720: 005c 3330 345c 3330 3205 5c33 3036 5c22 .\304\302.\306\" │ │ │ -0000e730: 5c32 3036 1a00 5c33 3034 5c33 3032 0606 \206..\304\302.. │ │ │ -0000e740: 5c33 3037 5c22 5c32 3036 2300 5c33 3034 \307\"\206#.\304 │ │ │ -0000e750: 5c33 3032 0607 5c33 3130 5c22 5c32 3036 \302..\310\"\206 │ │ │ -0000e760: 2c00 5c33 3034 5c33 3032 0608 5c33 3131 ,.\304\302..\311 │ │ │ -0000e770: 5c22 5c32 3036 3500 5c33 3034 5c33 3032 \"\2065.\304\302 │ │ │ -0000e780: 0609 5c33 3132 5c22 5c32 3036 3e00 5c33 ..\312\"\206>.\3 │ │ │ -0000e790: 3034 2608 5c32 3037 2220 5b66 6f72 6d61 04&.\207" [forma │ │ │ -0000e7a0: 7420 2253 554d 4d41 5259 3d27 2573 2720 t "SUMMARY='%s' │ │ │ -0000e7b0: 4445 5343 5249 5054 494f 4e3d 2725 7327 DESCRIPTION='%s' │ │ │ -0000e7c0: 204c 4f43 4154 494f 4e3d 2725 7327 204f LOCATION='%s' O │ │ │ -0000e7d0: 5247 414e 495a 4552 3d27 2573 2720 5354 RGANIZER='%s' ST │ │ │ -0000e7e0: 4154 5553 3d27 2573 2720 5552 4c3d 2725 ATUS='%s' URL='% │ │ │ -0000e7f0: 7327 2043 4c41 5353 3d27 2573 2722 2069 s' CLASS='%s'" i │ │ │ -0000e800: 6361 6c65 6e64 6172 2d2d 6765 742d 6576 calendar--get-ev │ │ │ -0000e810: 656e 742d 7072 6f70 6572 7479 2053 554d ent-property SUM │ │ │ -0000e820: 4d41 5259 2022 2220 4445 5343 5249 5054 MARY "" DESCRIPT │ │ │ -0000e830: 494f 4e20 4c4f 4341 5449 4f4e 204f 5247 ION LOCATION ORG │ │ │ -0000e840: 414e 495a 4552 2053 5441 5455 5320 5552 ANIZER STATUS UR │ │ │ -0000e850: 4c20 434c 4153 535d 2031 3220 2823 2420 L CLASS] 12 (#$ │ │ │ -0000e860: 2e20 3539 3030 3829 5d29 0a28 7072 6f76 . 59008)]).(prov │ │ │ -0000e870: 6964 6520 2769 6361 6c65 6e64 6172 290a ide 'icalendar). │ │ │ +00003980: 3230 355c 3337 3101 5c33 3031 5c33 3032 205\371.\301\302 │ │ │ +00003990: 045c 3330 335c 3330 3423 215c 3330 315c .\303\304#!\301\ │ │ │ +000039a0: 3330 3205 5c33 3034 5c33 3035 2321 5c33 302.\304\305#!\3 │ │ │ +000039b0: 3031 5c33 3032 0606 5c33 3035 5c33 3036 01\302..\305\306 │ │ │ +000039c0: 2321 5c33 3033 5c32 3131 5c32 3131 0608 #!\303\211\211.. │ │ │ +000039d0: 475c 3330 3756 5c32 3033 3d00 5c33 3031 G\307V\203=.\301 │ │ │ +000039e0: 5c33 3032 065c 6e5c 3331 305c 3331 3123 \302.\n\310\311# │ │ │ +000039f0: 215c 3236 3203 5c33 3031 5c33 3032 065c !\262.\301\302.\ │ │ │ +00003a00: 6e5c 3331 315c 3331 3223 215c 3236 3202 n\311\312#!\262. │ │ │ +00003a10: 0608 475c 3331 3356 5c32 3033 4f00 5c33 ..G\313V\203O.\3 │ │ │ +00003a20: 3031 5c33 3032 065c 6e5c 3331 325c 3331 01\302.\n\312\31 │ │ │ +00003a30: 3423 215c 3236 3201 0608 475c 3331 3456 4#!\262...G\314V │ │ │ +00003a40: 5c32 3033 6400 5c33 3135 5c33 3136 065c \203d.\315\316.\ │ │ │ +00003a50: 6e5c 3331 3448 5c22 5c32 3033 6400 5c33 n\314H\"\203d.\3 │ │ │ +00003a60: 3137 5c32 3632 0706 075c 3230 335c 3332 17\262...\203\32 │ │ │ +00003a70: 3101 5c33 3230 0505 0608 455c 3231 315c 1.\320....E\211\ │ │ │ +00003a80: 3332 3101 385c 3236 3201 5c33 3232 015c 321.8\262.\322.\ │ │ │ +00003a90: 3330 3355 5c32 3033 5c32 3032 005c 3332 303U\203\202.\32 │ │ │ +00003aa0: 335c 3332 3421 5c32 3032 5c32 3734 0101 3\324!\202\274.. │ │ │ +00003ab0: 5c33 3033 565c 3230 335c 3336 3600 0153 \303V\203\366..S │ │ │ +00003ac0: 5c32 3632 015c 3332 3503 5c32 3131 5c32 \262.\325.\211\2 │ │ │ +00003ad0: 3131 405c 3236 3201 015c 3231 3141 405c 11@\262..\211A@\ │ │ │ +00003ae0: 3236 3201 025c 3332 3101 385c 3236 3201 262..\321.8\262. │ │ │ +00003af0: 015c 3332 3604 535f 5c5c 035c 3332 3156 .\326.S_\\.\321V │ │ │ +00003b00: 5c32 3033 5c33 3433 005c 3231 315c 3332 \203\343.\211\32 │ │ │ +00003b10: 375c 3330 3406 065f 5c5c 5c33 3330 5c32 7\304.._\\\330\2 │ │ │ +00003b20: 3435 5a5c 3236 3201 015c 3231 315c 3330 45Z\262..\211\30 │ │ │ +00003b30: 3357 5c32 3033 5c33 3034 005c 3333 3101 3W\203\304.\331. │ │ │ +00003b40: 2153 5c32 3632 015c 3231 315c 3330 345c !S\262.\211\304\ │ │ │ +00003b50: 3234 365c 3330 3355 5c32 3035 5c33 3332 246\303U\205\332 │ │ │ +00003b60: 005c 3231 315c 3333 325c 3234 365c 3330 .\211\332\246\30 │ │ │ +00003b70: 3355 3f5c 3230 365c 3333 3200 5c32 3131 3U?\206\332.\211 │ │ │ +00003b80: 5c33 3333 5c32 3436 5c33 3033 555c 3236 \333\246\303U\26 │ │ │ +00003b90: 3201 5c32 3033 5c33 3433 005c 3231 3154 2.\203\343.\211T │ │ │ +00003ba0: 5c32 3632 015c 3236 365c 3230 345c 3333 \262.\266\204\33 │ │ │ +00003bb0: 3403 5f03 5c33 3034 5c32 3435 045c 3333 4._.\304\245.\33 │ │ │ +00003bc0: 325c 3234 355b 055c 3333 335c 3234 3525 2\245[.\333\245% │ │ │ +00003bd0: 5c32 3032 5c32 3734 015c 3333 3102 5421 \202\274.\331.T! │ │ │ +00003be0: 5c32 3632 015c 3333 3503 5c32 3131 5c32 \262.\335.\211\2 │ │ │ +00003bf0: 3131 405c 3236 3201 015c 3231 3141 405c 11@\262..\211A@\ │ │ │ +00003c00: 3236 3201 025c 3332 3101 385c 3236 3201 262..\321.8\262. │ │ │ +00003c10: 015c 3332 3604 535f 5c5c 035c 3332 3156 .\326.S_\\.\321V │ │ │ +00003c20: 5c32 3033 5301 5c32 3131 5c33 3237 5c33 \203S.\211\327\3 │ │ │ +00003c30: 3034 0606 5f5c 5c5c 3333 305c 3234 355a 04.._\\\330\245Z │ │ │ +00003c40: 5c32 3632 0101 5c32 3131 5c33 3033 575c \262..\211\303W\ │ │ │ +00003c50: 3230 3334 015c 3333 3101 2153 5c32 3632 2034.\331.!S\262 │ │ │ +00003c60: 015c 3231 315c 3330 345c 3234 365c 3330 .\211\304\246\30 │ │ │ +00003c70: 3355 5c32 3035 4a01 5c32 3131 5c33 3332 3U\205J.\211\332 │ │ │ +00003c80: 5c32 3436 5c33 3033 553f 5c32 3036 4a01 \246\303U?\206J. │ │ │ +00003c90: 5c32 3131 5c33 3333 5c32 3436 5c33 3033 \211\333\246\303 │ │ │ +00003ca0: 555c 3236 3201 5c32 3033 5301 5c32 3131 U\262.\203S.\211 │ │ │ +00003cb0: 545c 3236 3201 5c32 3636 5c32 3034 5c33 T\262.\266\204\3 │ │ │ +00003cc0: 3334 035f 035c 3330 345c 3234 3504 5c33 34._.\304\245.\3 │ │ │ +00003cd0: 3332 5c32 3435 5b05 5c33 3333 5c32 3435 32\245[.\333\245 │ │ │ +00003ce0: 5c33 3336 5c32 3131 5c32 3131 405c 3236 \336\211\211@\26 │ │ │ +00003cf0: 3201 015c 3231 3141 405c 3236 3201 025c 2..\211A@\262..\ │ │ │ +00003d00: 3332 3101 385c 3236 3201 015c 3332 3604 321.8\262..\326. │ │ │ +00003d10: 535f 5c5c 035c 3332 3156 5c32 3033 5c32 S_\\.\321V\203\2 │ │ │ +00003d20: 3730 015c 3231 315c 3332 375c 3330 3406 70.\211\327\304. │ │ │ +00003d30: 065f 5c5c 5c33 3330 5c32 3435 5a5c 3236 ._\\\330\245Z\26 │ │ │ +00003d40: 3201 015c 3231 315c 3330 3357 5c32 3033 2..\211\303W\203 │ │ │ +00003d50: 5c32 3331 015c 3333 3101 2153 5c32 3632 \231.\331.!S\262 │ │ │ +00003d60: 015c 3231 315c 3330 345c 3234 365c 3330 .\211\304\246\30 │ │ │ +00003d70: 3355 5c32 3035 5c32 3537 015c 3231 315c 3U\205\257.\211\ │ │ │ +00003d80: 3333 325c 3234 365c 3330 3355 3f5c 3230 332\246\303U?\20 │ │ │ +00003d90: 365c 3235 3701 5c32 3131 5c33 3333 5c32 6\257.\211\333\2 │ │ │ +00003da0: 3436 5c33 3033 555c 3236 3201 5c32 3033 46\303U\262.\203 │ │ │ +00003db0: 5c32 3730 015c 3231 3154 5c32 3632 015c \270.\211T\262.\ │ │ │ +00003dc0: 3236 365c 3230 3426 065c 3236 365c 3230 266\204&.\266\20 │ │ │ +00003dd0: 3306 095c 5c21 5c32 3131 405c 3236 3206 3..\\!\211@\262. │ │ │ +00003de0: 5c32 3131 4140 5c32 3632 055c 3332 3101 \211A@\262.\321. │ │ │ +00003df0: 385c 3236 3207 5c32 3130 5c32 3131 0204 8\262.\210\211.. │ │ │ +00003e00: 0606 0608 065c 6e5c 3332 325c 3333 3706 .....\n\322\337. │ │ │ +00003e10: 0e5c 3235 3709 5c33 3430 315c 3335 3501 .\257.\3401\355. │ │ │ +00003e20: 5c33 3431 5c33 3432 0221 2130 5c32 3032 \341\342.!!0\202 │ │ │ +00003e30: 5c33 3635 015c 3231 305c 3334 335c 3334 \365.\210\343\34 │ │ │ +00003e40: 3406 0b5c 225c 3231 305c 3231 315c 3236 4..\"\210\211\26 │ │ │ +00003e50: 3201 5c32 3636 5c32 3036 5c32 3037 2220 2.\266\206\207" │ │ │ +00003e60: 5b69 6361 6c65 6e64 6172 2d2d 646d 7367 [icalendar--dmsg │ │ │ +00003e70: 2072 6561 6420 7375 6273 7472 696e 6720 read substring │ │ │ +00003e80: 3020 3420 3620 3820 3132 2039 2031 3120 0 4 6 8 12 9 11 │ │ │ +00003e90: 3133 2031 3420 3135 2063 6861 722d 6571 13 14 15 char-eq │ │ │ +00003ea0: 7561 6c20 3930 2074 2063 616c 656e 6461 ual 90 t calenda │ │ │ +00003eb0: 722d 6772 6567 6f72 6961 6e2d 6672 6f6d r-gregorian-from │ │ │ +00003ec0: 2d61 6273 6f6c 7574 6520 3220 6e69 6c20 -absolute 2 nil │ │ │ +00003ed0: 7573 6572 2d65 7272 6f72 2022 5468 6572 user-error "Ther │ │ │ +00003ee0: 6520 7761 7320 6e6f 2079 6561 7220 7a65 e was no year ze │ │ │ +00003ef0: 726f 2220 2b20 3331 2032 3320 3130 2061 ro" + 31 23 10 a │ │ │ +00003f00: 6273 2031 3030 2034 3030 2033 3635 202d bs 100 400 365 - │ │ │ +00003f10: 2028 3132 2033 3120 2d31 2920 2d31 2028 (12 31 -1) -1 ( │ │ │ +00003f20: 6572 726f 7229 2064 6563 6f64 652d 7469 error) decode-ti │ │ │ +00003f30: 6d65 2065 6e63 6f64 652d 7469 6d65 206d me encode-time m │ │ │ +00003f40: 6573 7361 6765 2022 4361 6e6e 6f74 2064 essage "Cannot d │ │ │ +00003f50: 6563 6f64 6520 5c22 2573 5c22 225d 2032 ecode \"%s\""] 2 │ │ │ +00003f60: 3820 2823 2420 2e20 3134 3137 3329 5d29 8 (#$ . 14173)]) │ │ │ +00003f70: 0a23 4034 3435 2043 6f6e 7665 7274 2049 .#@445 Convert I │ │ │ +00003f80: 534f 4455 5241 5449 4f4e 5354 5249 4e47 SODURATIONSTRING │ │ │ +00003f90: 2069 6e74 6f20 666f 726d 6174 2070 726f into format pro │ │ │ +00003fa0: 7669 6465 6420 6279 2060 6465 636f 6465 vided by `decode │ │ │ +00003fb0: 2d74 696d 6527 2e0a 436f 6e76 6572 7473 -time'..Converts │ │ │ +00003fc0: 2066 726f 6d20 4953 4f2d 3836 3031 2074 from ISO-8601 t │ │ │ +00003fd0: 6f20 456d 6163 7320 7265 7072 6573 656e o Emacs represen │ │ │ +00003fe0: 7461 7469 6f6e 2e20 2049 6620 4953 4f44 tation. If ISOD │ │ │ +00003ff0: 5552 4154 494f 4e53 5452 494e 470a 7370 URATIONSTRING.sp │ │ │ +00004000: 6563 6966 6965 7320 5554 4320 7469 6d65 ecifies UTC time │ │ │ +00004010: 2028 7472 6169 6c69 6e67 206c 6574 7465 (trailing lette │ │ │ +00004020: 7220 5a29 2074 6865 2064 6563 6f64 6564 r Z) the decoded │ │ │ +00004030: 2074 696d 6520 6973 2067 6976 656e 2069 time is given i │ │ │ +00004040: 6e0a 7468 6520 6c6f 6361 6c20 7469 6d65 n.the local time │ │ │ +00004050: 207a 6f6e 6521 0a0a 4f70 7469 6f6e 616c zone!..Optional │ │ │ +00004060: 2061 7267 756d 656e 7420 4455 5241 5449 argument DURATI │ │ │ +00004070: 4f4e 2d43 4f52 5245 4354 494f 4e20 7368 ON-CORRECTION sh │ │ │ +00004080: 6f72 7465 6e73 2072 6573 756c 7420 6279 ortens result by │ │ │ +00004090: 206f 6e65 2064 6179 2e0a 0a46 4958 4d45 one day...FIXME │ │ │ +000040a0: 3a20 545a 4944 2d61 7474 7269 6275 7465 : TZID-attribute │ │ │ +000040b0: 7320 6172 6520 6967 6e6f 7265 642e 2e2e s are ignored... │ │ │ +000040c0: 2e21 0a46 4958 4d45 3a20 6d75 6c74 6970 .!.FIXME: multip │ │ │ +000040d0: 6c65 2063 6f6d 6d61 2d73 6570 6172 6174 le comma-separat │ │ │ +000040e0: 6564 2076 616c 7565 7320 7368 6f75 6c64 ed values should │ │ │ +000040f0: 2062 6520 616c 6c6f 7765 6421 0a0a 2866 be allowed!..(f │ │ │ +00004100: 6e20 4953 4f44 5552 4154 494f 4e53 5452 n ISODURATIONSTR │ │ │ +00004110: 494e 4720 266f 7074 696f 6e61 6c20 4455 ING &optional DU │ │ │ +00004120: 5241 5449 4f4e 2d43 4f52 5245 4354 494f RATION-CORRECTIO │ │ │ +00004130: 4e29 1f0a 2864 6566 616c 6961 7320 2769 N)..(defalias 'i │ │ │ +00004140: 6361 6c65 6e64 6172 2d2d 6465 636f 6465 calendar--decode │ │ │ +00004150: 2d69 736f 6475 7261 7469 6f6e 2023 5b35 -isoduration #[5 │ │ │ +00004160: 3133 2022 015c 3230 355c 3235 3000 5c33 13 ".\205\250.\3 │ │ │ +00004170: 3030 205c 3330 315c 3330 325c 3330 335c 00 \301\302\303\ │ │ │ +00004180: 3330 345c 3330 3505 215c 3330 365c 225c 304\305.!\306\"\ │ │ │ +00004190: 3330 3724 5c32 3136 5c33 3130 5c33 3131 307$\216\310\311 │ │ │ +000041a0: 045c 225c 3231 305c 3330 325c 3231 315c .\"\210\302\211\ │ │ │ +000041b0: 3231 315c 3231 315c 3231 315c 3231 315c 211\211\211\211\ │ │ │ +000041c0: 3331 325c 3232 345c 3230 333a 005c 3331 312\224\203:.\31 │ │ │ +000041d0: 335c 3331 3406 5c6e 5c33 3037 5c32 3234 3\314.\n\307\224 │ │ │ +000041e0: 5c33 3037 5c32 3235 2321 5c32 3632 0306 \307\225#!\262.. │ │ │ +000041f0: 075c 3230 335c 3233 3300 0253 5c32 3632 .\203\233..S\262 │ │ │ +00004200: 035c 3230 325c 3233 3300 5c33 3135 5c32 .\202\233.\315\2 │ │ │ +00004210: 3234 5c32 3033 5c32 3130 005c 3331 365c 24\203\210.\316\ │ │ │ +00004220: 3232 345c 3230 3352 005c 3331 375c 3331 224\203R.\317\31 │ │ │ +00004230: 335c 3331 3406 0b5c 3332 305c 3232 345c 3\314..\320\224\ │ │ │ +00004240: 3332 305c 3232 3523 215f 5c32 3632 035c 320\225#!_\262.\ │ │ │ +00004250: 3331 375c 3232 345c 3230 3363 005c 3331 317\224\203c.\31 │ │ │ +00004260: 335c 3331 3406 5c6e 5c33 3231 5c32 3234 3\314.\n\321\224 │ │ │ +00004270: 5c33 3231 5c32 3235 2321 5c32 3632 045c \321\225#!\262.\ │ │ │ +00004280: 3332 325c 3232 345c 3230 3374 005c 3331 322\224\203t.\31 │ │ │ +00004290: 335c 3331 3406 5c6e 5c33 3233 5c32 3234 3\314.\n\323\224 │ │ │ +000042a0: 5c33 3233 5c32 3235 2321 5c32 3632 055c \323\225#!\262.\ │ │ │ +000042b0: 3332 345c 3232 345c 3230 335c 3233 3300 324\224\203\233. │ │ │ +000042c0: 5c33 3133 5c33 3134 065c 6e5c 3332 355c \313\314.\n\325\ │ │ │ +000042d0: 3232 345c 3332 355c 3232 3523 215c 3236 224\325\225#!\26 │ │ │ +000042e0: 3206 5c32 3032 5c32 3333 005c 3332 365c 2.\202\233.\326\ │ │ │ +000042f0: 3232 345c 3230 335c 3233 3300 5c33 3137 224\203\233.\317 │ │ │ +00004300: 5c33 3133 5c33 3134 060b 5c33 3237 5c32 \313\314..\327\2 │ │ │ +00004310: 3234 5c33 3237 5c32 3235 2321 5f5c 3236 24\327\225#!_\26 │ │ │ +00004320: 3203 0505 0505 0505 5c32 3537 065c 3236 2.......\257.\26 │ │ │ +00004330: 365c 3230 3629 5c32 3632 015c 3230 3722 6\206)\262.\207" │ │ │ +00004340: 205b 6d61 7463 682d 6461 7461 206d 616b [match-data mak │ │ │ +00004350: 652d 6279 7465 2d63 6f64 6520 3020 225c e-byte-code 0 "\ │ │ │ +00004360: 3330 315c 3330 305c 3330 325c 225c 3230 301\300\302\"\20 │ │ │ +00004370: 3722 2076 636f 6e63 6174 2076 6563 746f 7" vconcat vecto │ │ │ +00004380: 7220 5b73 6574 2d6d 6174 6368 2d64 6174 r [set-match-dat │ │ │ +00004390: 6120 6576 6170 6f72 6174 655d 2033 2073 a evaporate] 3 s │ │ │ +000043a0: 7472 696e 672d 6d61 7463 6820 225e 505b tring-match "^P[ │ │ │ +000043b0: 2b2d 5d3f 5c5c 285c 5c28 5c5c 285b 302d +-]?\\(\\(\\([0- │ │ │ +000043c0: 395d 2b5c 5c29 445c 5c29 5c5c 7c5c 5c28 9]+\\)D\\)\\|\\( │ │ │ +000043d0: 5c5c 285c 5c28 5b30 2d39 5d2b 5c5c 2944 \\(\\([0-9]+\\)D │ │ │ +000043e0: 5c5c 293f 545c 5c28 5c5c 285b 302d 395d \\)?T\\(\\([0-9] │ │ │ +000043f0: 2b5c 5c29 485c 5c29 3f5c 5c28 5c5c 285b +\\)H\\)?\\(\\([ │ │ │ +00004400: 302d 395d 2b5c 5c29 4d5c 5c29 3f5c 5c28 0-9]+\\)M\\)?\\( │ │ │ +00004410: 5c5c 285b 302d 395d 2b5c 5c29 535c 5c29 \\([0-9]+\\)S\\) │ │ │ +00004420: 3f5c 5c29 5c5c 7c5c 5c28 5c5c 285b 302d ?\\)\\|\\(\\([0- │ │ │ +00004430: 395d 2b5c 5c29 575c 5c29 5c5c 2924 2220 9]+\\)W\\)\\)$" │ │ │ +00004440: 3220 7265 6164 2073 7562 7374 7269 6e67 2 read substring │ │ │ +00004450: 2034 2035 2037 2036 2038 2039 2031 3020 4 5 7 6 8 9 10 │ │ │ +00004460: 3131 2031 3220 3133 2031 345d 2031 3520 11 12 13 14] 15 │ │ │ +00004470: 2823 2420 2e20 3136 3234 3729 5d29 0a23 (#$ . 16247)]).# │ │ │ +00004480: 4031 3433 2041 6464 2054 494d 4531 2074 @143 Add TIME1 t │ │ │ +00004490: 6f20 5449 4d45 322e 0a42 6f74 6820 7469 o TIME2..Both ti │ │ │ +000044a0: 6d65 7320 6d75 7374 2062 6520 6769 7665 mes must be give │ │ │ +000044b0: 6e20 696e 2064 6563 6f64 6564 2066 6f72 n in decoded for │ │ │ +000044c0: 6d2e 2020 4f6e 6520 6f66 2074 6865 7365 m. One of these │ │ │ +000044d0: 2074 696d 6573 206d 7573 7420 6265 0a76 times must be.v │ │ │ +000044e0: 616c 6964 2028 7965 6172 203e 2031 3930 alid (year > 190 │ │ │ +000044f0: 3020 6f72 2073 6f6d 6574 6869 6e67 292e 0 or something). │ │ │ +00004500: 0a0a 2866 6e20 5449 4d45 3120 5449 4d45 ..(fn TIME1 TIME │ │ │ +00004510: 3229 1f0a 2864 6566 616c 6961 7320 2769 2)..(defalias 'i │ │ │ +00004520: 6361 6c65 6e64 6172 2d2d 6164 642d 6465 calendar--add-de │ │ │ +00004530: 636f 6465 642d 7469 6d65 7320 235b 3531 coded-times #[51 │ │ │ +00004540: 3420 225c 3330 305c 3330 315c 3330 325c 4 "\300\301\302\ │ │ │ +00004550: 3330 3305 4005 405c 225c 3330 345c 2204 303.@.@\"\304\". │ │ │ +00004560: 4140 0441 405c 5c5c 3330 3506 0638 5c33 A@.A@\\\305..8\3 │ │ │ +00004570: 3035 0606 385c 5c5c 3330 3606 0738 5c33 05..8\\\306..8\3 │ │ │ +00004580: 3036 0607 385c 5c5c 3330 3706 0838 5c33 06..8\\\307..8\3 │ │ │ +00004590: 3037 0608 385c 5c5c 3331 3006 0938 5c33 07..8\\\310..8\3 │ │ │ +000045a0: 3130 0609 385c 5c5c 3331 315c 3231 3126 10..8\\\311\211& │ │ │ +000045b0: 0821 5c32 3037 2220 5b64 6563 6f64 652d .!\207" [decode- │ │ │ +000045c0: 7469 6d65 2065 6e63 6f64 652d 7469 6d65 time encode-time │ │ │ +000045d0: 2074 696d 652d 636f 6e76 6572 7420 7469 time-convert ti │ │ │ +000045e0: 6d65 2d61 6464 2069 6e74 6567 6572 2032 me-add integer 2 │ │ │ +000045f0: 2033 2034 2035 206e 696c 5d20 3132 2028 3 4 5 nil] 12 ( │ │ │ +00004600: 2324 202e 2031 3735 3431 295d 290a 2340 #$ . 17541)]).#@ │ │ │ +00004610: 3235 3220 436f 6e76 6572 7420 7468 6520 252 Convert the │ │ │ +00004620: 6465 636f 6465 6420 4441 5445 5449 4d45 decoded DATETIME │ │ │ +00004630: 2074 6f20 416d 6572 6963 616e 2d73 7479 to American-sty │ │ │ +00004640: 6c65 2066 6f72 6d61 742e 0a4f 7074 696f le format..Optio │ │ │ +00004650: 6e61 6c20 6172 6775 6d65 6e74 2053 4550 nal argument SEP │ │ │ +00004660: 4152 4154 4f52 2067 6976 6573 2074 6865 ARATOR gives the │ │ │ +00004670: 2073 6570 6172 6174 6f72 2062 6574 7765 separator betwe │ │ │ +00004680: 656e 206d 6f6e 7468 2c0a 6461 792c 2061 en month,.day, a │ │ │ +00004690: 6e64 2079 6561 722e 2020 4966 206e 696c nd year. If nil │ │ │ +000046a0: 2061 2062 6c61 6e6b 2063 6861 7261 6374 a blank charact │ │ │ +000046b0: 6572 2069 7320 7573 6564 2061 7320 7365 er is used as se │ │ │ +000046c0: 7061 7261 746f 722e 0a41 6d65 7269 6361 parator..America │ │ │ +000046d0: 6e20 666f 726d 6174 3a20 226d 6f6e 7468 n format: "month │ │ │ +000046e0: 2064 6179 2079 6561 7222 2e0a 0a28 666e day year"...(fn │ │ │ +000046f0: 2044 4154 4554 494d 4520 266f 7074 696f DATETIME &optio │ │ │ +00004700: 6e61 6c20 5345 5041 5241 544f 5229 1f0a nal SEPARATOR).. │ │ │ +00004710: 2864 6566 616c 6961 7320 2769 6361 6c65 (defalias 'icale │ │ │ +00004720: 6e64 6172 2d2d 6461 7465 7469 6d65 2d74 ndar--datetime-t │ │ │ +00004730: 6f2d 616d 6572 6963 616e 2d64 6174 6520 o-american-date │ │ │ +00004740: 235b 3531 3320 2201 5c32 3035 1d00 5c33 #[513 ".\205..\3 │ │ │ +00004750: 3030 5c33 3031 5c33 3032 0438 035c 3230 00\301\302.8.\20 │ │ │ +00004760: 360e 005c 3330 335c 3330 3406 0638 055c 6..\303\304..8.\ │ │ │ +00004770: 3230 3617 005c 3330 335c 3330 3506 0838 206..\303\305..8 │ │ │ +00004780: 2606 5c32 3037 2220 5b66 6f72 6d61 7420 &.\207" [format │ │ │ +00004790: 2225 6425 7325 6425 7325 6422 2034 2022 "%d%s%d%s%d" 4 " │ │ │ +000047a0: 2022 2033 2035 5d20 3130 2028 2324 202e " 3 5] 10 (#$ . │ │ │ +000047b0: 2031 3739 3430 295d 290a 2862 7974 652d 17940)]).(byte- │ │ │ +000047c0: 636f 6465 2022 5c33 3030 5c33 3031 5c33 code "\300\301\3 │ │ │ +000047d0: 3032 5c33 3033 235c 3231 305c 3330 345c 02\303#\210\304\ │ │ │ +000047e0: 3330 315c 3330 325c 3330 3523 5c32 3037 301\302\305#\207 │ │ │ +000047f0: 2220 5b64 6566 616c 6961 7320 6963 616c " [defalias ical │ │ │ +00004800: 656e 6461 722d 2d64 6174 6574 696d 652d endar--datetime- │ │ │ +00004810: 746f 2d6e 6f6e 6575 726f 7065 616e 2d64 to-noneuropean-d │ │ │ +00004820: 6174 6520 6963 616c 656e 6461 722d 2d64 ate icalendar--d │ │ │ +00004830: 6174 6574 696d 652d 746f 2d61 6d65 7269 atetime-to-ameri │ │ │ +00004840: 6361 6e2d 6461 7465 206e 696c 206d 616b can-date nil mak │ │ │ +00004850: 652d 6f62 736f 6c65 7465 2022 6963 616c e-obsolete "ical │ │ │ +00004860: 656e 6461 7220 302e 3139 225d 2034 290a endar 0.19"] 4). │ │ │ +00004870: 2340 3235 3220 436f 6e76 6572 7420 7468 #@252 Convert th │ │ │ +00004880: 6520 6465 636f 6465 6420 4441 5445 5449 e decoded DATETI │ │ │ +00004890: 4d45 2074 6f20 4575 726f 7065 616e 2066 ME to European f │ │ │ +000048a0: 6f72 6d61 742e 0a4f 7074 696f 6e61 6c20 ormat..Optional │ │ │ +000048b0: 6172 6775 6d65 6e74 2053 4550 4152 4154 argument SEPARAT │ │ │ +000048c0: 4f52 2067 6976 6573 2074 6865 2073 6570 OR gives the sep │ │ │ +000048d0: 6172 6174 6f72 2062 6574 7765 656e 206d arator between m │ │ │ +000048e0: 6f6e 7468 2c0a 6461 792c 2061 6e64 2079 onth,.day, and y │ │ │ +000048f0: 6561 722e 2020 4966 206e 696c 2061 2062 ear. If nil a b │ │ │ +00004900: 6c61 6e6b 2063 6861 7261 6374 6572 2069 lank character i │ │ │ +00004910: 7320 7573 6564 2061 7320 7365 7061 7261 s used as separa │ │ │ +00004920: 746f 722e 0a45 7572 6f70 6561 6e20 666f tor..European fo │ │ │ +00004930: 726d 6174 3a20 2864 6179 206d 6f6e 7468 rmat: (day month │ │ │ +00004940: 2079 6561 7229 2e0a 4649 584d 450a 0a28 year)..FIXME..( │ │ │ +00004950: 666e 2044 4154 4554 494d 4520 266f 7074 fn DATETIME &opt │ │ │ +00004960: 696f 6e61 6c20 5345 5041 5241 544f 5229 ional SEPARATOR) │ │ │ +00004970: 1f0a 2864 6566 616c 6961 7320 2769 6361 ..(defalias 'ica │ │ │ +00004980: 6c65 6e64 6172 2d2d 6461 7465 7469 6d65 lendar--datetime │ │ │ +00004990: 2d74 6f2d 6575 726f 7065 616e 2d64 6174 -to-european-dat │ │ │ +000049a0: 6520 235b 3531 3320 2201 5c32 3035 1d00 e #[513 ".\205.. │ │ │ +000049b0: 5c33 3030 5c33 3031 5c33 3032 0438 035c \300\301\302.8.\ │ │ │ +000049c0: 3230 360e 005c 3330 335c 3330 3406 0638 206..\303\304..8 │ │ │ +000049d0: 055c 3230 3617 005c 3330 335c 3330 3506 .\206..\303\305. │ │ │ +000049e0: 0838 2606 5c32 3037 2220 5b66 6f72 6d61 .8&.\207" [forma │ │ │ +000049f0: 7420 2225 6425 7325 6425 7325 6422 2033 t "%d%s%d%s%d" 3 │ │ │ +00004a00: 2022 2022 2034 2035 5d20 3130 2028 2324 " " 4 5] 10 (#$ │ │ │ +00004a10: 202e 2031 3835 3530 295d 290a 2340 3233 . 18550)]).#@23 │ │ │ +00004a20: 3620 436f 6e76 6572 7420 7468 6520 6465 6 Convert the de │ │ │ +00004a30: 636f 6465 6420 4441 5445 5449 4d45 2074 coded DATETIME t │ │ │ +00004a40: 6f20 4953 4f20 666f 726d 6174 2e0a 4f70 o ISO format..Op │ │ │ +00004a50: 7469 6f6e 616c 2061 7267 756d 656e 7420 tional argument │ │ │ +00004a60: 5345 5041 5241 544f 5220 6769 7665 7320 SEPARATOR gives │ │ │ +00004a70: 7468 6520 7365 7061 7261 746f 7220 6265 the separator be │ │ │ +00004a80: 7477 6565 6e20 6d6f 6e74 682c 0a64 6179 tween month,.day │ │ │ +00004a90: 2c20 616e 6420 7965 6172 2e20 2049 6620 , and year. If │ │ │ +00004aa0: 6e69 6c20 6120 626c 616e 6b20 6368 6172 nil a blank char │ │ │ +00004ab0: 6163 7465 7220 6973 2075 7365 6420 6173 acter is used as │ │ │ +00004ac0: 2073 6570 6172 6174 6f72 2e0a 4953 4f20 separator..ISO │ │ │ +00004ad0: 666f 726d 6174 3a20 2879 6561 7220 6d6f format: (year mo │ │ │ +00004ae0: 6e74 6820 6461 7929 2e0a 0a28 666e 2044 nth day)...(fn D │ │ │ +00004af0: 4154 4554 494d 4520 266f 7074 696f 6e61 ATETIME &optiona │ │ │ +00004b00: 6c20 5345 5041 5241 544f 5229 1f0a 2864 l SEPARATOR)..(d │ │ │ +00004b10: 6566 616c 6961 7320 2769 6361 6c65 6e64 efalias 'icalend │ │ │ +00004b20: 6172 2d2d 6461 7465 7469 6d65 2d74 6f2d ar--datetime-to- │ │ │ +00004b30: 6973 6f2d 6461 7465 2023 5b35 3133 2022 iso-date #[513 " │ │ │ +00004b40: 015c 3230 351d 005c 3330 305c 3330 315c .\205..\300\301\ │ │ │ +00004b50: 3330 3204 3803 5c32 3036 0e00 5c33 3033 302.8.\206..\303 │ │ │ +00004b60: 5c33 3034 0606 3805 5c32 3036 1700 5c33 \304..8.\206..\3 │ │ │ +00004b70: 3033 5c33 3035 0608 3826 065c 3230 3722 03\305..8&.\207" │ │ │ +00004b80: 205b 666f 726d 6174 2022 2564 2573 2564 [format "%d%s%d │ │ │ +00004b90: 2573 2564 2220 3520 2220 2220 3420 335d %s%d" 5 " " 4 3] │ │ │ +00004ba0: 2031 3020 2823 2420 2e20 3138 3937 3829 10 (#$ . 18978) │ │ │ +00004bb0: 5d29 0a23 4032 3839 2043 6f6e 7665 7274 ]).#@289 Convert │ │ │ +00004bc0: 2074 6865 2064 6563 6f64 6564 2044 4154 the decoded DAT │ │ │ +00004bd0: 4554 494d 4520 746f 2064 6961 7279 2066 ETIME to diary f │ │ │ +00004be0: 6f72 6d61 742e 0a4f 7074 696f 6e61 6c20 ormat..Optional │ │ │ +00004bf0: 6172 6775 6d65 6e74 2053 4550 4152 4154 argument SEPARAT │ │ │ +00004c00: 4f52 2067 6976 6573 2074 6865 2073 6570 OR gives the sep │ │ │ +00004c10: 6172 6174 6f72 2062 6574 7765 656e 206d arator between m │ │ │ +00004c20: 6f6e 7468 2c0a 6461 792c 2061 6e64 2079 onth,.day, and y │ │ │ +00004c30: 6561 722e 2020 4966 206e 696c 2061 2062 ear. If nil a b │ │ │ +00004c40: 6c61 6e6b 2063 6861 7261 6374 6572 2069 lank character i │ │ │ +00004c50: 7320 7573 6564 2061 7320 7365 7061 7261 s used as separa │ │ │ +00004c60: 746f 722e 0a43 616c 6c20 6963 616c 656e tor..Call icalen │ │ │ +00004c70: 6461 722d 2d64 6174 6574 696d 652d 746f dar--datetime-to │ │ │ +00004c80: 2d2a 2d64 6174 6520 6163 636f 7264 696e -*-date accordin │ │ │ +00004c90: 6720 746f 2074 6865 2063 7572 7265 6e74 g to the current │ │ │ +00004ca0: 0a63 616c 656e 6461 7220 6461 7465 2073 .calendar date s │ │ │ +00004cb0: 7479 6c65 2e0a 0a28 666e 2044 4154 4554 tyle...(fn DATET │ │ │ +00004cc0: 494d 4520 266f 7074 696f 6e61 6c20 5345 IME &optional SE │ │ │ +00004cd0: 5041 5241 544f 5229 1f0a 2864 6566 616c PARATOR)..(defal │ │ │ +00004ce0: 6961 7320 2769 6361 6c65 6e64 6172 2d2d ias 'icalendar-- │ │ │ +00004cf0: 6461 7465 7469 6d65 2d74 6f2d 6469 6172 datetime-to-diar │ │ │ +00004d00: 792d 6461 7465 2023 5b35 3133 2022 5c33 y-date #[513 "\3 │ │ │ +00004d10: 3031 5c33 3032 5c33 3033 085c 2221 0202 01\302\303.\"!.. │ │ │ +00004d20: 5c22 5c32 3037 2220 5b63 616c 656e 6461 \"\207" [calenda │ │ │ +00004d30: 722d 6461 7465 2d73 7479 6c65 2069 6e74 r-date-style int │ │ │ +00004d40: 6572 6e2d 736f 6674 2066 6f72 6d61 7420 ern-soft format │ │ │ +00004d50: 2269 6361 6c65 6e64 6172 2d2d 6461 7465 "icalendar--date │ │ │ +00004d60: 7469 6d65 2d74 6f2d 2573 2d64 6174 6522 time-to-%s-date" │ │ │ +00004d70: 5d20 3620 2823 2420 2e20 3139 3338 3529 ] 6 (#$ . 19385) │ │ │ +00004d80: 5d29 0a23 4031 3232 2045 7874 7261 6374 ]).#@122 Extract │ │ │ +00004d90: 2074 6865 2074 696d 6520 7061 7274 206f the time part o │ │ │ +00004da0: 6620 6120 6465 636f 6465 6420 4441 5445 f a decoded DATE │ │ │ +00004db0: 5449 4d45 2069 6e74 6f20 3234 2d68 6f75 TIME into 24-hou │ │ │ +00004dc0: 7220 666f 726d 6174 2e0a 4e6f 7465 2074 r format..Note t │ │ │ +00004dd0: 6861 7420 7468 6973 2073 696c 656e 746c hat this silentl │ │ │ +00004de0: 7920 6967 6e6f 7265 7320 7365 636f 6e64 y ignores second │ │ │ +00004df0: 732e 0a0a 2866 6e20 4441 5445 5449 4d45 s...(fn DATETIME │ │ │ +00004e00: 291f 0a28 6465 6661 6c69 6173 2027 6963 )..(defalias 'ic │ │ │ +00004e10: 616c 656e 6461 722d 2d64 6174 6574 696d alendar--datetim │ │ │ +00004e20: 652d 746f 2d63 6f6c 6f6e 7469 6d65 2023 e-to-colontime # │ │ │ +00004e30: 5b32 3537 2022 5c33 3030 5c33 3031 5c33 [257 "\300\301\3 │ │ │ +00004e40: 3032 0338 0341 4023 5c32 3037 2220 5b66 02.8.A@#\207" [f │ │ │ +00004e50: 6f72 6d61 7420 2225 3032 643a 2530 3264 ormat "%02d:%02d │ │ │ +00004e60: 2220 325d 2035 2028 2324 202e 2031 3938 " 2] 5 (#$ . 198 │ │ │ +00004e70: 3439 295d 290a 2340 3636 2052 6574 7572 49)]).#@66 Retur │ │ │ +00004e80: 6e20 7468 6520 6d6f 6e74 6820 6e75 6d62 n the month numb │ │ │ +00004e90: 6572 2066 6f72 2074 6865 2067 6976 656e er for the given │ │ │ +00004ea0: 204d 4f4e 5448 4e41 4d45 2e0a 0a28 666e MONTHNAME...(fn │ │ │ +00004eb0: 204d 4f4e 5448 4e41 4d45 291f 0a28 6465 MONTHNAME)..(de │ │ │ +00004ec0: 6661 6c69 6173 2027 6963 616c 656e 6461 falias 'icalenda │ │ │ +00004ed0: 722d 2d67 6574 2d6d 6f6e 7468 2d6e 756d r--get-month-num │ │ │ +00004ee0: 6265 7220 235b 3235 3720 225c 3330 3132 ber #[257 "\3012 │ │ │ +00004ef0: 1e00 5c33 3032 4301 5c32 3237 5c33 3033 ..\302C.\227\303 │ │ │ +00004f00: 5c33 3034 5c33 3035 5c33 3036 5c33 3037 \304\305\306\307 │ │ │ +00004f10: 5c33 3130 0607 0607 5c22 5c33 3131 5c22 \310....\"\311\" │ │ │ +00004f20: 5c33 3132 5c33 3133 2508 5c22 5c32 3636 \312\313%.\"\266 │ │ │ +00004f30: 035c 3331 3430 5c32 3037 2220 5b63 616c .\3140\207" [cal │ │ │ +00004f40: 656e 6461 722d 6d6f 6e74 682d 6e61 6d65 endar-month-name │ │ │ +00004f50: 2d61 7272 6179 2066 6f75 6e64 2031 206d -array found 1 m │ │ │ +00004f60: 6170 6320 6d61 6b65 2d62 7974 652d 636f apc make-byte-co │ │ │ +00004f70: 6465 2032 3537 2022 5c32 3131 5c32 3237 de 257 "\211\227 │ │ │ +00004f80: 5c32 3131 5c33 3031 5c32 3330 5c32 3034 \211\301\230\204 │ │ │ +00004f90: 1200 5c33 3032 015c 3330 335c 3330 3423 ..\302.\303\304# │ │ │ +00004fa0: 5c33 3031 5c32 3330 5c32 3033 1800 5c33 \301\230\203..\3 │ │ │ +00004fb0: 3035 5c33 3036 5c33 3030 5c32 3432 5c22 05\306\300\242\" │ │ │ +00004fc0: 5c32 3130 5c33 3030 5c32 3131 5c32 3432 \210\300\211\242 │ │ │ +00004fd0: 545c 3234 305c 3230 3722 2076 636f 6e63 T\240\207" vconc │ │ │ +00004fe0: 6174 2076 6563 746f 7220 5b73 7562 7374 at vector [subst │ │ │ +00004ff0: 7269 6e67 2030 2033 2074 6872 6f77 2066 ring 0 3 throw f │ │ │ +00005000: 6f75 6e64 5d20 3620 225c 6e5c 6e28 666e ound] 6 "\n\n(fn │ │ │ +00005010: 204d 4f4e 5448 2922 202d 315d 2031 3120 MONTH)" -1] 11 │ │ │ +00005020: 2823 2420 2e20 3230 3039 3129 5d29 0a23 (#$ . 20091)]).# │ │ │ +00005030: 4036 3220 5265 7475 726e 2074 6865 206e @62 Return the n │ │ │ +00005040: 756d 6265 7220 666f 7220 7468 6520 4142 umber for the AB │ │ │ +00005050: 4252 4556 5745 454b 4441 592e 0a0a 2866 BREVWEEKDAY...(f │ │ │ +00005060: 6e20 4142 4252 4556 5745 454b 4441 5929 n ABBREVWEEKDAY) │ │ │ +00005070: 1f0a 2864 6566 616c 6961 7320 2769 6361 ..(defalias 'ica │ │ │ +00005080: 6c65 6e64 6172 2d2d 6765 742d 7765 656b lendar--get-week │ │ │ +00005090: 6461 792d 6e75 6d62 6572 2023 5b32 3537 day-number #[257 │ │ │ +000050a0: 2022 5c32 3131 5c32 3033 5c22 005c 3330 "\211\203\".\30 │ │ │ +000050b0: 3132 2300 5c33 3032 4301 5c32 3237 5c33 12#.\302C.\227\3 │ │ │ +000050c0: 3033 5c33 3034 5c33 3035 5c33 3036 5c33 03\304\305\306\3 │ │ │ +000050d0: 3037 5c33 3130 0607 0607 5c22 5c33 3131 07\310....\"\311 │ │ │ +000050e0: 5c22 5c33 3132 5c33 3133 2508 5c22 5c32 \"\312\313%.\"\2 │ │ │ +000050f0: 3636 5c32 3032 305c 3230 375c 3331 345c 66\2020\207\314\ │ │ │ +00005100: 3230 3722 205b 6963 616c 656e 6461 722d 207" [icalendar- │ │ │ +00005110: 2d77 6565 6b64 6179 2d61 7272 6179 2066 -weekday-array f │ │ │ +00005120: 6f75 6e64 2030 206d 6170 6320 6d61 6b65 ound 0 mapc make │ │ │ +00005130: 2d62 7974 652d 636f 6465 2032 3537 2022 -byte-code 257 " │ │ │ +00005140: 5c32 3131 5c32 3237 5c32 3131 5c33 3031 \211\227\211\301 │ │ │ +00005150: 5c32 3330 5c32 3033 0e00 5c33 3032 5c33 \230\203..\302\3 │ │ │ +00005160: 3033 5c33 3030 5c32 3432 5c22 5c32 3130 03\300\242\"\210 │ │ │ +00005170: 5c33 3030 5c32 3131 5c32 3432 545c 3234 \300\211\242T\24 │ │ │ +00005180: 305c 3230 3722 2076 636f 6e63 6174 2076 0\207" vconcat v │ │ │ +00005190: 6563 746f 7220 5b74 6872 6f77 2066 6f75 ector [throw fou │ │ │ +000051a0: 6e64 5d20 3520 225c 6e5c 6e28 666e 2044 nd] 5 "\n\n(fn D │ │ │ +000051b0: 4159 2922 202d 315d 2031 3120 2823 2420 AY)" -1] 11 (#$ │ │ │ +000051c0: 2e20 3230 3533 3229 5d29 0a23 4038 3920 . 20532)]).#@89 │ │ │ +000051d0: 5265 7475 726e 2074 6865 206c 6973 7420 Return the list │ │ │ +000051e0: 6f66 206e 756d 6265 7273 2066 6f72 2074 of numbers for t │ │ │ +000051f0: 6865 2063 6f6d 6d61 2d73 6570 6172 6174 he comma-separat │ │ │ +00005200: 6564 2041 4242 5245 5657 4545 4b44 4159 ed ABBREVWEEKDAY │ │ │ +00005210: 532e 0a0a 2866 6e20 4142 4252 4556 5745 S...(fn ABBREVWE │ │ │ +00005220: 454b 4441 5953 291f 0a28 6465 6661 6c69 EKDAYS)..(defali │ │ │ +00005230: 6173 2027 6963 616c 656e 6461 722d 2d67 as 'icalendar--g │ │ │ +00005240: 6574 2d77 6565 6b64 6179 2d6e 756d 6265 et-weekday-numbe │ │ │ +00005250: 7273 2023 5b32 3537 2022 5c32 3131 5c32 rs #[257 "\211\2 │ │ │ +00005260: 3035 3000 5c33 3031 435c 3330 325c 3330 050.\301C\302\30 │ │ │ +00005270: 335c 3330 345c 3330 355c 3330 365c 3330 3\304\305\306\30 │ │ │ +00005280: 3706 0621 5c33 3130 5c22 5c33 3131 5c33 7..!\310\"\311\3 │ │ │ +00005290: 3132 2508 5c22 5c33 3133 5c33 3134 5c33 12%.\"\313\314\3 │ │ │ +000052a0: 3032 5c33 3033 5c33 3034 5c33 3135 5c33 02\303\304\315\3 │ │ │ +000052b0: 3036 5c33 3037 0608 215c 3331 365c 225c 06\307..!\316\"\ │ │ │ +000052c0: 3331 375c 3332 3025 5c33 3231 0607 5c32 317\320%\321..\2 │ │ │ +000052d0: 3237 5c33 3232 5c22 5c22 5c22 5c32 3636 27\322\"\"\"\266 │ │ │ +000052e0: 5c32 3032 5c32 3037 2220 5b69 6361 6c65 \202\207" [icale │ │ │ +000052f0: 6e64 6172 2d2d 7765 656b 6461 792d 6172 ndar--weekday-ar │ │ │ +00005300: 7261 7920 2d31 206d 6170 6361 7220 6d61 ray -1 mapcar ma │ │ │ +00005310: 6b65 2d62 7974 652d 636f 6465 2032 3537 ke-byte-code 257 │ │ │ +00005320: 2022 5c33 3030 5c32 3131 5c32 3432 545c "\300\211\242T\ │ │ │ +00005330: 3234 305c 3231 305c 3231 315c 3232 375c 240\210\211\227\ │ │ │ +00005340: 3330 305c 3234 3242 5c32 3037 2220 7663 300\242B\207" vc │ │ │ +00005350: 6f6e 6361 7420 7665 6374 6f72 205b 5d20 oncat vector [] │ │ │ +00005360: 3320 225c 6e5c 6e28 666e 2044 4159 2922 3 "\n\n(fn DAY)" │ │ │ +00005370: 2064 656c 7120 6e69 6c20 225c 3330 3101 delq nil "\301. │ │ │ +00005380: 5c33 3030 5c22 415c 3230 3722 205b 6173 \300\"A\207" [as │ │ │ +00005390: 736f 635d 2034 2022 5c6e 5c6e 2866 6e20 soc] 4 "\n\n(fn │ │ │ +000053a0: 4142 4252 4556 4441 5929 2220 7370 6c69 ABBREVDAY)" spli │ │ │ +000053b0: 742d 7374 7269 6e67 2022 2c22 5d20 3132 t-string ","] 12 │ │ │ +000053c0: 2028 2324 202e 2032 3039 3434 295d 290a (#$ . 20944)]). │ │ │ +000053d0: 2340 3437 2052 6574 7572 6e20 7468 6520 #@47 Return the │ │ │ +000053e0: 6162 6272 6576 6961 7465 6420 5745 454b abbreviated WEEK │ │ │ +000053f0: 4441 592e 0a0a 2866 6e20 5745 454b 4441 DAY...(fn WEEKDA │ │ │ +00005400: 5929 1f0a 2864 6566 616c 6961 7320 2769 Y)..(defalias 'i │ │ │ +00005410: 6361 6c65 6e64 6172 2d2d 6765 742d 7765 calendar--get-we │ │ │ +00005420: 656b 6461 792d 6162 6272 6576 2023 5b32 ekday-abbrev #[2 │ │ │ +00005430: 3537 2022 5c33 3031 321e 005c 3330 3243 57 "\3012..\302C │ │ │ +00005440: 015c 3232 375c 3330 335c 3330 345c 3330 .\227\303\304\30 │ │ │ +00005450: 355c 3330 365c 3330 375c 3331 3006 0706 5\306\307\310... │ │ │ +00005460: 075c 225c 3331 315c 225c 3331 325c 3331 .\"\311\"\312\31 │ │ │ +00005470: 3325 085c 225c 3236 3603 5c33 3134 305c 3%.\"\266.\3140\ │ │ │ +00005480: 3230 3722 205b 6361 6c65 6e64 6172 2d64 207" [calendar-d │ │ │ +00005490: 6179 2d6e 616d 652d 6172 7261 7920 666f ay-name-array fo │ │ │ +000054a0: 756e 6420 3020 6d61 7063 206d 616b 652d und 0 mapc make- │ │ │ +000054b0: 6279 7465 2d63 6f64 6520 3235 3720 225c byte-code 257 "\ │ │ │ +000054c0: 3231 315c 3232 375c 3231 315c 3330 315c 211\227\211\301\ │ │ │ +000054d0: 3233 305c 3230 3412 005c 3330 3301 5c33 230\204..\303.\3 │ │ │ +000054e0: 3034 5c33 3035 235c 3330 315c 3233 305c 04\305#\301\230\ │ │ │ +000054f0: 3230 331a 005c 3330 365c 3330 375c 6e5c 203..\306\307\n\ │ │ │ +00005500: 3330 305c 3234 3248 5c22 5c32 3130 5c33 300\242H\"\210\3 │ │ │ +00005510: 3030 5c32 3131 5c32 3432 545c 3234 305c 00\211\242T\240\ │ │ │ +00005520: 3230 3722 2076 636f 6e63 6174 2076 6563 207" vconcat vec │ │ │ +00005530: 746f 7220 5b69 6361 6c65 6e64 6172 2d2d tor [icalendar-- │ │ │ +00005540: 7765 656b 6461 792d 6172 7261 7920 7375 weekday-array su │ │ │ +00005550: 6273 7472 696e 6720 3020 3320 7468 726f bstring 0 3 thro │ │ │ +00005560: 7720 666f 756e 645d 2036 2022 5c6e 5c6e w found] 6 "\n\n │ │ │ +00005570: 2866 6e20 4441 5929 2220 6e69 6c5d 2031 (fn DAY)" nil] 1 │ │ │ +00005580: 3120 2823 2420 2e20 3231 3436 3129 5d29 1 (#$ . 21461)]) │ │ │ +00005590: 0a23 4031 3830 2043 6f6e 7665 7274 2044 .#@180 Convert D │ │ │ +000055a0: 4154 4520 746f 2069 736f 2d73 7479 6c65 ATE to iso-style │ │ │ +000055b0: 2064 6174 652e 0a44 4154 4520 6d75 7374 date..DATE must │ │ │ +000055c0: 2062 6520 6120 6c69 7374 206f 6620 7468 be a list of th │ │ │ +000055d0: 6520 666f 726d 2028 6d6f 6e74 6820 6461 e form (month da │ │ │ +000055e0: 7920 7965 6172 292e 0a49 6620 4441 592d y year)..If DAY- │ │ │ +000055f0: 5348 4946 5420 6973 206e 6f6e 2d6e 696c SHIFT is non-nil │ │ │ +00005600: 2c20 7468 6520 7265 7375 6c74 2069 7320 , the result is │ │ │ +00005610: 7368 6966 7465 6420 6279 2044 4159 2d53 shifted by DAY-S │ │ │ +00005620: 4849 4654 2064 6179 732e 0a0a 2866 6e20 HIFT days...(fn │ │ │ +00005630: 4441 5445 2026 6f70 7469 6f6e 616c 2044 DATE &optional D │ │ │ +00005640: 4159 2d53 4849 4654 291f 0a28 6465 6661 AY-SHIFT)..(defa │ │ │ +00005650: 6c69 6173 2027 6963 616c 656e 6461 722d lias 'icalendar- │ │ │ +00005660: 2d64 6174 652d 746f 2d69 736f 6461 7465 -date-to-isodate │ │ │ +00005670: 2023 5b35 3133 2022 5c33 3030 025c 3231 #[513 "\300.\21 │ │ │ +00005680: 315c 3330 3101 385c 3236 3201 5c33 3032 1\301.8\262.\302 │ │ │ +00005690: 015c 3330 3355 5c32 3033 1500 5c33 3034 .\303U\203..\304 │ │ │ +000056a0: 5c33 3035 215c 3230 324f 0101 5c33 3033 \305!\202O..\303 │ │ │ +000056b0: 565c 3230 335c 3231 3100 0153 5c32 3632 V\203\211..S\262 │ │ │ +000056c0: 015c 3330 3603 5c32 3131 5c32 3131 405c .\306.\211\211@\ │ │ │ +000056d0: 3236 3201 015c 3231 3141 405c 3236 3201 262..\211A@\262. │ │ │ +000056e0: 025c 3330 3101 385c 3236 3201 015c 3330 .\301.8\262..\30 │ │ │ +000056f0: 3704 535f 5c5c 035c 3330 3156 5c32 3033 7.S_\\.\301V\203 │ │ │ +00005700: 7600 5c32 3131 5c33 3130 5c33 3131 0606 v.\211\310\311.. │ │ │ +00005710: 5f5c 5c5c 3331 325c 3234 355a 5c32 3632 _\\\312\245Z\262 │ │ │ +00005720: 0101 5c32 3131 5c33 3033 575c 3230 3357 ..\211\303W\203W │ │ │ +00005730: 005c 3331 3301 2153 5c32 3632 015c 3231 .\313.!S\262.\21 │ │ │ +00005740: 315c 3331 315c 3234 365c 3330 3355 5c32 1\311\246\303U\2 │ │ │ +00005750: 3035 6d00 5c32 3131 5c33 3134 5c32 3436 05m.\211\314\246 │ │ │ +00005760: 5c33 3033 553f 5c32 3036 6d00 5c32 3131 \303U?\206m.\211 │ │ │ +00005770: 5c33 3135 5c32 3436 5c33 3033 555c 3236 \315\246\303U\26 │ │ │ +00005780: 3201 5c32 3033 7600 5c32 3131 545c 3236 2.\203v.\211T\26 │ │ │ +00005790: 3201 5c32 3636 5c32 3034 5c33 3136 035f 2.\266\204\316._ │ │ │ +000057a0: 035c 3331 315c 3234 3504 5c33 3134 5c32 .\311\245.\314\2 │ │ │ +000057b0: 3435 5b05 5c33 3135 5c32 3435 255c 3230 45[.\315\245%\20 │ │ │ +000057c0: 324f 015c 3331 3302 5421 5c32 3632 015c 2O.\313.T!\262.\ │ │ │ +000057d0: 3331 3703 5c32 3131 5c32 3131 405c 3236 317.\211\211@\26 │ │ │ +000057e0: 3201 015c 3231 3141 405c 3236 3201 025c 2..\211A@\262..\ │ │ │ +000057f0: 3330 3101 385c 3236 3201 015c 3330 3704 301.8\262..\307. │ │ │ +00005800: 535f 5c5c 035c 3330 3156 5c32 3033 5c33 S_\\.\301V\203\3 │ │ │ +00005810: 3436 005c 3231 315c 3331 305c 3331 3106 46.\211\310\311. │ │ │ +00005820: 065f 5c5c 5c33 3132 5c32 3435 5a5c 3236 ._\\\312\245Z\26 │ │ │ +00005830: 3201 015c 3231 315c 3330 3357 5c32 3033 2..\211\303W\203 │ │ │ +00005840: 5c33 3037 005c 3331 3301 2153 5c32 3632 \307.\313.!S\262 │ │ │ +00005850: 015c 3231 315c 3331 315c 3234 365c 3330 .\211\311\246\30 │ │ │ +00005860: 3355 5c32 3035 5c33 3335 005c 3231 315c 3U\205\335.\211\ │ │ │ +00005870: 3331 345c 3234 365c 3330 3355 3f5c 3230 314\246\303U?\20 │ │ │ +00005880: 365c 3333 3500 5c32 3131 5c33 3135 5c32 6\335.\211\315\2 │ │ │ +00005890: 3436 5c33 3033 555c 3236 3201 5c32 3033 46\303U\262.\203 │ │ │ +000058a0: 5c33 3436 005c 3231 3154 5c32 3632 015c \346.\211T\262.\ │ │ │ +000058b0: 3236 365c 3230 345c 3331 3603 5f03 5c33 266\204\316._.\3 │ │ │ +000058c0: 3131 5c32 3435 045c 3331 345c 3234 355b 11\245.\314\245[ │ │ │ +000058d0: 055c 3331 355c 3234 355c 3332 305c 3231 .\315\245\320\21 │ │ │ +000058e0: 315c 3231 3140 5c32 3632 0101 5c32 3131 1\211@\262..\211 │ │ │ +000058f0: 4140 5c32 3632 0102 5c33 3031 0138 5c32 A@\262..\301.8\2 │ │ │ +00005900: 3632 0101 5c33 3037 0453 5f5c 5c03 5c33 62..\307.S_\\.\3 │ │ │ +00005910: 3031 565c 3230 334b 015c 3231 315c 3331 01V\203K.\211\31 │ │ │ +00005920: 305c 3331 3106 065f 5c5c 5c33 3132 5c32 0\311.._\\\312\2 │ │ │ +00005930: 3435 5a5c 3236 3201 015c 3231 315c 3330 45Z\262..\211\30 │ │ │ +00005940: 3357 5c32 3033 2c01 5c33 3133 0121 535c 3W\203,.\313.!S\ │ │ │ +00005950: 3236 3201 5c32 3131 5c33 3131 5c32 3436 262.\211\311\246 │ │ │ +00005960: 5c33 3033 555c 3230 3542 015c 3231 315c \303U\205B.\211\ │ │ │ +00005970: 3331 345c 3234 365c 3330 3355 3f5c 3230 314\246\303U?\20 │ │ │ +00005980: 3642 015c 3231 315c 3331 355c 3234 365c 6B.\211\315\246\ │ │ │ +00005990: 3330 3355 5c32 3632 015c 3230 334b 015c 303U\262.\203K.\ │ │ │ +000059a0: 3231 3154 5c32 3632 015c 3236 365c 3230 211T\262.\266\20 │ │ │ +000059b0: 3426 065c 3236 365c 3230 3302 5c32 3036 4&.\266\203.\206 │ │ │ +000059c0: 5601 5c33 3033 5c5c 215c 3332 315c 3332 V.\303\\!\321\32 │ │ │ +000059d0: 325c 3330 3103 3803 4004 4140 245c 3230 2\301.8.@.A@$\20 │ │ │ +000059e0: 3722 205b 6361 6c65 6e64 6172 2d67 7265 7" [calendar-gre │ │ │ +000059f0: 676f 7269 616e 2d66 726f 6d2d 6162 736f gorian-from-abso │ │ │ +00005a00: 6c75 7465 2032 206e 696c 2030 2075 7365 lute 2 nil 0 use │ │ │ +00005a10: 722d 6572 726f 7220 2254 6865 7265 2077 r-error "There w │ │ │ +00005a20: 6173 206e 6f20 7965 6172 207a 6572 6f22 as no year zero" │ │ │ +00005a30: 202b 2033 3120 3233 2034 2031 3020 6162 + 31 23 4 10 ab │ │ │ +00005a40: 7320 3130 3020 3430 3020 3336 3520 2d20 s 100 400 365 - │ │ │ +00005a50: 2831 3220 3331 202d 3129 2066 6f72 6d61 (12 31 -1) forma │ │ │ +00005a60: 7420 2225 3034 6425 3032 6425 3032 6422 t "%04d%02d%02d" │ │ │ +00005a70: 5d20 3231 2028 2324 202e 2032 3139 3131 ] 21 (#$ . 21911 │ │ │ +00005a80: 295d 290a 2340 3333 3620 436f 6e76 6572 )]).#@336 Conver │ │ │ +00005a90: 7420 6469 6172 792d 7374 796c 6520 4441 t diary-style DA │ │ │ +00005aa0: 5445 5354 5249 4e47 2074 6f20 6973 6f2d TESTRING to iso- │ │ │ +00005ab0: 7374 796c 6520 6461 7465 2e0a 4966 2044 style date..If D │ │ │ +00005ac0: 4159 2d53 4849 4654 2069 7320 6e6f 6e2d AY-SHIFT is non- │ │ │ +00005ad0: 6e69 6c2c 2074 6865 2072 6573 756c 7420 nil, the result │ │ │ +00005ae0: 6973 2073 6869 6674 6564 2062 7920 4441 is shifted by DA │ │ │ +00005af0: 592d 5348 4946 5420 6461 7973 0a2d 2d20 Y-SHIFT days.-- │ │ │ +00005b00: 4441 592d 5348 4946 5420 6d75 7374 2062 DAY-SHIFT must b │ │ │ +00005b10: 6520 6569 7468 6572 206e 696c 206f 7220 e either nil or │ │ │ +00005b20: 616e 2069 6e74 6567 6572 2e20 2054 6869 an integer. Thi │ │ │ +00005b30: 7320 6675 6e63 7469 6f6e 0a74 7269 6573 s function.tries │ │ │ +00005b40: 2074 6f20 6669 6775 7265 2074 6865 2064 to figure the d │ │ │ +00005b50: 6174 6520 7374 796c 6520 6672 6f6d 2044 ate style from D │ │ │ +00005b60: 4154 4553 5452 494e 4720 6974 7365 6c66 ATESTRING itself │ │ │ +00005b70: 2e20 2049 6620 7468 6174 0a69 7320 6e6f . If that.is no │ │ │ +00005b80: 7420 706f 7373 6962 6c65 2069 7420 7573 t possible it us │ │ │ +00005b90: 6573 2074 6865 2063 7572 7265 6e74 2063 es the current c │ │ │ +00005ba0: 616c 656e 6461 7220 6461 7465 2073 7479 alendar date sty │ │ │ +00005bb0: 6c65 2e0a 0a28 666e 2044 4154 4553 5452 le...(fn DATESTR │ │ │ +00005bc0: 494e 4720 266f 7074 696f 6e61 6c20 4441 ING &optional DA │ │ │ +00005bd0: 592d 5348 4946 5429 1f0a 2864 6566 616c Y-SHIFT)..(defal │ │ │ +00005be0: 6961 7320 2769 6361 6c65 6e64 6172 2d2d ias 'icalendar-- │ │ │ +00005bf0: 6461 7465 7374 7269 6e67 2d74 6f2d 6973 datestring-to-is │ │ │ +00005c00: 6f64 6174 6520 235b 3531 3320 225c 3330 odate #[513 "\30 │ │ │ +00005c10: 315c 3330 325c 3231 315c 3330 3320 5c33 1\302\211\303 \3 │ │ │ +00005c20: 3034 5c33 3035 5c33 3036 5c33 3037 5c33 04\305\306\307\3 │ │ │ +00005c30: 3130 0521 5c33 3131 5c22 5c33 3132 245c 10.!\311\"\312$\ │ │ │ +00005c40: 3231 365c 3331 335c 3331 3406 075c 225c 216\313\314..\"\ │ │ │ +00005c50: 3230 3340 005c 3331 355c 3331 3606 075c 203@.\315\316..\ │ │ │ +00005c60: 3331 375c 3232 345c 3331 375c 3232 3523 317\224\317\225# │ │ │ +00005c70: 215c 3236 3202 5c33 3135 5c33 3136 0607 !\262.\315\316.. │ │ │ +00005c80: 5c33 3230 5c32 3234 5c33 3230 5c32 3235 \320\224\320\225 │ │ │ +00005c90: 2321 5c32 3632 035c 3331 355c 3331 3606 #!\262.\315\316. │ │ │ +00005ca0: 075c 3331 325c 3232 345c 3331 325c 3232 .\312\224\312\22 │ │ │ +00005cb0: 3523 215c 3236 3204 5c32 3032 0501 5c33 5#!\262.\202..\3 │ │ │ +00005cc0: 3133 5c33 3231 0607 5c22 5c32 3033 7b00 13\321..\"\203{. │ │ │ +00005cd0: 5c33 3135 5c33 3136 0607 5c33 3137 5c32 \315\316..\317\2 │ │ │ +00005ce0: 3234 5c33 3137 5c32 3235 2321 5c32 3632 24\317\225#!\262 │ │ │ +00005cf0: 045c 3331 355c 3331 3606 075c 3332 305c .\315\316..\320\ │ │ │ +00005d00: 3232 345c 3332 305c 3232 3523 215c 3236 224\320\225#!\26 │ │ │ +00005d10: 3203 5c33 3135 5c33 3136 0607 5c33 3132 2.\315\316..\312 │ │ │ +00005d20: 5c32 3234 5c33 3132 5c32 3235 2321 5c32 \224\312\225#!\2 │ │ │ +00005d30: 3632 0208 5c33 3232 3d5c 3230 3305 0102 62..\322=\203... │ │ │ +00005d40: 045c 3236 3204 5c32 3632 045c 3230 3205 .\262.\262.\202. │ │ │ +00005d50: 015c 3331 335c 3332 3306 075c 225c 3230 .\313\323..\"\20 │ │ │ +00005d60: 335c 3235 3200 5c33 3135 5c33 3136 0607 3\252.\315\316.. │ │ │ +00005d70: 5c33 3137 5c32 3234 5c33 3137 5c32 3235 \317\224\317\225 │ │ │ +00005d80: 2321 5c32 3632 025c 3332 345c 3331 3606 #!\262.\324\316. │ │ │ +00005d90: 075c 3332 305c 3232 345c 3332 305c 3232 .\320\224\320\22 │ │ │ +00005da0: 3523 215c 3236 3203 5c33 3135 5c33 3136 5#!\262.\315\316 │ │ │ +00005db0: 0607 5c33 3132 5c32 3234 5c33 3132 5c32 ..\312\224\312\2 │ │ │ +00005dc0: 3235 2321 5c32 3632 045c 3230 3205 015c 25#!\262.\202..\ │ │ │ +00005dd0: 3331 335c 3332 3506 075c 225c 3230 335c 313\325..\"\203\ │ │ │ +00005de0: 3333 3100 5c33 3135 5c33 3136 0607 5c33 331.\315\316..\3 │ │ │ +00005df0: 3137 5c32 3234 5c33 3137 5c32 3235 2321 17\224\317\225#! │ │ │ +00005e00: 5c32 3632 045c 3332 345c 3331 3606 075c \262.\324\316..\ │ │ │ +00005e10: 3332 305c 3232 345c 3332 305c 3232 3523 320\224\320\225# │ │ │ +00005e20: 215c 3236 3203 5c33 3135 5c33 3136 0607 !\262.\315\316.. │ │ │ +00005e30: 5c33 3132 5c32 3234 5c33 3132 5c32 3235 \312\224\312\225 │ │ │ +00005e40: 2321 5c32 3632 025c 3230 3205 015c 3331 #!\262.\202..\31 │ │ │ +00005e50: 335c 3332 3606 075c 225c 3230 3305 015c 3\326..\"\203..\ │ │ │ +00005e60: 3331 355c 3331 3606 075c 3332 305c 3232 315\316..\320\22 │ │ │ +00005e70: 345c 3332 305c 3232 3523 215c 3236 3204 4\320\225#!\262. │ │ │ +00005e80: 5c33 3234 5c33 3136 0607 5c33 3137 5c32 \324\316..\317\2 │ │ │ +00005e90: 3234 5c33 3137 5c32 3235 2321 5c32 3632 24\317\225#!\262 │ │ │ +00005ea0: 035c 3331 355c 3331 3606 075c 3331 325c .\315\316..\312\ │ │ │ +00005eb0: 3232 345c 3331 325c 3232 3523 215c 3236 224\312\225#!\26 │ │ │ +00005ec0: 3202 295c 3231 3002 5c33 3035 565c 3230 2.)\210.\305V\20 │ │ │ +00005ed0: 355c 3230 3302 5c33 3237 0204 0345 5c32 5\203.\327...E\2 │ │ │ +00005ee0: 3131 5c33 3230 0138 5c32 3632 015c 3330 11\320.8\262.\30 │ │ │ +00005ef0: 3201 5c33 3035 555c 3230 3325 015c 3333 2.\305U\203%.\33 │ │ │ +00005f00: 305c 3333 3121 5c32 3032 5f02 015c 3330 0\331!\202_..\30 │ │ │ +00005f10: 3556 5c32 3033 5c32 3331 0101 535c 3236 5V\203\231..S\26 │ │ │ +00005f20: 3201 5c33 3332 035c 3231 315c 3231 3140 2.\332.\211\211@ │ │ │ +00005f30: 5c32 3632 0101 5c32 3131 4140 5c32 3632 \262..\211A@\262 │ │ │ +00005f40: 0102 5c33 3230 0138 5c32 3632 0101 5c33 ..\320.8\262..\3 │ │ │ +00005f50: 3333 0453 5f5c 5c03 5c33 3230 565c 3230 33.S_\\.\320V\20 │ │ │ +00005f60: 335c 3230 3601 5c32 3131 5c33 3334 5c33 3\206.\211\334\3 │ │ │ +00005f70: 3335 0606 5f5c 5c5c 3333 365c 3234 355a 35.._\\\336\245Z │ │ │ +00005f80: 5c32 3632 0101 5c32 3131 5c33 3035 575c \262..\211\305W\ │ │ │ +00005f90: 3230 3367 015c 3333 3701 2153 5c32 3632 203g.\337.!S\262 │ │ │ +00005fa0: 015c 3231 315c 3333 355c 3234 365c 3330 .\211\335\246\30 │ │ │ +00005fb0: 3555 5c32 3035 7d01 5c32 3131 5c33 3430 5U\205}.\211\340 │ │ │ +00005fc0: 5c32 3436 5c33 3035 553f 5c32 3036 7d01 \246\305U?\206}. │ │ │ +00005fd0: 5c32 3131 5c33 3431 5c32 3436 5c33 3035 \211\341\246\305 │ │ │ +00005fe0: 555c 3236 3201 5c32 3033 5c32 3036 015c U\262.\203\206.\ │ │ │ +00005ff0: 3231 3154 5c32 3632 015c 3236 365c 3230 211T\262.\266\20 │ │ │ +00006000: 345c 3334 3203 5f03 5c33 3335 5c32 3435 4\342._.\335\245 │ │ │ +00006010: 045c 3334 305c 3234 355b 055c 3334 315c .\340\245[.\341\ │ │ │ +00006020: 3234 3525 5c32 3032 5f02 5c33 3337 0254 245%\202_.\337.T │ │ │ +00006030: 215c 3236 3201 5c33 3433 035c 3231 315c !\262.\343.\211\ │ │ │ +00006040: 3231 3140 5c32 3632 0101 5c32 3131 4140 211@\262..\211A@ │ │ │ +00006050: 5c32 3632 0102 5c33 3230 0138 5c32 3632 \262..\320.8\262 │ │ │ +00006060: 0101 5c33 3333 0453 5f5c 5c03 5c33 3230 ..\333.S_\\.\320 │ │ │ +00006070: 565c 3230 335c 3336 3601 5c32 3131 5c33 V\203\366.\211\3 │ │ │ +00006080: 3334 5c33 3335 0606 5f5c 5c5c 3333 365c 34\335.._\\\336\ │ │ │ +00006090: 3234 355a 5c32 3632 0101 5c32 3131 5c33 245Z\262..\211\3 │ │ │ +000060a0: 3035 575c 3230 335c 3332 3701 5c33 3337 05W\203\327.\337 │ │ │ +000060b0: 0121 535c 3236 3201 5c32 3131 5c33 3335 .!S\262.\211\335 │ │ │ +000060c0: 5c32 3436 5c33 3035 555c 3230 355c 3335 \246\305U\205\35 │ │ │ +000060d0: 3501 5c32 3131 5c33 3430 5c32 3436 5c33 5.\211\340\246\3 │ │ │ +000060e0: 3035 553f 5c32 3036 5c33 3535 015c 3231 05U?\206\355.\21 │ │ │ +000060f0: 315c 3334 315c 3234 365c 3330 3555 5c32 1\341\246\305U\2 │ │ │ +00006100: 3632 015c 3230 335c 3336 3601 5c32 3131 62.\203\366.\211 │ │ │ +00006110: 545c 3236 3201 5c32 3636 5c32 3034 5c33 T\262.\266\204\3 │ │ │ +00006120: 3432 035f 035c 3333 355c 3234 3504 5c33 42._.\335\245.\3 │ │ │ +00006130: 3430 5c32 3435 5b05 5c33 3431 5c32 3435 40\245[.\341\245 │ │ │ +00006140: 5c33 3434 5c32 3131 5c32 3131 405c 3236 \344\211\211@\26 │ │ │ +00006150: 3201 015c 3231 3141 405c 3236 3201 025c 2..\211A@\262..\ │ │ │ +00006160: 3332 3001 385c 3236 3201 015c 3333 3304 320.8\262..\333. │ │ │ +00006170: 535f 5c5c 035c 3332 3056 5c32 3033 5b02 S_\\.\320V\203[. │ │ │ +00006180: 5c32 3131 5c33 3334 5c33 3335 0606 5f5c \211\334\335.._\ │ │ │ +00006190: 5c5c 3333 365c 3234 355a 5c32 3632 0101 \\336\245Z\262.. │ │ │ +000061a0: 5c32 3131 5c33 3035 575c 3230 333c 025c \211\305W\203<.\ │ │ │ +000061b0: 3333 3701 2153 5c32 3632 015c 3231 315c 337.!S\262.\211\ │ │ │ +000061c0: 3333 355c 3234 365c 3330 3555 5c32 3035 335\246\305U\205 │ │ │ +000061d0: 5202 5c32 3131 5c33 3430 5c32 3436 5c33 R.\211\340\246\3 │ │ │ +000061e0: 3035 553f 5c32 3036 5202 5c32 3131 5c33 05U?\206R.\211\3 │ │ │ +000061f0: 3431 5c32 3436 5c33 3035 555c 3236 3201 41\246\305U\262. │ │ │ +00006200: 5c32 3033 5b02 5c32 3131 545c 3236 3201 \203[.\211T\262. │ │ │ +00006210: 5c32 3636 5c32 3034 2606 5c32 3636 5c32 \266\204&.\266\2 │ │ │ +00006220: 3033 055c 3230 3666 025c 3330 355c 5c21 03.\206f.\305\\! │ │ │ +00006230: 5c33 3435 5c33 3436 5c33 3437 5c33 3230 \345\346\347\320 │ │ │ +00006240: 0438 0440 0541 4024 215c 3231 305c 3334 .8.@.A@$!\210\34 │ │ │ +00006250: 365c 3334 375c 3332 3003 3803 4004 4140 6\347\320.8.@.A@ │ │ │ +00006260: 245c 3236 3201 5c32 3037 2220 5b63 616c $\262.\207" [cal │ │ │ +00006270: 656e 6461 722d 6461 7465 2d73 7479 6c65 endar-date-style │ │ │ +00006280: 202d 3120 6e69 6c20 6d61 7463 682d 6461 -1 nil match-da │ │ │ +00006290: 7461 206d 616b 652d 6279 7465 2d63 6f64 ta make-byte-cod │ │ │ +000062a0: 6520 3020 225c 3330 315c 3330 305c 3330 e 0 "\301\300\30 │ │ │ +000062b0: 325c 225c 3230 3722 2076 636f 6e63 6174 2\"\207" vconcat │ │ │ +000062c0: 2076 6563 746f 7220 5b73 6574 2d6d 6174 vector [set-mat │ │ │ +000062d0: 6368 2d64 6174 6120 6576 6170 6f72 6174 ch-data evaporat │ │ │ +000062e0: 655d 2033 2073 7472 696e 672d 6d61 7463 e] 3 string-matc │ │ │ +000062f0: 6820 225c 5c73 2d2a 5c5c 285b 302d 395d h "\\s-*\\([0-9] │ │ │ +00006300: 5c5c 7b34 5c5c 7d5c 5c29 5b20 092f 5d5c \\{4\\}\\)[ ./]\ │ │ │ +00006310: 5c73 2d2a 303f 5c5c 285b 312d 395d 5b30 \s-*0?\\([1-9][0 │ │ │ +00006320: 2d39 5d3f 5c5c 295b 2009 2f5d 5c5c 732d -9]?\\)[ ./]\\s- │ │ │ +00006330: 2a30 3f5c 5c28 5b31 2d39 5d5b 302d 395d *0?\\([1-9][0-9] │ │ │ +00006340: 3f5c 5c29 2220 7265 6164 2073 7562 7374 ?\\)" read subst │ │ │ +00006350: 7269 6e67 2031 2032 2022 5c5c 732d 2a30 ring 1 2 "\\s-*0 │ │ │ +00006360: 3f5c 5c28 5b31 2d39 5d5b 302d 395d 3f5c ?\\([1-9][0-9]?\ │ │ │ +00006370: 5c29 5b20 092f 5d5c 5c73 2d2a 303f 5c5c \)[ ./]\\s-*0?\\ │ │ │ +00006380: 285b 312d 395d 5b30 2d39 5d3f 5c5c 292c ([1-9][0-9]?\\), │ │ │ +00006390: 3f5b 2009 2f5d 5c5c 732d 2a5c 5c28 5b30 ?[ ./]\\s-*\\([0 │ │ │ +000063a0: 2d39 5d5c 5c7b 345c 5c7d 5c5c 2922 2061 -9]\\{4\\}\\)" a │ │ │ +000063b0: 6d65 7269 6361 6e20 225c 5c73 2d2a 5c5c merican "\\s-*\\ │ │ │ +000063c0: 285b 302d 395d 5c5c 7b34 5c5c 7d5c 5c29 ([0-9]\\{4\\}\\) │ │ │ +000063d0: 5b20 092f 5d5c 5c73 2d2a 5c5c 285b 412d [ ./]\\s-*\\([A- │ │ │ +000063e0: 5a61 2d7a 5d5b 5e20 5d2b 5c5c 295b 2009 Za-z][^ ]+\\)[ . │ │ │ +000063f0: 2f5d 5c5c 732d 2a30 3f5c 5c28 5b31 3233 /]\\s-*0?\\([123 │ │ │ +00006400: 5d3f 5b30 2d39 5d5c 5c29 2220 6963 616c ]?[0-9]\\)" ical │ │ │ +00006410: 656e 6461 722d 2d67 6574 2d6d 6f6e 7468 endar--get-month │ │ │ +00006420: 2d6e 756d 6265 7220 225c 5c73 2d2a 303f -number "\\s-*0? │ │ │ +00006430: 5c5c 285b 3132 335d 3f5b 302d 395d 5c5c \\([123]?[0-9]\\ │ │ │ +00006440: 295b 2009 2f5d 5c5c 732d 2a5c 5c28 5b41 )[ ./]\\s-*\\([A │ │ │ +00006450: 2d5a 612d 7a5d 5b5e 205d 2b5c 5c29 5b20 -Za-z][^ ]+\\)[ │ │ │ +00006460: 092f 5d5c 5c73 2d2a 5c5c 285b 302d 395d ./]\\s-*\\([0-9] │ │ │ +00006470: 5c5c 7b34 5c5c 7d5c 5c29 2220 225c 5c73 \\{4\\}\\)" "\\s │ │ │ +00006480: 2d2a 5c5c 285b 412d 5a61 2d7a 5d5b 5e20 -*\\([A-Za-z][^ │ │ │ +00006490: 5d2b 5c5c 295b 2009 2f5d 5c5c 732d 2a30 ]+\\)[ ./]\\s-*0 │ │ │ +000064a0: 3f5c 5c28 5b31 3233 5d3f 5b30 2d39 5d5c ?\\([123]?[0-9]\ │ │ │ +000064b0: 5c29 2c3f 5b20 092f 5d5c 5c73 2d2a 5c5c \),?[ ./]\\s-*\\ │ │ │ +000064c0: 285b 302d 395d 5c5c 7b34 5c5c 7d5c 5c29 ([0-9]\\{4\\}\\) │ │ │ +000064d0: 2220 6361 6c65 6e64 6172 2d67 7265 676f " calendar-grego │ │ │ +000064e0: 7269 616e 2d66 726f 6d2d 6162 736f 6c75 rian-from-absolu │ │ │ +000064f0: 7465 2075 7365 722d 6572 726f 7220 2254 te user-error "T │ │ │ +00006500: 6865 7265 2077 6173 206e 6f20 7965 6172 here was no year │ │ │ +00006510: 207a 6572 6f22 202b 2033 3120 3233 2034 zero" + 31 23 4 │ │ │ +00006520: 2031 3020 6162 7320 3130 3020 3430 3020 10 abs 100 400 │ │ │ +00006530: 3336 3520 2d20 2831 3220 3331 202d 3129 365 - (12 31 -1) │ │ │ +00006540: 2069 6361 6c65 6e64 6172 2d2d 646d 7367 icalendar--dmsg │ │ │ +00006550: 2066 6f72 6d61 7420 2225 3034 6425 3032 format "%04d%02 │ │ │ +00006560: 6425 3032 6422 5d20 3234 2028 2324 202e d%02d"] 24 (#$ . │ │ │ +00006570: 2032 3331 3738 295d 290a 2340 3331 3420 23178)]).#@314 │ │ │ +00006580: 436f 6e76 6572 7420 6120 7469 6d65 206c Convert a time l │ │ │ +00006590: 696b 6520 393a 3330 706d 2074 6f20 616e ike 9:30pm to an │ │ │ +000065a0: 2069 736f 2d63 6f6e 666f 726d 2073 7472 iso-conform str │ │ │ +000065b0: 696e 6720 6c69 6b65 2054 3231 3330 3030 ing like T213000 │ │ │ +000065c0: 2e0a 496e 2074 6869 7320 6578 616d 706c ..In this exampl │ │ │ +000065d0: 6520 7468 6520 5449 4d45 5354 5249 4e47 e the TIMESTRING │ │ │ +000065e0: 2077 6f75 6c64 2062 6520 2239 3a33 3022 would be "9:30" │ │ │ +000065f0: 2061 6e64 2074 6865 0a41 4d50 4d53 5452 and the.AMPMSTR │ │ │ +00006600: 494e 4720 776f 756c 6420 6265 2022 706d ING would be "pm │ │ │ +00006610: 222e 2020 5468 6520 6d69 6e75 7465 7320 ". The minutes │ │ │ +00006620: 6d61 7920 6265 206d 6973 7369 6e67 2061 may be missing a │ │ │ +00006630: 7320 6c6f 6e67 0a61 7320 7468 6520 636f s long.as the co │ │ │ +00006640: 6c6f 6e20 6973 206d 6973 7369 6e67 2061 lon is missing a │ │ │ +00006650: 7320 7765 6c6c 2c20 692e 652e 2022 3922 s well, i.e. "9" │ │ │ +00006660: 2069 7320 616c 6c6f 7765 6420 6173 0a54 is allowed as.T │ │ │ +00006670: 494d 4553 5452 494e 4720 616e 6420 6861 IMESTRING and ha │ │ │ +00006680: 7320 7468 6520 7361 6d65 2072 6573 756c s the same resul │ │ │ +00006690: 7420 6173 2022 393a 3030 222e 0a0a 2866 t as "9:00"...(f │ │ │ +000066a0: 6e20 5449 4d45 5354 5249 4e47 2041 4d50 n TIMESTRING AMP │ │ │ +000066b0: 4d53 5452 494e 4729 1f0a 2864 6566 616c MSTRING)..(defal │ │ │ +000066c0: 6961 7320 2769 6361 6c65 6e64 6172 2d2d ias 'icalendar-- │ │ │ +000066d0: 6469 6172 7974 696d 652d 746f 2d69 736f diarytime-to-iso │ │ │ +000066e0: 7469 6d65 2023 5b35 3134 2022 015c 3230 time #[514 ".\20 │ │ │ +000066f0: 3567 005c 3330 3020 5c33 3031 5c33 3032 5g.\300 \301\302 │ │ │ +00006700: 5c33 3033 5c33 3034 5c33 3035 0521 5c33 \303\304\305.!\3 │ │ │ +00006710: 3036 5c22 5c33 3037 245c 3231 365c 3331 06\"\307$\216\31 │ │ │ +00006720: 3003 5c33 3131 5c22 295c 3236 3201 5c32 0.\311\")\262.\2 │ │ │ +00006730: 3131 4001 415c 3230 3326 0001 4140 5c32 11@.A\203&..A@\2 │ │ │ +00006740: 3032 3200 5c32 3131 475c 3331 3256 5c32 022.\211G\312V\2 │ │ │ +00006750: 3033 3100 5c33 3133 5c32 3032 3200 5c33 031.\313\2022.\3 │ │ │ +00006760: 3134 5c33 3135 0202 5021 045c 3230 334c 14\315..P!.\203L │ │ │ +00006770: 0004 5c33 3136 5c32 3330 5c32 3033 4c00 ..\316\230\203L. │ │ │ +00006780: 5c32 3131 5c33 3137 575c 3230 334c 005c \211\317W\203L.\ │ │ │ +00006790: 3231 315c 3331 375c 5c5c 3236 3201 045c 211\317\\\262..\ │ │ │ +000067a0: 3230 3361 0004 5c33 3230 5c32 3330 5c32 203a..\320\230\2 │ │ │ +000067b0: 3033 6100 5c32 3131 5c33 3137 595c 3230 03a.\211\317Y\20 │ │ │ +000067c0: 3361 005c 3231 315c 3331 375a 5c32 3632 3a.\211\317Z\262 │ │ │ +000067d0: 015c 3332 315c 3332 3202 5c22 5c32 3636 .\321\322.\"\266 │ │ │ +000067e0: 5c32 3034 5c32 3037 2220 5b6d 6174 6368 \204\207" [match │ │ │ +000067f0: 2d64 6174 6120 6d61 6b65 2d62 7974 652d -data make-byte- │ │ │ +00006800: 636f 6465 2030 2022 5c33 3031 5c33 3030 code 0 "\301\300 │ │ │ +00006810: 5c33 3032 5c22 5c32 3037 2220 7663 6f6e \302\"\207" vcon │ │ │ +00006820: 6361 7420 7665 6374 6f72 205b 7365 742d cat vector [set- │ │ │ +00006830: 6d61 7463 682d 6461 7461 2065 7661 706f match-data evapo │ │ │ +00006840: 7261 7465 5d20 3320 7370 6c69 742d 7374 rate] 3 split-st │ │ │ +00006850: 7269 6e67 2022 3a22 2032 2022 2220 2230 ring ":" 2 "" "0 │ │ │ +00006860: 3022 2072 6561 6420 2270 6d22 2031 3230 0" read "pm" 120 │ │ │ +00006870: 3020 2261 6d22 2066 6f72 6d61 7420 2254 0 "am" format "T │ │ │ +00006880: 2530 3464 3030 225d 2039 2028 2324 202e %04d00"] 9 (#$ . │ │ │ +00006890: 2032 3539 3834 295d 290a 2340 3638 2045 25984)]).#@68 E │ │ │ +000068a0: 7363 6170 6520 636f 6d6d 6120 616e 6420 scape comma and │ │ │ +000068b0: 6f74 6865 7220 6372 6974 6963 616c 2063 other critical c │ │ │ +000068c0: 6861 7261 6374 6572 7320 696e 2053 5452 haracters in STR │ │ │ +000068d0: 494e 472e 0a0a 2866 6e20 5354 5249 4e47 ING...(fn STRING │ │ │ +000068e0: 291f 0a28 6465 6661 6c69 6173 2027 6963 )..(defalias 'ic │ │ │ +000068f0: 616c 656e 6461 722d 2d63 6f6e 7665 7274 alendar--convert │ │ │ +00006900: 2d73 7472 696e 672d 666f 722d 6578 706f -string-for-expo │ │ │ +00006910: 7274 2023 5b32 3537 2022 5c33 3030 5c33 rt #[257 "\300\3 │ │ │ +00006920: 3031 5c33 3032 0323 5c32 3037 2220 5b72 01\302.#\207" [r │ │ │ +00006930: 6570 6c61 6365 2d72 6567 6578 702d 696e eplace-regexp-in │ │ │ +00006940: 2d73 7472 696e 6720 222c 2220 225c 5c5c -string "," "\\\ │ │ │ +00006950: 5c2c 225d 2035 2028 2324 202e 2032 3637 \,"] 5 (#$ . 267 │ │ │ +00006960: 3833 295d 290a 2340 3733 2052 656d 6f76 83)]).#@73 Remov │ │ │ +00006970: 6520 6573 6361 7065 2063 6861 7273 2066 e escape chars f │ │ │ +00006980: 6f72 2063 6f6d 6d61 2c20 7365 6d69 636f or comma, semico │ │ │ +00006990: 6c6f 6e20 6574 632e 2066 726f 6d20 5354 lon etc. from ST │ │ │ +000069a0: 5249 4e47 2e0a 0a28 666e 2053 5452 494e RING...(fn STRIN │ │ │ +000069b0: 4729 1f0a 2864 6566 616c 6961 7320 2769 G)..(defalias 'i │ │ │ +000069c0: 6361 6c65 6e64 6172 2d2d 636f 6e76 6572 calendar--conver │ │ │ +000069d0: 742d 7374 7269 6e67 2d66 6f72 2d69 6d70 t-string-for-imp │ │ │ +000069e0: 6f72 7420 235b 3235 3720 225c 3330 305c ort #[257 "\300\ │ │ │ +000069f0: 3330 315c 3330 325c 3330 305c 3330 335c 301\302\300\303\ │ │ │ +00006a00: 3330 345c 3330 305c 3330 355c 3330 365c 304\300\305\306\ │ │ │ +00006a10: 3330 305c 3330 375c 3331 3006 5c66 2323 300\307\310.\f## │ │ │ +00006a20: 2323 5c32 3037 2220 5b72 6570 6c61 6365 ##\207" [replace │ │ │ +00006a30: 2d72 6567 6578 702d 696e 2d73 7472 696e -regexp-in-strin │ │ │ +00006a40: 6720 225c 5c5c 5c6e 2220 225c 6e20 2220 g "\\\\n" "\n " │ │ │ +00006a50: 225c 5c5c 5c5c 2222 2022 5c22 2220 225c "\\\\\"" "\"" "\ │ │ │ +00006a60: 5c5c 5c3b 2220 223b 2220 225c 5c5c 5c2c \\\;" ";" "\\\\, │ │ │ +00006a70: 2220 222c 225d 2031 3420 2823 2420 2e20 " ","] 14 (#$ . │ │ │ +00006a80: 3236 3938 3729 5d29 0a23 4032 3036 2045 26987)]).#@206 E │ │ │ +00006a90: 7870 6f72 7420 6469 6172 7920 6669 6c65 xport diary file │ │ │ +00006aa0: 2074 6f20 6943 616c 656e 6461 7220 666f to iCalendar fo │ │ │ +00006ab0: 726d 6174 2e0a 416c 6c20 6469 6172 7920 rmat..All diary │ │ │ +00006ac0: 656e 7472 6965 7320 696e 2074 6865 2066 entries in the f │ │ │ +00006ad0: 696c 6520 4449 4152 592d 4649 4c45 4e41 ile DIARY-FILENA │ │ │ +00006ae0: 4d45 2061 7265 2063 6f6e 7665 7274 6564 ME are converted │ │ │ +00006af0: 2074 6f20 6943 616c 656e 6461 720a 666f to iCalendar.fo │ │ │ +00006b00: 726d 6174 2e20 2054 6865 2072 6573 756c rmat. The resul │ │ │ +00006b10: 7420 6973 2061 7070 656e 6465 6420 746f t is appended to │ │ │ +00006b20: 2074 6865 2066 696c 6520 4943 414c 2d46 the file ICAL-F │ │ │ +00006b30: 494c 454e 414d 452e 0a0a 2866 6e20 4449 ILENAME...(fn DI │ │ │ +00006b40: 4152 592d 4649 4c45 4e41 4d45 2049 4341 ARY-FILENAME ICA │ │ │ +00006b50: 4c2d 4649 4c45 4e41 4d45 291f 0a28 6465 L-FILENAME)..(de │ │ │ +00006b60: 6661 6c69 6173 2027 6963 616c 656e 6461 falias 'icalenda │ │ │ +00006b70: 722d 6578 706f 7274 2d66 696c 6520 235b r-export-file #[ │ │ │ +00006b80: 3531 3420 2272 5c33 3030 0221 715c 3231 514 "r\300.!q\21 │ │ │ +00006b90: 305c 3330 3165 6403 2329 5c32 3037 2220 0\301ed.#)\207" │ │ │ +00006ba0: 5b66 696e 642d 6669 6c65 2069 6361 6c65 [find-file icale │ │ │ +00006bb0: 6e64 6172 2d65 7870 6f72 742d 7265 6769 ndar-export-regi │ │ │ +00006bc0: 6f6e 5d20 3620 2823 2420 2e20 3237 3237 on] 6 (#$ . 2727 │ │ │ +00006bd0: 3929 2022 4645 7870 6f72 7420 6469 6172 9) "FExport diar │ │ │ +00006be0: 7920 6461 7461 2066 726f 6d20 6669 6c65 y data from file │ │ │ +00006bf0: 3a20 5c6e 4669 6e74 6f20 6943 616c 656e : \nFinto iCalen │ │ │ +00006c00: 6461 7220 6669 6c65 3a20 225d 290a 2340 dar file: "]).#@ │ │ │ +00006c10: 3434 2041 7578 696c 6961 7279 2063 6f75 44 Auxiliary cou │ │ │ +00006c20: 6e74 6572 2066 6f72 2063 7265 6174 696e nter for creatin │ │ │ +00006c30: 6720 756e 6971 7565 2069 6473 2e1f 0a28 g unique ids...( │ │ │ +00006c40: 6465 6676 6172 2069 6361 6c65 6e64 6172 defvar icalendar │ │ │ +00006c50: 2d2d 7569 642d 636f 756e 7420 3020 2823 --uid-count 0 (# │ │ │ +00006c60: 2420 2e20 3237 3636 3729 290a 2340 3233 $ . 27667)).#@23 │ │ │ +00006c70: 3720 436f 6e73 7472 7563 7420 6120 756e 7 Construct a un │ │ │ +00006c80: 6971 7565 2069 4361 6c65 6e64 6172 2055 ique iCalendar U │ │ │ +00006c90: 4944 2066 6f72 2061 2064 6961 7279 2065 ID for a diary e │ │ │ +00006ca0: 6e74 7279 2e0a 454e 5452 592d 4655 4c4c ntry..ENTRY-FULL │ │ │ +00006cb0: 2069 7320 7468 6520 6675 6c6c 2064 6961 is the full dia │ │ │ +00006cc0: 7279 2065 6e74 7279 2073 7472 696e 672e ry entry string. │ │ │ +00006cd0: 2020 434f 4e54 454e 5453 2069 7320 7468 CONTENTS is th │ │ │ +00006ce0: 650a 6375 7272 656e 7420 6943 616c 656e e.current iCalen │ │ │ +00006cf0: 6461 7220 6f62 6a65 6374 2c20 6173 2061 dar object, as a │ │ │ +00006d00: 2073 7472 696e 672e 2020 496e 6372 6561 string. Increa │ │ │ +00006d10: 7365 0a60 6963 616c 656e 6461 722d 2d75 se.`icalendar--u │ │ │ +00006d20: 6964 2d63 6f75 6e74 272e 2020 5265 7475 id-count'. Retu │ │ │ +00006d30: 726e 7320 7468 6520 5549 4420 7374 7269 rns the UID stri │ │ │ +00006d40: 6e67 2e0a 0a28 666e 2045 4e54 5259 2d46 ng...(fn ENTRY-F │ │ │ +00006d50: 554c 4c20 434f 4e54 454e 5453 291f 0a28 ULL CONTENTS)..( │ │ │ +00006d60: 6465 6661 6c69 6173 2027 6963 616c 656e defalias 'icalen │ │ │ +00006d70: 6461 722d 2d63 7265 6174 652d 7569 6420 dar--create-uid │ │ │ +00006d80: 235b 3531 3420 2208 5c33 3033 5c33 3034 #[514 ".\303\304 │ │ │ +00006d90: 5c33 3035 0523 5c32 3033 1300 5c33 3033 \305.#\203..\303 │ │ │ +00006da0: 5c33 3034 5c33 3035 0523 5c32 3632 015c \304\305.#\262.\ │ │ │ +00006db0: 3230 3266 005c 3330 365c 3330 375c 3331 202f.\306\307\31 │ │ │ +00006dc0: 305c 3331 3109 5c22 035c 3331 325c 3231 0\311.\".\312\21 │ │ │ +00006dd0: 3125 5c32 3632 0109 5411 5c33 3036 5c33 1%\262..T.\306\3 │ │ │ +00006de0: 3133 5c33 3134 5c33 3135 2103 5c33 3132 13\314\315!.\312 │ │ │ +00006df0: 5c32 3131 255c 3236 3201 5c33 3036 5c33 \211%\262.\306\3 │ │ │ +00006e00: 3136 5c33 3130 5c33 3131 5c33 3137 5c33 16\310\311\317\3 │ │ │ +00006e10: 3230 0608 2121 5c22 035c 3331 325c 3231 20..!!\".\312\21 │ │ │ +00006e20: 3125 5c32 3632 015c 3330 365c 3332 315c 1%\262.\306\321\ │ │ │ +00006e30: 6e5c 3230 3645 005c 3332 3203 5c33 3132 n\206E.\322.\312 │ │ │ +00006e40: 5c32 3131 255c 3236 3201 5c33 3233 5c33 \211%\262.\323\3 │ │ │ +00006e50: 3234 035c 225c 3230 335c 5c00 5c33 3235 24.\"\203\\.\325 │ │ │ +00006e60: 025c 3332 365c 3232 345c 3332 365c 3232 .\326\224\326\22 │ │ │ +00006e70: 3523 5c32 3032 5d00 5c33 3237 5c33 3036 5#\202].\327\306 │ │ │ +00006e80: 5c33 3330 0204 5c33 3132 5c32 3131 255c \330..\312\211%\ │ │ │ +00006e90: 3236 365c 3230 325c 3231 315c 3230 3722 266\202\211\207" │ │ │ +00006ea0: 205b 6963 616c 656e 6461 722d 7569 642d [icalendar-uid- │ │ │ +00006eb0: 666f 726d 6174 2069 6361 6c65 6e64 6172 format icalendar │ │ │ +00006ec0: 2d2d 7569 642d 636f 756e 7420 7573 6572 --uid-count user │ │ │ +00006ed0: 2d6c 6f67 696e 2d6e 616d 6520 6765 742d -login-name get- │ │ │ +00006ee0: 7465 7874 2d70 726f 7065 7274 7920 3020 text-property 0 │ │ │ +00006ef0: 7569 6420 7265 706c 6163 652d 7265 6765 uid replace-rege │ │ │ +00006f00: 7870 2d69 6e2d 7374 7269 6e67 2022 2563 xp-in-string "%c │ │ │ +00006f10: 2220 666f 726d 6174 2022 2564 2220 7420 " format "%d" t │ │ │ +00006f20: 2225 7422 2066 6f72 6d61 742d 7469 6d65 "%t" format-time │ │ │ +00006f30: 2d73 7472 696e 6720 2225 7325 4e22 2022 -string "%s%N" " │ │ │ +00006f40: 2568 2220 6162 7320 7378 6861 7368 2022 %h" abs sxhash " │ │ │ +00006f50: 2575 2220 2255 4e4b 4e4f 574e 5f55 5345 %u" "UNKNOWN_USE │ │ │ +00006f60: 5222 2073 7472 696e 672d 6d61 7463 6820 R" string-match │ │ │ +00006f70: 225e 4454 5354 4152 545b 5e3a 5d2a 3a5c "^DTSTART[^:]*:\ │ │ │ +00006f80: 5c28 5b30 2d39 5d2a 5c5c 2922 2073 7562 \([0-9]*\\)" sub │ │ │ +00006f90: 7374 7269 6e67 2031 2022 4454 5354 4152 string 1 "DTSTAR │ │ │ +00006fa0: 5422 2022 2573 225d 2031 3020 2823 2420 T" "%s"] 10 (#$ │ │ │ +00006fb0: 2e20 3237 3736 3229 5d29 0a23 4034 3137 . 27762)]).#@417 │ │ │ +00006fc0: 2045 7870 6f72 7420 7265 6769 6f6e 2069 Export region i │ │ │ +00006fd0: 6e20 6469 6172 7920 6669 6c65 2074 6f20 n diary file to │ │ │ +00006fe0: 6943 616c 656e 6461 7220 666f 726d 6174 iCalendar format │ │ │ +00006ff0: 2e0a 416c 6c20 6469 6172 7920 656e 7472 ..All diary entr │ │ │ +00007000: 6965 7320 696e 2074 6865 2072 6567 696f ies in the regio │ │ │ +00007010: 6e20 6672 6f6d 204d 494e 2074 6f20 4d41 n from MIN to MA │ │ │ +00007020: 5820 696e 2074 6865 2063 7572 7265 6e74 X in the current │ │ │ +00007030: 2062 7566 6665 7220 6172 650a 636f 6e76 buffer are.conv │ │ │ +00007040: 6572 7465 6420 746f 2069 4361 6c65 6e64 erted to iCalend │ │ │ +00007050: 6172 2066 6f72 6d61 742e 2020 5468 6520 ar format. The │ │ │ +00007060: 7265 7375 6c74 2069 7320 6170 7065 6e64 result is append │ │ │ +00007070: 6564 2074 6f20 7468 6520 6669 6c65 0a49 ed to the file.I │ │ │ +00007080: 4341 4c2d 4649 4c45 4e41 4d45 2e0a 5468 CAL-FILENAME..Th │ │ │ +00007090: 6973 2066 756e 6374 696f 6e20 6174 7465 is function atte │ │ │ +000070a0: 6d70 7473 2074 6f20 7265 7475 726e 2074 mpts to return t │ │ │ +000070b0: 2069 6620 736f 6d65 7468 696e 6720 676f if something go │ │ │ +000070c0: 6573 2077 726f 6e67 2e20 2049 6e20 7468 es wrong. In th │ │ │ +000070d0: 6973 0a63 6173 6520 616e 2065 7272 6f72 is.case an error │ │ │ +000070e0: 2073 7472 696e 6720 7768 6963 6820 6465 string which de │ │ │ +000070f0: 7363 7269 6265 7320 616c 6c20 7468 6520 scribes all the │ │ │ +00007100: 6572 726f 7273 2061 6e64 2070 726f 626c errors and probl │ │ │ +00007110: 656d 7320 6973 0a77 7269 7474 656e 2069 ems is.written i │ │ │ +00007120: 6e74 6f20 7468 6520 6275 6666 6572 2060 nto the buffer ` │ │ │ +00007130: 2a69 6361 6c65 6e64 6172 2d65 7272 6f72 *icalendar-error │ │ │ +00007140: 732a 272e 0a0a 2866 6e20 4d49 4e20 4d41 s*'...(fn MIN MA │ │ │ +00007150: 5820 4943 414c 2d46 494c 454e 414d 4529 X ICAL-FILENAME) │ │ │ +00007160: 1f0a 2864 6566 616c 6961 7320 2769 6361 ..(defalias 'ica │ │ │ +00007170: 6c65 6e64 6172 2d65 7870 6f72 742d 7265 lendar-export-re │ │ │ +00007180: 6769 6f6e 2023 5b37 3731 2022 5c33 3033 gion #[771 "\303 │ │ │ +00007190: 435c 3330 335c 3231 315c 3231 3143 5c33 C\303\211\211C\3 │ │ │ +000071a0: 3033 435c 3330 3443 5c33 3034 435c 3330 03C\304C\304C\30 │ │ │ +000071b0: 345c 3330 355c 3330 3608 215c 3330 3751 4\305\306.!\307Q │ │ │ +000071c0: 5c33 3034 435c 3330 3472 5c33 3130 5c33 \304C\304r\310\3 │ │ │ +000071d0: 3131 2171 5c32 3130 5c33 3132 205c 3231 11!q\210\312 \21 │ │ │ +000071e0: 3029 5c32 3132 060d 625c 3231 305c 3331 0)\212..b\210\31 │ │ │ +000071f0: 3309 5c32 3033 2e00 5c33 3134 5c32 3032 3.\203..\314\202 │ │ │ +00007200: 2f00 5c33 3135 060e 5c33 3136 235c 3230 /.\315..\316#\20 │ │ │ +00007210: 335c 3235 3300 5c33 3137 5c33 3230 215c 3\253.\317\320!\ │ │ │ +00007220: 3236 325c 6e5c 3332 315c 3232 345c 3230 262\n\321\224\20 │ │ │ +00007230: 3348 005c 3331 375c 3332 3121 5c32 3632 3H.\317\321!\262 │ │ │ +00007240: 095c 3230 324b 005c 3330 335c 3236 3209 .\202K.\303\262. │ │ │ +00007250: 0607 065c 6e06 5c6e 505c 3234 305c 3231 ...\n.\nP\240\21 │ │ │ +00007260: 305c 3332 3231 5c32 3230 005c 3332 3303 0\3221\220.\323. │ │ │ +00007270: 060b 5c22 5c32 3632 0101 5c33 3234 0609 ..\"\262..\324.. │ │ │ +00007280: 5c32 3432 215c 3234 305c 3231 305c 3332 \242!\240\210\32 │ │ │ +00007290: 355c 3332 365c 3332 375c 3333 305c 3333 5\326\327\330\33 │ │ │ +000072a0: 315c 3333 3206 1006 0e06 0e06 0e06 0e06 1\332........... │ │ │ +000072b0: 5c66 2606 5c33 3333 5c22 5c33 3334 5c33 \f&.\333\"\334\3 │ │ │ +000072c0: 3335 2502 3a5c 3230 335c 3231 3200 0243 35%.:\203\212..C │ │ │ +000072d0: 5c32 3032 5c32 3133 0002 5c22 305c 3230 \202\213..\"0\20 │ │ │ +000072e0: 325c 3234 3700 5c33 3136 5c32 3632 0572 2\247.\316\262.r │ │ │ +000072f0: 5c33 3130 5c33 3131 2171 5c32 3130 5c33 \310\311!q\210\3 │ │ │ +00007300: 3336 5c33 3337 5c33 3430 6560 5c22 0306 36\337\340e`\".. │ │ │ +00007310: 0e24 6329 5c32 3632 015c 3231 305c 3230 .$c)\262.\210\20 │ │ │ +00007320: 3225 0072 5c33 3431 1a5c 3334 3206 5c66 2%.r\341.\342.\f │ │ │ +00007330: 2171 5c32 3130 6462 5c32 3130 5c33 3433 !q\210db\210\343 │ │ │ +00007340: 635c 3231 305c 3334 3463 5c32 3130 5c33 c\210\344c\210\3 │ │ │ +00007350: 3435 635c 3231 3006 5c6e 5c32 3432 635c 45c\210.\n\242c\ │ │ │ +00007360: 3231 305c 3334 3663 5c32 3130 5c33 3437 210\346c\210\347 │ │ │ +00007370: 205c 3231 3003 5c32 3034 5c33 3232 005c \210.\204\322.\ │ │ │ +00007380: 3335 3020 5c32 3130 2b03 5c32 3037 2220 350 \210+.\207" │ │ │ +00007390: 5b64 6961 7279 2d6e 6f6e 6d61 726b 696e [diary-nonmarkin │ │ │ +000073a0: 672d 7379 6d62 6f6c 2069 6361 6c65 6e64 g-symbol icalend │ │ │ +000073b0: 6172 2d65 7870 6f72 742d 6869 6464 656e ar-export-hidden │ │ │ +000073c0: 2d64 6961 7279 2d65 6e74 7269 6573 2063 -diary-entries c │ │ │ +000073d0: 6f64 696e 672d 7379 7374 656d 2d66 6f72 oding-system-for │ │ │ +000073e0: 2d77 7269 7465 2022 2220 6e69 6c20 225e -write "" nil "^ │ │ │ +000073f0: 2220 7265 6765 7870 2d71 756f 7465 2022 " regexp-quote " │ │ │ +00007400: 3f22 2067 6574 2d62 7566 6665 722d 6372 ?" get-buffer-cr │ │ │ +00007410: 6561 7465 2022 2a69 6361 6c65 6e64 6172 eate "*icalendar │ │ │ +00007420: 2d65 7272 6f72 732a 2220 6572 6173 652d -errors*" erase- │ │ │ +00007430: 6275 6666 6572 2072 652d 7365 6172 6368 buffer re-search │ │ │ +00007440: 2d66 6f72 7761 7264 2022 5e5c 5c28 5b5e -forward "^\\([^ │ │ │ +00007450: 2009 5c6e 235d 2e2b 5c5c 295c 5c28 5c5c .\n#].+\\)\\(\\ │ │ │ +00007460: 285c 6e5b 2009 5d2e 2a5c 5c29 2a5c 5c29 (\n[ .].*\\)*\\) │ │ │ +00007470: 2220 225e 5c5c 285b 5e20 095c 6e26 235d " "^\\([^ .\n&#] │ │ │ +00007480: 2e2b 5c5c 295c 5c28 5c5c 285c 6e5b 2009 .+\\)\\(\\(\n[ . │ │ │ +00007490: 5d2e 2a5c 5c29 2a5c 5c29 2220 7420 6d61 ].*\\)*\\)" t ma │ │ │ +000074a0: 7463 682d 7374 7269 6e67 2031 2032 2028 tch-string 1 2 ( │ │ │ +000074b0: 6572 726f 7229 2069 6361 6c65 6e64 6172 error) icalendar │ │ │ +000074c0: 2d2d 636f 6e76 6572 742d 746f 2d69 6361 --convert-to-ica │ │ │ +000074d0: 6c20 6963 616c 656e 6461 722d 2d70 6172 l icalendar--par │ │ │ +000074e0: 7365 2d73 756d 6d61 7279 2d61 6e64 2d72 se-summary-and-r │ │ │ +000074f0: 6573 7420 6d61 7063 206d 616b 652d 6279 est mapc make-by │ │ │ +00007500: 7465 2d63 6f64 6520 3235 3720 225c 3330 te-code 257 "\30 │ │ │ +00007510: 3301 405c 3330 3603 4151 5c32 3430 5c32 3.@\306.AQ\240\2 │ │ │ +00007520: 3130 5c33 3037 5c33 3130 5c33 3035 5c32 10\307\310\305\2 │ │ │ +00007530: 3432 5c22 415c 3330 375c 3331 315c 3330 42\"A\307\311\30 │ │ │ +00007540: 355c 3234 325c 2241 5c33 3037 5c33 3132 5\242\"A\307\312 │ │ │ +00007550: 5c33 3035 5c32 3432 5c22 415c 3330 375c \305\242\"A\307\ │ │ │ +00007560: 3331 335c 3330 355c 3234 325c 2241 5c33 313\305\242\"A\3 │ │ │ +00007570: 3037 5c33 3134 5c33 3035 5c32 3432 5c22 07\314\305\242\" │ │ │ +00007580: 415c 3330 375c 3331 355c 3330 355c 3234 A\307\315\305\24 │ │ │ +00007590: 325c 2241 5c33 3037 5c33 3136 5c33 3035 2\"A\307\316\305 │ │ │ +000075a0: 5c32 3432 5c22 4106 065c 3230 3341 005c \242\"A..\203A.\ │ │ │ +000075b0: 3330 335c 3231 315c 3234 325c 3331 3706 303\211\242\317. │ │ │ +000075c0: 0951 5c32 3430 5c32 3130 055c 3230 334e .Q\240\210.\203N │ │ │ +000075d0: 005c 3330 335c 3231 315c 3234 325c 3332 .\303\211\242\32 │ │ │ +000075e0: 3006 0851 5c32 3430 5c32 3130 045c 3230 0..Q\240\210.\20 │ │ │ +000075f0: 335b 005c 3330 335c 3231 315c 3234 325c 3[.\303\211\242\ │ │ │ +00007600: 3332 3106 0751 5c32 3430 5c32 3130 035c 321..Q\240\210.\ │ │ │ +00007610: 3230 3368 005c 3330 335c 3231 315c 3234 203h.\303\211\24 │ │ │ +00007620: 325c 3332 3206 0651 5c32 3430 5c32 3130 2\322..Q\240\210 │ │ │ +00007630: 025c 3230 3374 005c 3330 335c 3231 315c .\203t.\303\211\ │ │ │ +00007640: 3234 325c 3332 3305 515c 3234 305c 3231 242\323.Q\240\21 │ │ │ +00007650: 3001 5c32 3033 5c32 3030 005c 3330 335c 0.\203\200.\303\ │ │ │ +00007660: 3231 315c 3234 325c 3332 3404 515c 3234 211\242\324.Q\24 │ │ │ +00007670: 305c 3231 305c 3330 325c 3332 3502 5c32 0\210\302\325.\2 │ │ │ +00007680: 3036 5c32 3134 005c 3332 365c 3330 315c 06\214.\326\301\ │ │ │ +00007690: 3234 325c 3330 335c 3234 325c 2250 5c32 242\303\242\"P\2 │ │ │ +000076a0: 3430 5c32 3130 5c33 3034 5c33 3237 0609 40\210\304\327.. │ │ │ +000076b0: 4121 5c32 3430 5c32 3636 085c 3330 305c A!\240\266.\300\ │ │ │ +000076c0: 3231 315c 3234 325c 3330 325c 3234 325c 211\242\302\242\ │ │ │ +000076d0: 3330 335c 3234 325c 3330 345c 3234 325c 303\242\304\242\ │ │ │ +000076e0: 3333 305c 3236 3005 5c32 3430 5c32 3037 330\260.\240\207 │ │ │ +000076f0: 2220 7663 6f6e 6361 7420 7665 6374 6f72 " vconcat vector │ │ │ +00007700: 205b 225c 6e53 554d 4d41 5259 3a22 2061 ["\nSUMMARY:" a │ │ │ +00007710: 7373 6f63 2063 6c61 2064 6573 206c 6f63 ssoc cla des loc │ │ │ +00007720: 206f 7267 2073 7461 2075 726c 2075 6964 org sta url uid │ │ │ +00007730: 2022 5c6e 434c 4153 533a 2220 225c 6e44 "\nCLASS:" "\nD │ │ │ +00007740: 4553 4352 4950 5449 4f4e 3a22 2022 5c6e ESCRIPTION:" "\n │ │ │ +00007750: 4c4f 4341 5449 4f4e 3a22 2022 5c6e 4f52 LOCATION:" "\nOR │ │ │ +00007760: 4741 4e49 5a45 523a 2220 225c 6e53 5441 GANIZER:" "\nSTA │ │ │ +00007770: 5455 533a 2220 225c 6e55 524c 3a22 2022 TUS:" "\nURL:" " │ │ │ +00007780: 5c6e 4245 4749 4e3a 5645 5645 4e54 5c6e \nBEGIN:VEVENT\n │ │ │ +00007790: 5549 443a 2220 6963 616c 656e 6461 722d UID:" icalendar- │ │ │ +000077a0: 2d63 7265 6174 652d 7569 6420 6963 616c -create-uid ical │ │ │ +000077b0: 656e 6461 722d 2d63 7265 6174 652d 6963 endar--create-ic │ │ │ +000077c0: 616c 2d61 6c61 726d 2022 5c6e 454e 443a al-alarm "\nEND: │ │ │ +000077d0: 5645 5645 4e54 225d 2031 3320 225c 6e5c VEVENT"] 13 "\n\ │ │ │ +000077e0: 6e28 666e 2043 4f4e 5445 4e54 532d 4e2d n(fn CONTENTS-N- │ │ │ +000077f0: 5355 4d4d 4152 5929 2220 666f 726d 6174 SUMMARY)" format │ │ │ +00007800: 2d6d 6573 7361 6765 2022 4572 726f 7220 -message "Error │ │ │ +00007810: 696e 206c 696e 6520 2564 202d 2d20 2573 in line %d -- %s │ │ │ +00007820: 3a20 6025 7327 5c6e 2220 636f 756e 742d : `%s'\n" count- │ │ │ +00007830: 6c69 6e65 7320 7574 662d 3820 6669 6e64 lines utf-8 find │ │ │ +00007840: 2d66 696c 6520 2242 4547 494e 3a56 4341 -file "BEGIN:VCA │ │ │ +00007850: 4c45 4e44 4152 2220 225c 6e50 524f 4449 LENDAR" "\nPRODI │ │ │ +00007860: 443a 2d2f 2f45 6d61 6373 2f2f 4e4f 4e53 D:-//Emacs//NONS │ │ │ +00007870: 474d 4c20 6963 616c 656e 6461 722e 656c GML icalendar.el │ │ │ +00007880: 2f2f 454e 2220 225c 6e56 4552 5349 4f4e //EN" "\nVERSION │ │ │ +00007890: 3a32 2e30 2220 225c 6e45 4e44 3a56 4341 :2.0" "\nEND:VCA │ │ │ +000078a0: 4c45 4e44 4152 5c6e 2220 7361 7665 2d62 LENDAR\n" save-b │ │ │ +000078b0: 7566 6665 7220 6275 7279 2d62 7566 6665 uffer bury-buffe │ │ │ +000078c0: 725d 2032 3620 2823 2420 2e20 3238 3630 r] 26 (#$ . 2860 │ │ │ +000078d0: 3929 2022 725c 6e46 4578 706f 7274 2064 9) "r\nFExport d │ │ │ +000078e0: 6961 7279 2064 6174 6120 696e 746f 2069 iary data into i │ │ │ +000078f0: 4361 6c65 6e64 6172 2066 696c 653a 2022 Calendar file: " │ │ │ +00007900: 5d29 0a23 4031 3938 2043 6f6e 7665 7274 ]).#@198 Convert │ │ │ +00007910: 2061 2064 6961 7279 2065 6e74 7279 2074 a diary entry t │ │ │ +00007920: 6f20 6943 616c 656e 6461 7220 666f 726d o iCalendar form │ │ │ +00007930: 6174 2e0a 4e4f 4e4d 4152 4b45 5220 6973 at..NONMARKER is │ │ │ +00007940: 2061 2072 6567 756c 6172 2065 7870 7265 a regular expre │ │ │ +00007950: 7373 696f 6e20 6d61 7463 6869 6e67 2074 ssion matching t │ │ │ +00007960: 6865 2073 7461 7274 206f 6620 6e6f 6e2d he start of non- │ │ │ +00007970: 6d61 726b 696e 670a 656e 7472 6965 732e marking.entries. │ │ │ +00007980: 2020 454e 5452 592d 4d41 494e 2069 7320 ENTRY-MAIN is │ │ │ +00007990: 7468 6520 6669 7273 7420 6c69 6e65 206f the first line o │ │ │ +000079a0: 6620 7468 6520 6469 6172 7920 656e 7472 f the diary entr │ │ │ +000079b0: 792e 0a0a 2866 6e20 4e4f 4e4d 4152 4b45 y...(fn NONMARKE │ │ │ +000079c0: 5220 454e 5452 592d 4d41 494e 291f 0a28 R ENTRY-MAIN)..( │ │ │ +000079d0: 6465 6661 6c69 6173 2027 6963 616c 656e defalias 'icalen │ │ │ +000079e0: 6461 722d 2d63 6f6e 7665 7274 2d74 6f2d dar--convert-to- │ │ │ +000079f0: 6963 616c 2023 5b35 3134 2022 085c 3230 ical #[514 ".\20 │ │ │ +00007a00: 3427 005c 3330 3102 025c 225c 3230 3646 4'.\301..\"\206F │ │ │ +00007a10: 005c 3330 3202 025c 225c 3230 3646 005c .\302..\"\206F.\ │ │ │ +00007a20: 3330 3302 025c 225c 3230 3646 005c 3330 303..\"\206F.\30 │ │ │ +00007a30: 3402 025c 225c 3230 3646 005c 3330 3502 4..\"\206F.\305. │ │ │ +00007a40: 025c 225c 3230 3646 005c 3330 3602 025c .\"\206F.\306..\ │ │ │ +00007a50: 225c 3230 3646 005c 3330 3702 025c 225c "\206F.\307..\"\ │ │ │ +00007a60: 3230 3646 005c 3331 3002 025c 225c 3230 206F.\310..\"\20 │ │ │ +00007a70: 3646 005c 3331 3102 025c 225c 3230 3646 6F.\311..\"\206F │ │ │ +00007a80: 005c 3331 325c 3331 3321 5c32 3037 2220 .\312\313!\207" │ │ │ +00007a90: 5b69 6361 6c65 6e64 6172 2d65 7870 6f72 [icalendar-expor │ │ │ +00007aa0: 742d 7365 7870 2d65 6e75 6d65 7261 7465 t-sexp-enumerate │ │ │ +00007ab0: 2d61 6c6c 2069 6361 6c65 6e64 6172 2d2d -all icalendar-- │ │ │ +00007ac0: 636f 6e76 6572 742d 616e 6e69 7665 7273 convert-annivers │ │ │ +00007ad0: 6172 792d 746f 2d69 6361 6c20 6963 616c ary-to-ical ical │ │ │ +00007ae0: 656e 6461 722d 2d63 6f6e 7665 7274 2d63 endar--convert-c │ │ │ +00007af0: 7963 6c69 632d 746f 2d69 6361 6c20 6963 yclic-to-ical ic │ │ │ +00007b00: 616c 656e 6461 722d 2d63 6f6e 7665 7274 alendar--convert │ │ │ +00007b10: 2d64 6174 652d 746f 2d69 6361 6c20 6963 -date-to-ical ic │ │ │ +00007b20: 616c 656e 6461 722d 2d63 6f6e 7665 7274 alendar--convert │ │ │ +00007b30: 2d66 6c6f 6174 2d74 6f2d 6963 616c 2069 -float-to-ical i │ │ │ +00007b40: 6361 6c65 6e64 6172 2d2d 636f 6e76 6572 calendar--conver │ │ │ +00007b50: 742d 626c 6f63 6b2d 746f 2d69 6361 6c20 t-block-to-ical │ │ │ +00007b60: 6963 616c 656e 6461 722d 2d63 6f6e 7665 icalendar--conve │ │ │ +00007b70: 7274 2d73 6578 702d 746f 2d69 6361 6c20 rt-sexp-to-ical │ │ │ +00007b80: 6963 616c 656e 6461 722d 2d63 6f6e 7665 icalendar--conve │ │ │ +00007b90: 7274 2d77 6565 6b6c 792d 746f 2d69 6361 rt-weekly-to-ica │ │ │ +00007ba0: 6c20 6963 616c 656e 6461 722d 2d63 6f6e l icalendar--con │ │ │ +00007bb0: 7665 7274 2d79 6561 726c 792d 746f 2d69 vert-yearly-to-i │ │ │ +00007bc0: 6361 6c20 6963 616c 656e 6461 722d 2d63 cal icalendar--c │ │ │ +00007bd0: 6f6e 7665 7274 2d6f 7264 696e 6172 792d onvert-ordinary- │ │ │ +00007be0: 746f 2d69 6361 6c20 6572 726f 7220 2243 to-ical error "C │ │ │ +00007bf0: 6f75 6c64 206e 6f74 2070 6172 7365 2065 ould not parse e │ │ │ +00007c00: 6e74 7279 225d 2035 2028 2324 202e 2033 ntry"] 5 (#$ . 3 │ │ │ +00007c10: 3039 3835 295d 290a 2340 3130 3820 5061 0985)]).#@108 Pa │ │ │ +00007c20: 7273 6520 5355 4d4d 4152 592d 414e 442d rse SUMMARY-AND- │ │ │ +00007c30: 5245 5354 2066 726f 6d20 6120 6469 6172 REST from a diar │ │ │ +00007c40: 7920 746f 2066 696c 6c20 6943 616c 656e y to fill iCalen │ │ │ +00007c50: 6461 7220 7072 6f70 6572 7469 6573 2e0a dar properties.. │ │ │ +00007c60: 5265 7475 726e 7320 616e 2061 6c69 7374 Returns an alist │ │ │ +00007c70: 2e0a 0a28 666e 2053 554d 4d41 5259 2d41 ...(fn SUMMARY-A │ │ │ +00007c80: 4e44 2d52 4553 5429 1f0a 2864 6566 616c ND-REST)..(defal │ │ │ +00007c90: 6961 7320 2769 6361 6c65 6e64 6172 2d2d ias 'icalendar-- │ │ │ +00007ca0: 7061 7273 652d 7375 6d6d 6172 792d 616e parse-summary-an │ │ │ +00007cb0: 642d 7265 7374 2023 5b32 3537 2022 5c33 d-rest #[257 "\3 │ │ │ +00007cc0: 3036 205c 3330 375c 3331 305c 3331 315c 06 \307\310\311\ │ │ │ +00007cd0: 3331 325c 3331 3305 215c 3331 345c 225c 312\313.!\314\"\ │ │ │ +00007ce0: 3331 3524 5c32 3136 5c33 3136 0821 3f5c 315$\216\316.!?\ │ │ │ +00007cf0: 3230 355c 3331 3002 5c33 3137 1908 435c 205\310.\317..C\ │ │ │ +00007d00: 3332 305c 3332 3108 5c22 5c32 3036 2100 320\321.\"\206!. │ │ │ +00007d10: 5c33 3232 5c33 3230 5c33 3233 085c 225c \322\320\323.\"\ │ │ │ +00007d20: 3230 3629 005c 3332 325c 3332 305c 3332 206).\322\320\32 │ │ │ +00007d30: 3408 5c22 5c32 3036 3100 5c33 3232 5c33 4.\"\2061.\322\3 │ │ │ +00007d40: 3230 5c33 3235 085c 225c 3230 3639 005c 20\325.\"\2069.\ │ │ │ +00007d50: 3332 325c 3332 305c 3332 3608 5c22 5c32 322\320\326.\"\2 │ │ │ +00007d60: 3036 4100 5c33 3232 5c33 3230 5c33 3237 06A.\322\320\327 │ │ │ +00007d70: 085c 225c 3230 3649 005c 3332 325c 3332 .\"\206I.\322\32 │ │ │ +00007d80: 305c 3333 3008 5c22 5c32 3036 5100 5c33 0\330.\"\206Q.\3 │ │ │ +00007d90: 3232 5c33 3230 5c33 3331 085c 225c 3230 22\320\331.\"\20 │ │ │ +00007da0: 3659 005c 3332 325c 3333 3206 0806 0806 6Y.\322\332..... │ │ │ +00007db0: 0806 0806 0706 0906 0806 085c 3235 3708 ...........\257. │ │ │ +00007dc0: 5c33 3333 5c22 5c33 3130 5c33 3137 5c32 \333\"\310\317\2 │ │ │ +00007dd0: 3131 5c32 3131 5c32 3131 5c32 3131 5c32 11\211\211\211\2 │ │ │ +00007de0: 3131 5c32 3131 0608 475c 3331 305c 3231 11\211..G\310\21 │ │ │ +00007df0: 3102 575c 3230 3378 015c 3231 3106 135c 1.W\203x.\211..\ │ │ │ +00007e00: 3331 3059 5c32 3033 5c32 3430 005c 3231 310Y\203\240.\21 │ │ │ +00007e10: 3106 5c66 3806 1455 5c32 3033 5c32 3430 1.\f8..U\203\240 │ │ │ +00007e20: 0006 5c6e 545c 3236 320b 5c33 3334 060b ..\nT\262.\334.. │ │ │ +00007e30: 5f5c 3236 325c 6e5c 3230 3270 0106 125c _\262\n\202p...\ │ │ │ +00007e40: 3331 3059 5c32 3033 5c32 3737 005c 3231 310Y\203\277.\21 │ │ │ +00007e50: 3106 5c66 3806 1355 5c32 3033 5c32 3737 1.\f8..U\203\277 │ │ │ +00007e60: 0006 5c6e 545c 3236 320b 5c33 3334 060b ..\nT\262.\334.. │ │ │ +00007e70: 5f5c 3236 3209 5c32 3032 7001 0611 5c33 _\262.\202p...\3 │ │ │ +00007e80: 3130 595c 3230 335c 3333 3600 5c32 3131 10Y\203\336.\211 │ │ │ +00007e90: 065c 6638 0612 555c 3230 335c 3333 3600 .\f8..U\203\336. │ │ │ +00007ea0: 065c 6e54 5c32 3632 0b5c 3333 3406 0b5f .\nT\262.\334.._ │ │ │ +00007eb0: 5c32 3632 085c 3230 3270 0106 105c 3331 \262.\202p...\31 │ │ │ +00007ec0: 3059 5c32 3033 5c33 3735 005c 3231 3106 0Y\203\375.\211. │ │ │ +00007ed0: 5c66 3806 1155 5c32 3033 5c33 3735 0006 \f8..U\203\375.. │ │ │ +00007ee0: 5c6e 545c 3236 320b 5c33 3334 060b 5f5c \nT\262.\334.._\ │ │ │ +00007ef0: 3236 3207 5c32 3032 7001 060e 5c33 3130 262.\202p...\310 │ │ │ +00007f00: 595c 3230 331c 015c 3231 3106 5c66 3806 Y\203..\211.\f8. │ │ │ +00007f10: 0f55 5c32 3033 1c01 065c 6e54 5c32 3632 .U\203...\nT\262 │ │ │ +00007f20: 0b5c 3333 3406 0b5f 5c32 3632 065c 3230 .\334.._\262.\20 │ │ │ +00007f30: 3270 0106 0f5c 3331 3059 5c32 3033 3501 2p...\310Y\2035. │ │ │ +00007f40: 5c32 3131 065c 6638 0610 555c 3230 3335 \211.\f8..U\2035 │ │ │ +00007f50: 0106 5c6e 545c 3236 320b 5c32 3032 7001 ..\nT\262.\202p. │ │ │ +00007f60: 060d 5c33 3130 595c 3230 3354 015c 3231 ..\310Y\203T.\21 │ │ │ +00007f70: 3106 5c66 3806 0e55 5c32 3033 5401 065c 1.\f8..U\203T..\ │ │ │ +00007f80: 6e54 5c32 3632 0b5c 3333 3406 0b5f 5c32 nT\262.\334.._\2 │ │ │ +00007f90: 3632 055c 3230 3270 0106 5c66 5c33 3130 62.\202p..\f\310 │ │ │ +00007fa0: 595c 3230 3370 015c 3231 3106 5c66 3806 Y\203p.\211.\f8. │ │ │ +00007fb0: 0d55 5c32 3033 7001 065c 6e54 5c32 3632 .U\203p..\nT\262 │ │ │ +00007fc0: 0b5c 3333 3406 0b5f 5c32 3632 045c 3231 .\334.._\262.\21 │ │ │ +00007fd0: 305c 3231 3154 5c32 3632 015c 3230 327a 0\211T\262.\202z │ │ │ +00007fe0: 005c 3236 3602 5c33 3335 5c33 3037 5c33 .\266.\335\307\3 │ │ │ +00007ff0: 3336 5c33 3337 5c33 3132 5c33 3133 0617 36\337\312\313.. │ │ │ +00008000: 215c 3334 305c 225c 3334 315c 3334 3225 !\340\"\341\342% │ │ │ +00008010: 5c33 3236 5c33 3433 5c6e 5c33 3434 5144 \326\343\n\344QD │ │ │ +00008020: 5c33 3231 5c33 3433 0b5c 3334 3451 445c \321\343.\344QD\ │ │ │ +00008030: 3332 335c 3334 335c 665c 3334 3451 445c 323\343\f\344QD\ │ │ │ +00008040: 3332 345c 3334 330d 5c33 3434 5144 5c33 324\343.\344QD\3 │ │ │ +00008050: 3235 5c33 3433 0e32 5c33 3434 5144 5c33 25\343.2\344QD\3 │ │ │ +00008060: 3237 5c33 3433 0e33 5c33 3434 5144 5c33 27\343.3\344QD\3 │ │ │ +00008070: 3330 5c33 3433 0e34 5c33 3434 5144 5c33 30\343.4\344QD\3 │ │ │ +00008080: 3331 5c33 3433 0e35 5c33 3434 5144 5c32 31\343.5\344QD\2 │ │ │ +00008090: 3537 085c 225c 3231 3006 115c 3334 355c 57.\"\210..\345\ │ │ │ +000080a0: 3334 365c 3332 365c 3334 3706 165c 3234 346\326\347..\24 │ │ │ +000080b0: 325c 3331 375c 3335 3025 5c33 3531 515c 2\317\350%\351Q\ │ │ │ +000080c0: 3234 305c 3231 305c 3332 3006 125c 3234 240\210\320..\24 │ │ │ +000080d0: 3206 155c 225c 3230 355c 3330 3502 5c33 2..\"\205\305.\3 │ │ │ +000080e0: 3137 5c32 3131 5c32 3131 5c32 3131 5c32 17\211\211\211\2 │ │ │ +000080f0: 3131 5c32 3131 5c32 3131 060d 5c32 3033 11\211\211..\203 │ │ │ +00008100: 5c33 3730 0106 0d5c 3232 345c 3230 335c \370...\224\203\ │ │ │ +00008110: 3337 3001 5c33 3532 061b 060f 5c32 3234 370.\352....\224 │ │ │ +00008120: 0610 5c32 3235 235c 3236 3207 065c 665c ..\225#\262..\f\ │ │ │ +00008130: 3230 330f 0206 5c66 5c32 3234 5c32 3033 203...\f\224\203 │ │ │ +00008140: 0f02 5c33 3532 061b 060e 5c32 3234 060f ..\352....\224.. │ │ │ +00008150: 5c32 3235 235c 3236 3206 060b 5c32 3033 \225#\262...\203 │ │ │ +00008160: 2602 060b 5c32 3234 5c32 3033 2602 5c33 &...\224\203&.\3 │ │ │ +00008170: 3532 061b 060d 5c32 3234 060e 5c32 3235 52....\224..\225 │ │ │ +00008180: 235c 3236 3205 065c 6e5c 3230 333d 0206 #\262..\n\203=.. │ │ │ +00008190: 5c6e 5c32 3234 5c32 3033 3d02 5c33 3532 \n\224\203=.\352 │ │ │ +000081a0: 061b 065c 665c 3232 3406 0d5c 3232 3523 ...\f\224..\225# │ │ │ +000081b0: 5c32 3632 0406 095c 3230 3354 0206 095c \262...\203T...\ │ │ │ +000081c0: 3232 345c 3230 3354 025c 3335 3206 1b06 224\203T.\352... │ │ │ +000081d0: 0b5c 3232 3406 5c66 5c32 3235 235c 3236 .\224.\f\225#\26 │ │ │ +000081e0: 3203 0608 5c32 3033 6b02 0608 5c32 3234 2...\203k...\224 │ │ │ +000081f0: 5c32 3033 6b02 5c33 3532 061b 065c 6e5c \203k.\352...\n\ │ │ │ +00008200: 3232 3406 0b5c 3232 3523 5c32 3632 0206 224..\225#\262.. │ │ │ +00008210: 075c 3230 335c 3230 3202 0607 5c32 3234 .\203\202...\224 │ │ │ +00008220: 5c32 3033 5c32 3032 025c 3335 3206 1b06 \203\202.\352... │ │ │ +00008230: 095c 3232 3406 5c6e 5c32 3235 235c 3236 .\224.\n\225#\26 │ │ │ +00008240: 3201 0606 5c32 3035 5c32 3133 025c 3335 2...\205\213.\35 │ │ │ +00008250: 3306 0742 0606 5c32 3035 5c32 3234 025c 3..B..\205\224.\ │ │ │ +00008260: 3335 3406 0742 0606 5c32 3035 5c32 3335 354..B..\205\235 │ │ │ +00008270: 025c 3335 3506 0742 0606 5c32 3035 5c32 .\355..B..\205\2 │ │ │ +00008280: 3436 025c 3335 3606 0742 0606 5c32 3035 46.\356..B..\205 │ │ │ +00008290: 5c32 3537 025c 3335 3706 0742 0606 5c32 \257.\357..B..\2 │ │ │ +000082a0: 3035 5c32 3730 025c 3336 3006 0742 0606 05\270.\360..B.. │ │ │ +000082b0: 5c32 3035 5c33 3031 025c 3336 3106 0742 \205\301.\361..B │ │ │ +000082c0: 5c32 3537 075c 3236 365c 3230 3729 5c32 \257.\266\207)\2 │ │ │ +000082d0: 3636 5c32 3232 295c 3230 3722 205b 6963 66\222)\207" [ic │ │ │ +000082e0: 616c 656e 6461 722d 696d 706f 7274 2d66 alendar-import-f │ │ │ +000082f0: 6f72 6d61 7420 6361 7365 2d66 6f6c 642d ormat case-fold- │ │ │ +00008300: 7365 6172 6368 2069 6361 6c65 6e64 6172 search icalendar │ │ │ +00008310: 2d69 6d70 6f72 742d 666f 726d 6174 2d73 -import-format-s │ │ │ +00008320: 756d 6d61 7279 2069 6361 6c65 6e64 6172 ummary icalendar │ │ │ +00008330: 2d69 6d70 6f72 742d 666f 726d 6174 2d63 -import-format-c │ │ │ +00008340: 6c61 7373 2069 6361 6c65 6e64 6172 2d69 lass icalendar-i │ │ │ +00008350: 6d70 6f72 742d 666f 726d 6174 2d64 6573 mport-format-des │ │ │ +00008360: 6372 6970 7469 6f6e 2069 6361 6c65 6e64 cription icalend │ │ │ +00008370: 6172 2d69 6d70 6f72 742d 666f 726d 6174 ar-import-format │ │ │ +00008380: 2d6c 6f63 6174 696f 6e20 6d61 7463 682d -location match- │ │ │ +00008390: 6461 7461 206d 616b 652d 6279 7465 2d63 data make-byte-c │ │ │ +000083a0: 6f64 6520 3020 225c 3330 315c 3330 305c ode 0 "\301\300\ │ │ │ +000083b0: 3330 325c 225c 3230 3722 2076 636f 6e63 302\"\207" vconc │ │ │ +000083c0: 6174 2076 6563 746f 7220 5b73 6574 2d6d at vector [set-m │ │ │ +000083d0: 6174 6368 2d64 6174 6120 6576 6170 6f72 atch-data evapor │ │ │ +000083e0: 6174 655d 2033 2066 756e 6374 696f 6e70 ate] 3 functionp │ │ │ +000083f0: 206e 696c 2073 7472 696e 672d 6d61 7463 nil string-matc │ │ │ +00008400: 6820 2225 6322 202d 3120 2225 6422 2022 h "%c" -1 "%d" " │ │ │ +00008410: 256c 2220 2225 6f22 2022 2573 2220 2225 %l" "%o" "%s" "% │ │ │ +00008420: 7422 2022 2575 2220 2225 5522 2073 6f72 t" "%u" "%U" sor │ │ │ +00008430: 7420 3c20 3220 6d61 7063 2032 3537 2022 t < 2 mapc 257 " │ │ │ +00008440: 5c33 3030 5c33 3031 0240 0341 405c 3330 \300\301.@.A@\30 │ │ │ +00008450: 305c 3234 325c 3330 325c 3231 3125 5c32 0\242\302\211%\2 │ │ │ +00008460: 3430 5c32 3037 2220 5b72 6570 6c61 6365 40\207" [replace │ │ │ +00008470: 2d72 6567 6578 702d 696e 2d73 7472 696e -regexp-in-strin │ │ │ +00008480: 6720 745d 2038 2022 5c6e 5c6e 2866 6e20 g t] 8 "\n\n(fn │ │ │ +00008490: 494a 2922 2022 5c5c 2822 2022 5c5c 293f IJ)" "\\(" "\\)? │ │ │ +000084a0: 3f22 2022 5c5c 6022 2072 6570 6c61 6365 ?" "\\`" replace │ │ │ +000084b0: 2d72 6567 6578 702d 696e 2d73 7472 696e -regexp-in-strin │ │ │ +000084c0: 6720 225c 5c28 2e2a 3f5c 5c29 2220 7420 g "\\(.*?\\)" t │ │ │ +000084d0: 225c 5c27 2220 7375 6273 7472 696e 6720 "\\'" substring │ │ │ +000084e0: 636c 6120 6465 7320 6c6f 6320 6f72 6720 cla des loc org │ │ │ +000084f0: 7374 6120 7572 6c20 7569 6420 6963 616c sta url uid ical │ │ │ +00008500: 656e 6461 722d 696d 706f 7274 2d66 6f72 endar-import-for │ │ │ +00008510: 6d61 742d 6f72 6761 6e69 7a65 7220 6963 mat-organizer ic │ │ │ +00008520: 616c 656e 6461 722d 696d 706f 7274 2d66 alendar-import-f │ │ │ +00008530: 6f72 6d61 742d 7374 6174 7573 2069 6361 ormat-status ica │ │ │ +00008540: 6c65 6e64 6172 2d69 6d70 6f72 742d 666f lendar-import-fo │ │ │ +00008550: 726d 6174 2d75 726c 2069 6361 6c65 6e64 rmat-url icalend │ │ │ +00008560: 6172 2d69 6d70 6f72 742d 666f 726d 6174 ar-import-format │ │ │ +00008570: 2d75 6964 5d20 3335 2028 2324 202e 2033 -uid] 35 (#$ . 3 │ │ │ +00008580: 3137 3734 295d 290a 2340 3539 2052 6574 1774)]).#@59 Ret │ │ │ +00008590: 7572 6e20 5641 4c41 524d 2062 6c6f 636b urn VALARM block │ │ │ +000085a0: 7320 666f 7220 7468 6520 6769 7665 6e20 s for the given │ │ │ +000085b0: 5355 4d4d 4152 592e 0a0a 2866 6e20 5355 SUMMARY...(fn SU │ │ │ +000085c0: 4d4d 4152 5929 1f0a 2864 6566 616c 6961 MMARY)..(defalia │ │ │ +000085d0: 7320 2769 6361 6c65 6e64 6172 2d2d 6372 s 'icalendar--cr │ │ │ +000085e0: 6561 7465 2d69 6361 6c2d 616c 6172 6d20 eate-ical-alarm │ │ │ +000085f0: 235b 3235 3720 2208 5c32 3035 1f00 0840 #[257 ".\205...@ │ │ │ +00008600: 0841 405c 3330 315c 3330 325c 3330 335c .A@\301\302\303\ │ │ │ +00008610: 3330 345c 3330 3506 0706 075c 225c 3330 304\305....\"\30 │ │ │ +00008620: 365c 225c 3330 375c 3331 3025 5c33 3131 6\"\307\310%\311 │ │ │ +00008630: 0103 5c33 3132 235c 3236 365c 3230 335c ..\312#\266\203\ │ │ │ +00008640: 3230 3722 205b 6963 616c 656e 6461 722d 207" [icalendar- │ │ │ +00008650: 6578 706f 7274 2d61 6c61 726d 7320 6d61 export-alarms ma │ │ │ +00008660: 6b65 2d62 7974 652d 636f 6465 2032 3537 ke-byte-code 257 │ │ │ +00008670: 2022 5c33 3032 5c33 3031 025c 3330 3023 "\302\301.\300# │ │ │ +00008680: 5c32 3037 2220 7663 6f6e 6361 7420 7665 \207" vconcat ve │ │ │ +00008690: 6374 6f72 205b 6963 616c 656e 6461 722d ctor [icalendar- │ │ │ +000086a0: 2d64 6f2d 6372 6561 7465 2d69 6361 6c2d -do-create-ical- │ │ │ +000086b0: 616c 6172 6d5d 2035 2022 5c6e 5c6e 2866 alarm] 5 "\n\n(f │ │ │ +000086c0: 6e20 5350 4543 2922 206d 6170 636f 6e63 n SPEC)" mapconc │ │ │ +000086d0: 6174 2022 225d 2031 3020 2823 2420 2e20 at ""] 10 (#$ . │ │ │ +000086e0: 3334 3138 3929 5d29 0a23 4033 3831 2052 34189)]).#@381 R │ │ │ +000086f0: 6574 7572 6e20 6120 5641 4c41 524d 2062 eturn a VALARM b │ │ │ +00008700: 6c6f 636b 2e0a 4172 6775 6d65 6e74 2041 lock..Argument A │ │ │ +00008710: 4456 414e 4345 2d54 494d 4520 6973 2061 DVANCE-TIME is a │ │ │ +00008720: 206e 756d 6265 7220 6769 7669 6e67 2074 number giving t │ │ │ +00008730: 6865 2074 696d 6520 7768 656e 2074 6865 he time when the │ │ │ +00008740: 2061 6c61 726d 0a66 6972 6573 2028 6d69 alarm.fires (mi │ │ │ +00008750: 6e75 7465 7320 6265 666f 7265 2074 6865 nutes before the │ │ │ +00008760: 2072 6573 7065 6374 6976 6520 6576 656e respective even │ │ │ +00008770: 7429 2e20 2041 7267 756d 656e 7420 414c t). Argument AL │ │ │ +00008780: 4152 4d2d 5350 4543 0a69 7320 6120 6c69 ARM-SPEC.is a li │ │ │ +00008790: 7374 2077 6869 6368 206d 7573 7420 6265 st which must be │ │ │ +000087a0: 206f 6e65 206f 6620 2861 7564 696f 292c one of (audio), │ │ │ +000087b0: 2028 6469 7370 6c61 7929 206f 720a 2865 (display) or.(e │ │ │ +000087c0: 6d61 696c 2028 4144 4452 4553 5331 202e mail (ADDRESS1 . │ │ │ +000087d0: 2e2e 2929 2c20 7365 6520 6069 6361 6c65 ..)), see `icale │ │ │ +000087e0: 6e64 6172 2d65 7870 6f72 742d 616c 6172 ndar-export-alar │ │ │ +000087f0: 6d73 272e 2020 4172 6775 6d65 6e74 0a53 ms'. Argument.S │ │ │ +00008800: 554d 4d41 5259 2069 7320 6120 7374 7269 UMMARY is a stri │ │ │ +00008810: 6e67 2077 6869 6368 2063 6f6e 7461 696e ng which contain │ │ │ +00008820: 7320 6120 7368 6f72 7420 6465 7363 7269 s a short descri │ │ │ +00008830: 7074 696f 6e20 666f 7220 7468 650a 616c ption for the.al │ │ │ +00008840: 6172 6d2e 0a0a 2866 6e20 4144 5641 4e43 arm...(fn ADVANC │ │ │ +00008850: 452d 5449 4d45 2041 4c41 524d 2d53 5045 E-TIME ALARM-SPE │ │ │ +00008860: 4320 5355 4d4d 4152 5929 1f0a 2864 6566 C SUMMARY)..(def │ │ │ +00008870: 616c 6961 7320 2769 6361 6c65 6e64 6172 alias 'icalendar │ │ │ +00008880: 2d2d 646f 2d63 7265 6174 652d 6963 616c --do-create-ical │ │ │ +00008890: 2d61 6c61 726d 2023 5b37 3731 2022 0140 -alarm #[771 ".@ │ │ │ +000088a0: 5c33 3030 5c33 3031 5c33 3032 035c 3330 \300\301\302.\30 │ │ │ +000088b0: 335c 2241 5c22 5c33 3030 5c33 3034 0606 3\"A\"\300\304.. │ │ │ +000088c0: 5c22 025c 3330 353e 5c32 3033 1c00 5c33 \".\305>\203..\3 │ │ │ +000088d0: 3030 5c33 3036 055c 225c 3230 321d 005c 00\306.\"\202..\ │ │ │ +000088e0: 3330 3703 5c33 3130 3d5c 3230 332b 005c 307.\310=\203+.\ │ │ │ +000088f0: 3330 305c 3331 3106 065c 225c 3230 322c 300\311..\"\202, │ │ │ +00008900: 005c 3330 3704 5c33 3130 3d5c 3230 333d .\307.\310=\203= │ │ │ +00008910: 005c 3331 325c 3331 3306 0841 405c 3330 .\312\313..A@\30 │ │ │ +00008920: 3723 5c32 3032 3e00 5c33 3037 5c33 3134 7#\202>.\307\314 │ │ │ +00008930: 0505 0505 055c 3331 355c 3236 3007 5c32 .....\315\260.\2 │ │ │ +00008940: 3037 2220 5b66 6f72 6d61 7420 225c 6e41 07" [format "\nA │ │ │ +00008950: 4354 494f 4e3a 2573 2220 6173 736f 6320 CTION:%s" assoc │ │ │ +00008960: 2828 6175 6469 6f20 2e20 2241 5544 494f ((audio . "AUDIO │ │ │ +00008970: 2229 2028 6469 7370 6c61 7920 2e20 2244 ") (display . "D │ │ │ +00008980: 4953 504c 4159 2229 2028 656d 6169 6c20 ISPLAY") (email │ │ │ +00008990: 2e20 2245 4d41 494c 2229 2920 225c 6e54 . "EMAIL")) "\nT │ │ │ +000089a0: 5249 4747 4552 3a2d 5054 2564 4d22 2028 RIGGER:-PT%dM" ( │ │ │ +000089b0: 6469 7370 6c61 7920 656d 6169 6c29 2022 display email) " │ │ │ +000089c0: 5c6e 4445 5343 5249 5054 494f 4e3a 2573 \nDESCRIPTION:%s │ │ │ +000089d0: 2220 2222 2065 6d61 696c 2022 5c6e 5355 " "" email "\nSU │ │ │ +000089e0: 4d4d 4152 593a 2573 2220 6d61 7063 6f6e MMARY:%s" mapcon │ │ │ +000089f0: 6361 7420 235b 3235 3720 225c 3330 305c cat #[257 "\300\ │ │ │ +00008a00: 3330 3102 5c22 5c32 3037 2220 5b66 6f72 301.\"\207" [for │ │ │ +00008a10: 6d61 7420 225c 6e41 5454 454e 4445 453a mat "\nATTENDEE: │ │ │ +00008a20: 4d41 494c 544f 3a25 7322 5d20 3420 225c MAILTO:%s"] 4 "\ │ │ │ +00008a30: 6e5c 6e28 666e 2049 2922 5d20 225c 6e42 n\n(fn I)"] "\nB │ │ │ +00008a40: 4547 494e 3a56 414c 4152 4d22 2022 5c6e EGIN:VALARM" "\n │ │ │ +00008a50: 454e 443a 5641 4c41 524d 225d 2031 3620 END:VALARM"] 16 │ │ │ +00008a60: 2823 2420 2e20 3334 3534 3329 5d29 0a23 (#$ . 34543)]).# │ │ │ +00008a70: 4032 3037 2043 6f6e 7665 7274 2022 6f72 @207 Convert "or │ │ │ +00008a80: 6469 6e61 7279 2220 6469 6172 7920 656e dinary" diary en │ │ │ +00008a90: 7472 7920 746f 2069 4361 6c65 6e64 6172 try to iCalendar │ │ │ +00008aa0: 2066 6f72 6d61 742e 0a4e 4f4e 4d41 524b format..NONMARK │ │ │ +00008ab0: 4552 2069 7320 6120 7265 6775 6c61 7220 ER is a regular │ │ │ +00008ac0: 6578 7072 6573 7369 6f6e 206d 6174 6368 expression match │ │ │ +00008ad0: 696e 6720 7468 6520 7374 6172 7420 6f66 ing the start of │ │ │ +00008ae0: 206e 6f6e 2d6d 6172 6b69 6e67 0a65 6e74 non-marking.ent │ │ │ +00008af0: 7269 6573 2e20 2045 4e54 5259 2d4d 4149 ries. ENTRY-MAI │ │ │ +00008b00: 4e20 6973 2074 6865 2066 6972 7374 206c N is the first l │ │ │ +00008b10: 696e 6520 6f66 2074 6865 2064 6961 7279 ine of the diary │ │ │ +00008b20: 2065 6e74 7279 2e0a 0a28 666e 204e 4f4e entry...(fn NON │ │ │ +00008b30: 4d41 524b 4552 2045 4e54 5259 2d4d 4149 MARKER ENTRY-MAI │ │ │ +00008b40: 4e29 1f0a 2864 6566 616c 6961 7320 2769 N)..(defalias 'i │ │ │ +00008b50: 6361 6c65 6e64 6172 2d2d 636f 6e76 6572 calendar--conver │ │ │ +00008b60: 742d 6f72 6469 6e61 7279 2d74 6f2d 6963 t-ordinary-to-ic │ │ │ +00008b70: 616c 2023 5b35 3134 2022 5c33 3030 025c al #[514 "\300.\ │ │ │ +00008b80: 3330 3150 025c 225c 3230 355c 3331 3200 301P.\"\205\312. │ │ │ +00008b90: 5c33 3032 015c 3330 335c 3232 345c 3330 \302.\303\224\30 │ │ │ +00008ba0: 335c 3232 3523 5c33 3034 0121 5c33 3034 3\225#\304.!\304 │ │ │ +00008bb0: 025c 3330 335c 225c 3330 355c 3330 365c .\303\"\305\306\ │ │ │ +00008bc0: 3330 375c 3232 345c 3230 3526 005c 3330 307\224\205&.\30 │ │ │ +00008bd0: 3206 065c 3330 375c 3232 345c 3330 375c 2..\307\224\307\ │ │ │ +00008be0: 3232 3523 5c33 3130 5c32 3234 5c32 3035 225#\310\224\205 │ │ │ +00008bf0: 3300 5c33 3032 0607 5c33 3130 5c32 3234 3.\302..\310\224 │ │ │ +00008c00: 5c33 3130 5c32 3235 235c 225c 3330 365c \310\225#\"\306\ │ │ │ +00008c10: 3331 315c 3232 345c 3230 3542 005c 3330 311\224\205B.\30 │ │ │ +00008c20: 3206 075c 3331 315c 3232 345c 3331 315c 2..\311\224\311\ │ │ │ +00008c30: 3232 3523 5c33 3132 5c32 3234 5c32 3035 225#\312\224\205 │ │ │ +00008c40: 4f00 5c33 3032 0608 5c33 3132 5c32 3234 O.\302..\312\224 │ │ │ +00008c50: 5c33 3132 5c32 3235 235c 225c 3331 335c \312\225#\"\313\ │ │ │ +00008c60: 3330 3206 085c 3331 345c 3232 345c 3331 302..\314\224\31 │ │ │ +00008c70: 345c 3232 3523 215c 3331 355c 3331 3606 4\225#!\315\316. │ │ │ +00008c80: 095c 225c 3231 3005 5c32 3034 6800 5c33 .\"\210.\204h.\3 │ │ │ +00008c90: 3137 5c33 3230 215c 3231 3002 5c32 3033 17\320!\210.\203 │ │ │ +00008ca0: 7000 055c 3230 3271 0004 5c32 3632 0402 p..\202q..\262.. │ │ │ +00008cb0: 5c32 3033 5c32 3430 0001 5c32 3034 5c32 \203\240..\204\2 │ │ │ +00008cc0: 3430 005c 3332 315c 3332 325c 3332 335c 40.\321\322\323\ │ │ │ +00008cd0: 3332 3406 0623 215c 3231 315c 3332 3557 324..#!\211\325W │ │ │ +00008ce0: 5c32 3033 5c32 3234 005c 3332 365c 3332 \203\224.\326\32 │ │ │ +00008cf0: 375c 3333 3003 5c5c 5c22 5c32 3632 035c 7\330.\\\"\262.\ │ │ │ +00008d00: 3230 325c 3233 3700 5c33 3236 5c33 3237 202\237.\326\327 │ │ │ +00008d10: 025c 3332 355a 5c22 5c32 3632 0305 5c32 .\325Z\"\262..\2 │ │ │ +00008d20: 3632 055c 3231 305c 3333 3103 5c32 3033 62.\210\331.\203 │ │ │ +00008d30: 5c32 3531 005c 3333 325c 3230 325c 3235 \251.\332\202\25 │ │ │ +00008d40: 3200 5c33 3333 0607 055c 3230 365c 3236 2.\333...\206\26 │ │ │ +00008d50: 3100 5c33 3234 5c33 3334 0606 5c32 3033 1.\324\334..\203 │ │ │ +00008d60: 5c32 3733 005c 3333 325c 3230 325c 3237 \273.\332\202\27 │ │ │ +00008d70: 3400 5c33 3333 0609 0608 5c32 3036 5c33 4.\333....\206\3 │ │ │ +00008d80: 3034 005c 3332 345c 3236 3008 0142 5c32 04.\324\260..B\2 │ │ │ +00008d90: 3636 5c32 3037 5c32 3037 2220 5b73 7472 66\207\207" [str │ │ │ +00008da0: 696e 672d 6d61 7463 6820 225c 5c28 5b5e ing-match "\\([^ │ │ │ +00008db0: 202f 5d2b 5b20 2f5d 2b5b 5e20 2f5d 2b5b /]+[ /]+[^ /]+[ │ │ │ +00008dc0: 202f 5d2b 5b5e 205d 2b5c 5c29 5c5c 732d /]+[^ ]+\\)\\s- │ │ │ +00008dd0: 2a5c 5c28 5c5c 285b 302d 395d 5b30 2d39 *\\(\\([0-9][0-9 │ │ │ +00008de0: 5d3f 5c5c 283a 5b30 2d39 5d5b 302d 395d ]?\\(:[0-9][0-9] │ │ │ +00008df0: 5c5c 293f 5c5c 295c 5c28 5b61 705d 6d5c \\)?\\)\\([ap]m\ │ │ │ +00008e00: 5c29 3f5c 5c28 2d5c 5c28 5b30 2d39 5d5b \)?\\(-\\([0-9][ │ │ │ +00008e10: 302d 395d 3f5c 5c28 3a5b 302d 395d 5b30 0-9]?\\(:[0-9][0 │ │ │ +00008e20: 2d39 5d5c 5c29 3f5c 5c29 5c5c 285b 6170 -9]\\)?\\)\\([ap │ │ │ +00008e30: 5d6d 5c5c 293f 5c5c 293f 5c5c 293f 5c5c ]m\\)?\\)?\\)?\\ │ │ │ +00008e40: 732d 2a5c 5c28 2e2a 3f5c 5c29 203f 2422 s-*\\(.*?\\) ?$" │ │ │ +00008e50: 2073 7562 7374 7269 6e67 2031 2069 6361 substring 1 ica │ │ │ +00008e60: 6c65 6e64 6172 2d2d 6461 7465 7374 7269 lendar--datestri │ │ │ +00008e70: 6e67 2d74 6f2d 6973 6f64 6174 6520 6e69 ng-to-isodate ni │ │ │ +00008e80: 6c20 6963 616c 656e 6461 722d 2d64 6961 l icalendar--dia │ │ │ +00008e90: 7279 7469 6d65 2d74 6f2d 6973 6f74 696d rytime-to-isotim │ │ │ +00008ea0: 6520 3320 3520 3720 3920 6963 616c 656e e 3 5 7 9 icalen │ │ │ +00008eb0: 6461 722d 2d63 6f6e 7665 7274 2d73 7472 dar--convert-str │ │ │ +00008ec0: 696e 672d 666f 722d 6578 706f 7274 2031 ing-for-export 1 │ │ │ +00008ed0: 3020 6963 616c 656e 6461 722d 2d64 6d73 0 icalendar--dms │ │ │ +00008ee0: 6720 226f 7264 696e 6172 7920 2573 2220 g "ordinary %s" │ │ │ +00008ef0: 6572 726f 7220 2243 6f75 6c64 206e 6f74 error "Could not │ │ │ +00008f00: 2070 6172 7365 2064 6174 6522 2072 6561 parse date" rea │ │ │ +00008f10: 6420 7265 706c 6163 652d 7265 6765 7870 d replace-regexp │ │ │ +00008f20: 2d69 6e2d 7374 7269 6e67 2022 5e54 303f -in-string "^T0? │ │ │ +00008f30: 2220 2222 2032 3330 3030 3020 666f 726d " "" 230000 form │ │ │ +00008f40: 6174 2022 5425 3036 6422 2031 3030 3030 at "T%06d" 10000 │ │ │ +00008f50: 2022 5c6e 4454 5354 4152 543b 2220 2256 "\nDTSTART;" "V │ │ │ +00008f60: 414c 5545 3d44 4154 452d 5449 4d45 3a22 ALUE=DATE-TIME:" │ │ │ +00008f70: 2022 5641 4c55 453d 4441 5445 3a22 2022 "VALUE=DATE:" " │ │ │ +00008f80: 5c6e 4454 454e 443b 225d 2031 3720 2823 \nDTEND;"] 17 (# │ │ │ +00008f90: 2420 2e20 3335 3434 3529 5d29 0a23 4039 $ . 35445)]).#@9 │ │ │ +00008fa0: 3220 4669 6e64 2074 6865 2066 6972 7374 2 Find the first │ │ │ +00008fb0: 2041 4242 5245 5657 4545 4b44 4159 2069 ABBREVWEEKDAY i │ │ │ +00008fc0: 6e20 6120 6769 7665 6e20 5945 4152 2e0a n a given YEAR.. │ │ │ +00008fd0: 5265 7475 726e 7320 6461 7920 6e75 6d62 Returns day numb │ │ │ +00008fe0: 6572 2e0a 0a28 666e 2041 4242 5245 5657 er...(fn ABBREVW │ │ │ +00008ff0: 4545 4b44 4159 2059 4541 5229 1f0a 2864 EEKDAY YEAR)..(d │ │ │ +00009000: 6566 616c 6961 7320 2769 6361 6c65 6e64 efalias 'icalend │ │ │ +00009010: 6172 2d66 6972 7374 2d77 6565 6b64 6179 ar-first-weekday │ │ │ +00009020: 2d6f 662d 7965 6172 2023 5b35 3134 2022 -of-year #[514 " │ │ │ +00009030: 5c33 3030 5c33 3031 5c32 3131 0345 215c \300\301\211.E!\ │ │ │ +00009040: 3330 3203 2101 5a54 5c32 3131 5c33 3033 302.!.ZT\211\303 │ │ │ +00009050: 585c 3230 331a 005c 3231 315c 3330 345c X\203..\211\304\ │ │ │ +00009060: 5c5c 3236 3201 5c32 3032 2500 5c32 3131 \\262.\202%.\211 │ │ │ +00009070: 5c33 3034 565c 3230 3325 005c 3231 315c \304V\203%.\211\ │ │ │ +00009080: 3330 345a 5c32 3632 015c 3230 3722 205b 304Z\262.\207" [ │ │ │ +00009090: 6361 6c65 6e64 6172 2d64 6179 2d6f 662d calendar-day-of- │ │ │ +000090a0: 7765 656b 2031 2069 6361 6c65 6e64 6172 week 1 icalendar │ │ │ +000090b0: 2d2d 6765 742d 7765 656b 6461 792d 6e75 --get-weekday-nu │ │ │ +000090c0: 6d62 6572 2030 2037 5d20 3620 2823 2420 mber 0 7] 6 (#$ │ │ │ +000090d0: 2e20 3336 3737 3029 5d29 0a23 4032 3033 . 36770)]).#@203 │ │ │ +000090e0: 2043 6f6e 7665 7274 2077 6565 6b6c 7920 Convert weekly │ │ │ +000090f0: 6469 6172 7920 656e 7472 7920 746f 2069 diary entry to i │ │ │ +00009100: 4361 6c65 6e64 6172 2066 6f72 6d61 742e Calendar format. │ │ │ +00009110: 0a4e 4f4e 4d41 524b 4552 2069 7320 6120 .NONMARKER is a │ │ │ +00009120: 7265 6775 6c61 7220 6578 7072 6573 7369 regular expressi │ │ │ +00009130: 6f6e 206d 6174 6368 696e 6720 7468 6520 on matching the │ │ │ +00009140: 7374 6172 7420 6f66 206e 6f6e 2d6d 6172 start of non-mar │ │ │ +00009150: 6b69 6e67 0a65 6e74 7269 6573 2e20 2045 king.entries. E │ │ │ +00009160: 4e54 5259 2d4d 4149 4e20 6973 2074 6865 NTRY-MAIN is the │ │ │ +00009170: 2066 6972 7374 206c 696e 6520 6f66 2074 first line of t │ │ │ +00009180: 6865 2064 6961 7279 2065 6e74 7279 2e0a he diary entry.. │ │ │ +00009190: 0a28 666e 204e 4f4e 4d41 524b 4552 2045 .(fn NONMARKER E │ │ │ +000091a0: 4e54 5259 2d4d 4149 4e29 1f0a 2864 6566 NTRY-MAIN)..(def │ │ │ +000091b0: 616c 6961 7320 2769 6361 6c65 6e64 6172 alias 'icalendar │ │ │ +000091c0: 2d2d 636f 6e76 6572 742d 7765 656b 6c79 --convert-weekly │ │ │ +000091d0: 2d74 6f2d 6963 616c 2023 5b35 3134 2022 -to-ical #[514 " │ │ │ +000091e0: 5c33 3031 025c 3330 3250 025c 225c 3230 \301.\302P.\"\20 │ │ │ +000091f0: 355c 3330 3200 5c33 3033 5c33 3034 025c 5\302.\303\304.\ │ │ │ +00009200: 3330 355c 3232 345c 3330 355c 3232 3523 305\224\305\225# │ │ │ +00009210: 215c 3230 355c 3330 3200 5c33 3033 5c33 !\205\302.\303\3 │ │ │ +00009220: 3034 025c 3330 355c 3232 345c 3330 355c 04.\305\224\305\ │ │ │ +00009230: 3232 3523 215c 3330 365c 3330 375c 3232 225#!\306\307\22 │ │ │ +00009240: 345c 3230 352b 005c 3330 3403 5c33 3037 4\205+.\304.\307 │ │ │ +00009250: 5c32 3234 5c33 3037 5c32 3235 235c 3331 \224\307\225#\31 │ │ │ +00009260: 305c 3232 345c 3230 3537 005c 3330 3404 0\224\2057.\304. │ │ │ +00009270: 5c33 3130 5c32 3234 5c33 3130 5c32 3235 \310\224\310\225 │ │ │ +00009280: 235c 225c 3330 365c 3331 315c 3232 345c #\"\306\311\224\ │ │ │ +00009290: 3230 3545 005c 3330 3404 5c33 3131 5c32 205E.\304.\311\2 │ │ │ +000092a0: 3234 5c33 3131 5c32 3235 235c 3331 325c 24\311\225#\312\ │ │ │ +000092b0: 3232 345c 3230 3551 005c 3330 3405 5c33 224\205Q.\304.\3 │ │ │ +000092c0: 3132 5c32 3234 5c33 3132 5c32 3235 235c 12\224\312\225#\ │ │ │ +000092d0: 225c 3331 335c 3330 3405 5c33 3134 5c32 "\313\304.\314\2 │ │ │ +000092e0: 3234 5c33 3134 5c32 3235 2321 5c33 3135 24\314\225#!\315 │ │ │ +000092f0: 5c33 3136 0606 5c22 5c32 3130 025c 3230 \316..\"\210.\20 │ │ │ +00009300: 337a 0001 5c32 3034 7a00 5c33 3137 5c33 3z..\204z.\317\3 │ │ │ +00009310: 3230 5c33 3231 5c33 3232 0606 2321 5c33 20\321\322..#!\3 │ │ │ +00009320: 3233 5c33 3234 5c33 3235 035c 5c5c 225c 23\324\325.\\\"\ │ │ │ +00009330: 3236 3203 5c32 3130 5c33 3236 035c 3230 262.\210\326.\20 │ │ │ +00009340: 335c 3230 3300 5c33 3237 5c32 3032 5c32 3\203.\327\202\2 │ │ │ +00009350: 3034 005c 3333 305c 3332 335c 3333 3108 04.\330\323\331. │ │ │ +00009360: 5c33 3035 5c33 3332 065c 6e08 5c22 2405 \305\332.\n.\"$. │ │ │ +00009370: 5c32 3036 5c32 3233 005c 3332 325c 3333 \206\223.\322\33 │ │ │ +00009380: 3306 065c 3230 335c 3233 3500 5c33 3237 3..\203\235.\327 │ │ │ +00009390: 5c32 3032 5c32 3336 005c 3333 305c 3332 \202\236.\330\32 │ │ │ +000093a0: 335c 3333 3108 5c33 3035 5c33 3332 060e 3\331.\305\332.. │ │ │ +000093b0: 085c 2206 5c66 5c32 3033 5c32 3630 005c .\".\f\203\260.\ │ │ │ +000093c0: 3333 345c 3230 325c 3236 3100 5c33 3035 334\202\261.\305 │ │ │ +000093d0: 5c5c 2406 085c 3230 365c 3237 3100 5c33 \\$..\206\271.\3 │ │ │ +000093e0: 3232 5c33 3335 065c 665c 3236 305c 6e01 22\335.\f\260\n. │ │ │ +000093f0: 425c 3236 365c 3230 345c 3230 3722 205b B\266\204\207" [ │ │ │ +00009400: 6963 616c 656e 6461 722d 7265 6375 7272 icalendar-recurr │ │ │ +00009410: 696e 672d 7374 6172 742d 7965 6172 2073 ing-start-year s │ │ │ +00009420: 7472 696e 672d 6d61 7463 6820 225c 5c28 tring-match "\\( │ │ │ +00009430: 5b61 2d7a 5d2b 5c5c 295c 5c73 2d2b 5c5c [a-z]+\\)\\s-+\\ │ │ │ +00009440: 285c 5c28 5b30 2d39 5d5b 302d 395d 3f3a (\\([0-9][0-9]?: │ │ │ +00009450: 5b30 2d39 5d5b 302d 395d 5c5c 295c 5c28 [0-9][0-9]\\)\\( │ │ │ +00009460: 5b61 705d 6d5c 5c29 3f5c 5c28 2d5c 5c28 [ap]m\\)?\\(-\\( │ │ │ +00009470: 5b30 2d39 5d5b 302d 395d 3f3a 5b30 2d39 [0-9][0-9]?:[0-9 │ │ │ +00009480: 5d5b 302d 395d 5c5c 295c 5c28 5b61 705d ][0-9]\\)\\([ap] │ │ │ +00009490: 6d5c 5c29 3f5c 5c29 3f5c 5c29 3f5c 5c73 m\\)?\\)?\\)?\\s │ │ │ +000094a0: 2d2a 5c5c 282e 2a3f 5c5c 2920 3f24 2220 -*\\(.*?\\) ?$" │ │ │ +000094b0: 6963 616c 656e 6461 722d 2d67 6574 2d77 icalendar--get-w │ │ │ +000094c0: 6565 6b64 6179 2d61 6262 7265 7620 7375 eekday-abbrev su │ │ │ +000094d0: 6273 7472 696e 6720 3120 6963 616c 656e bstring 1 icalen │ │ │ +000094e0: 6461 722d 2d64 6961 7279 7469 6d65 2d74 dar--diarytime-t │ │ │ +000094f0: 6f2d 6973 6f74 696d 6520 3320 3420 3620 o-isotime 3 4 6 │ │ │ +00009500: 3720 6963 616c 656e 6461 722d 2d63 6f6e 7 icalendar--con │ │ │ +00009510: 7665 7274 2d73 7472 696e 672d 666f 722d vert-string-for- │ │ │ +00009520: 6578 706f 7274 2038 2069 6361 6c65 6e64 export 8 icalend │ │ │ +00009530: 6172 2d2d 646d 7367 2022 7765 656b 6c79 ar--dmsg "weekly │ │ │ +00009540: 2025 7322 2072 6561 6420 7265 706c 6163 %s" read replac │ │ │ +00009550: 652d 7265 6765 7870 2d69 6e2d 7374 7269 e-regexp-in-stri │ │ │ +00009560: 6e67 2022 5e54 303f 2220 2222 2066 6f72 ng "^T0?" "" for │ │ │ +00009570: 6d61 7420 2254 2530 3664 2220 3130 3030 mat "T%06d" 1000 │ │ │ +00009580: 3020 225c 6e44 5453 5441 5254 3b22 2022 0 "\nDTSTART;" " │ │ │ +00009590: 5641 4c55 453d 4441 5445 2d54 494d 453a VALUE=DATE-TIME: │ │ │ +000095a0: 2220 2256 414c 5545 3d44 4154 453a 2220 " "VALUE=DATE:" │ │ │ +000095b0: 2225 3034 6425 3032 6425 3032 6422 2069 "%04d%02d%02d" i │ │ │ +000095c0: 6361 6c65 6e64 6172 2d66 6972 7374 2d77 calendar-first-w │ │ │ +000095d0: 6565 6b64 6179 2d6f 662d 7965 6172 2022 eekday-of-year " │ │ │ +000095e0: 5c6e 4454 454e 443b 2220 3020 225c 6e52 \nDTEND;" 0 "\nR │ │ │ +000095f0: 5255 4c45 3a46 5245 513d 5745 454b 4c59 RULE:FREQ=WEEKLY │ │ │ +00009600: 3b49 4e54 4552 5641 4c3d 313b 4259 4441 ;INTERVAL=1;BYDA │ │ │ +00009610: 593d 225d 2031 3920 2823 2420 2e20 3337 Y="] 19 (#$ . 37 │ │ │ +00009620: 3038 3929 5d29 0a23 4032 3033 2043 6f6e 089)]).#@203 Con │ │ │ +00009630: 7665 7274 2079 6561 726c 7920 6469 6172 vert yearly diar │ │ │ +00009640: 7920 656e 7472 7920 746f 2069 4361 6c65 y entry to iCale │ │ │ +00009650: 6e64 6172 2066 6f72 6d61 742e 0a4e 4f4e ndar format..NON │ │ │ +00009660: 4d41 524b 4552 2069 7320 6120 7265 6775 MARKER is a regu │ │ │ +00009670: 6c61 7220 6578 7072 6573 7369 6f6e 206d lar expression m │ │ │ +00009680: 6174 6368 696e 6720 7468 6520 7374 6172 atching the star │ │ │ +00009690: 7420 6f66 206e 6f6e 2d6d 6172 6b69 6e67 t of non-marking │ │ │ +000096a0: 0a65 6e74 7269 6573 2e20 2045 4e54 5259 .entries. ENTRY │ │ │ +000096b0: 2d4d 4149 4e20 6973 2074 6865 2066 6972 -MAIN is the fir │ │ │ +000096c0: 7374 206c 696e 6520 6f66 2074 6865 2064 st line of the d │ │ │ +000096d0: 6961 7279 2065 6e74 7279 2e0a 0a28 666e iary entry...(fn │ │ │ +000096e0: 204e 4f4e 4d41 524b 4552 2045 4e54 5259 NONMARKER ENTRY │ │ │ +000096f0: 2d4d 4149 4e29 1f0a 2864 6566 616c 6961 -MAIN)..(defalia │ │ │ +00009700: 7320 2769 6361 6c65 6e64 6172 2d2d 636f s 'icalendar--co │ │ │ +00009710: 6e76 6572 742d 7965 6172 6c79 2d74 6f2d nvert-yearly-to- │ │ │ +00009720: 6963 616c 2023 5b35 3134 2022 5c33 3031 ical #[514 "\301 │ │ │ +00009730: 0208 5c33 3032 3d5c 3230 335c 6600 5c33 ..\302=\203\f.\3 │ │ │ +00009740: 3033 5c32 3032 0d00 5c33 3034 5c33 3035 03\202..\304\305 │ │ │ +00009750: 5102 5c22 5c32 3035 5c33 3530 0008 5c33 Q.\"\205\350..\3 │ │ │ +00009760: 3032 3d5c 3230 331e 005c 3330 365c 3230 02=\203..\306\20 │ │ │ +00009770: 321f 005c 3330 3708 5c33 3032 3d5c 3230 2..\307.\302=\20 │ │ │ +00009780: 3329 005c 3330 375c 3230 322a 005c 3330 3).\307\202*.\30 │ │ │ +00009790: 365c 3331 305c 3331 3104 045c 3232 3405 6\310\311..\224. │ │ │ +000097a0: 5c32 3235 2321 5c33 3132 5c33 3131 0504 \225#!\312\311.. │ │ │ +000097b0: 5c32 3234 055c 3232 3523 215c 3331 335c \224.\225#!\313\ │ │ │ +000097c0: 3331 345c 3232 345c 3230 354a 005c 3331 314\224\205J.\31 │ │ │ +000097d0: 3106 065c 3331 345c 3232 345c 3331 345c 1..\314\224\314\ │ │ │ +000097e0: 3232 3523 5c33 3135 5c32 3234 5c32 3035 225#\315\224\205 │ │ │ +000097f0: 5700 5c33 3131 0607 5c33 3135 5c32 3234 W.\311..\315\224 │ │ │ +00009800: 5c33 3135 5c32 3235 235c 225c 3331 335c \315\225#\"\313\ │ │ │ +00009810: 3331 365c 3232 345c 3230 3566 005c 3331 316\224\205f.\31 │ │ │ +00009820: 3106 075c 3331 365c 3232 345c 3331 365c 1..\316\224\316\ │ │ │ +00009830: 3232 3523 5c33 3137 5c32 3234 5c32 3035 225#\317\224\205 │ │ │ +00009840: 7300 5c33 3131 0608 5c33 3137 5c32 3234 s.\311..\317\224 │ │ │ +00009850: 5c33 3137 5c32 3235 235c 225c 3332 305c \317\225#\"\320\ │ │ │ +00009860: 3331 3106 085c 3332 315c 3232 345c 3332 311..\321\224\32 │ │ │ +00009870: 315c 3232 3523 215c 3332 325c 3332 3306 1\225#!\322\323. │ │ │ +00009880: 095c 225c 3231 3002 5c32 3033 5c32 3335 .\"\210.\203\235 │ │ │ +00009890: 0001 5c32 3034 5c32 3335 005c 3331 305c ..\204\235.\310\ │ │ │ +000098a0: 3332 345c 3332 355c 3332 3606 0623 215c 324\325\326..#!\ │ │ │ +000098b0: 3332 375c 3333 305c 3333 3103 5c5c 5c22 327\330\331.\\\" │ │ │ +000098c0: 5c32 3632 035c 3231 305c 3333 3203 5c32 \262.\210\332.\2 │ │ │ +000098d0: 3033 5c32 3436 005c 3333 335c 3230 325c 03\246.\333\202\ │ │ │ +000098e0: 3234 3700 5c33 3334 5c33 3237 5c33 3335 247.\334\327\335 │ │ │ +000098f0: 0607 0609 2305 5c32 3036 5c32 3633 005c ....#.\206\263.\ │ │ │ +00009900: 3332 365c 3333 3606 065c 3230 335c 3237 326\336..\203\27 │ │ │ +00009910: 3500 5c33 3333 5c32 3032 5c32 3736 005c 5.\333\202\276.\ │ │ │ +00009920: 3333 345c 3333 3706 5c6e 065c 665c 3334 334\337.\n.\f\34 │ │ │ +00009930: 3045 0609 5c32 3033 5c33 3136 005c 3334 0E..\203\316.\34 │ │ │ +00009940: 315c 3230 325c 3331 3700 5c33 3036 5c22 1\202\317.\306\" │ │ │ +00009950: 0608 5c32 3036 5c33 3236 005c 3332 365c ..\206\326.\326\ │ │ │ +00009960: 3334 325c 3332 375c 3334 3306 0e5c 225c 342\327\343..\"\ │ │ │ +00009970: 3334 345c 3332 375c 3334 3306 115c 225c 344\327\343..\"\ │ │ │ +00009980: 3236 305c 6601 425c 3236 365c 3230 375c 260\f.B\266\207\ │ │ │ +00009990: 3230 3722 205b 6361 6c65 6e64 6172 2d64 207" [calendar-d │ │ │ +000099a0: 6174 652d 7374 796c 6520 7374 7269 6e67 ate-style string │ │ │ +000099b0: 2d6d 6174 6368 2065 7572 6f70 6561 6e20 -match european │ │ │ +000099c0: 225c 5c28 5b30 2d39 5d2b 5b30 2d39 5d3f "\\([0-9]+[0-9]? │ │ │ +000099d0: 5c5c 295c 5c73 2d2b 5c5c 285b 612d 7a5d \\)\\s-+\\([a-z] │ │ │ +000099e0: 2b5c 5c29 5c5c 732d 2b22 2022 5c5c 285b +\\)\\s-+" "\\([ │ │ │ +000099f0: 612d 7a5d 2b5c 5c29 5c5c 732d 2b5c 5c28 a-z]+\\)\\s-+\\( │ │ │ +00009a00: 5b30 2d39 5d2b 5b30 2d39 5d3f 5c5c 295c [0-9]+[0-9]?\\)\ │ │ │ +00009a10: 5c73 2d2b 2220 225c 5c2a 3f5c 5c73 2d2a \s-+" "\\*?\\s-* │ │ │ +00009a20: 5c5c 285c 5c28 5b30 2d39 5d5b 302d 395d \\(\\([0-9][0-9] │ │ │ +00009a30: 3f3a 5b30 2d39 5d5b 302d 395d 5c5c 295c ?:[0-9][0-9]\\)\ │ │ │ +00009a40: 5c28 5b61 705d 6d5c 5c29 3f5c 5c28 2d5c \([ap]m\\)?\\(-\ │ │ │ +00009a50: 5c28 5b30 2d39 5d5b 302d 395d 3f3a 5b30 \([0-9][0-9]?:[0 │ │ │ +00009a60: 2d39 5d5b 302d 395d 5c5c 295c 5c28 5b61 -9][0-9]\\)\\([a │ │ │ +00009a70: 705d 6d5c 5c29 3f5c 5c29 3f5c 5c29 3f5c p]m\\)?\\)?\\)?\ │ │ │ +00009a80: 5c73 2d2a 5c5c 285b 5e30 2d39 5d2b 2e2a \s-*\\([^0-9]+.* │ │ │ +00009a90: 3f5c 5c29 203f 2422 2031 2032 2072 6561 ?\\) ?$" 1 2 rea │ │ │ +00009aa0: 6420 7375 6273 7472 696e 6720 6963 616c d substring ical │ │ │ +00009ab0: 656e 6461 722d 2d67 6574 2d6d 6f6e 7468 endar--get-month │ │ │ +00009ac0: 2d6e 756d 6265 7220 6963 616c 656e 6461 -number icalenda │ │ │ +00009ad0: 722d 2d64 6961 7279 7469 6d65 2d74 6f2d r--diarytime-to- │ │ │ +00009ae0: 6973 6f74 696d 6520 3420 3520 3720 3820 isotime 4 5 7 8 │ │ │ +00009af0: 6963 616c 656e 6461 722d 2d63 6f6e 7665 icalendar--conve │ │ │ +00009b00: 7274 2d73 7472 696e 672d 666f 722d 6578 rt-string-for-ex │ │ │ +00009b10: 706f 7274 2039 2069 6361 6c65 6e64 6172 port 9 icalendar │ │ │ +00009b20: 2d2d 646d 7367 2022 7965 6172 6c79 2025 --dmsg "yearly % │ │ │ +00009b30: 7322 2072 6570 6c61 6365 2d72 6567 6578 s" replace-regex │ │ │ +00009b40: 702d 696e 2d73 7472 696e 6720 225e 5430 p-in-string "^T0 │ │ │ +00009b50: 3f22 2022 2220 666f 726d 6174 2022 5425 ?" "" format "T% │ │ │ +00009b60: 3036 6422 2031 3030 3030 2022 5c6e 4454 06d" 10000 "\nDT │ │ │ +00009b70: 5354 4152 543b 2220 2256 414c 5545 3d44 START;" "VALUE=D │ │ │ +00009b80: 4154 452d 5449 4d45 3a22 2022 5641 4c55 ATE-TIME:" "VALU │ │ │ +00009b90: 453d 4441 5445 3a22 2022 3139 3030 2530 E=DATE:" "1900%0 │ │ │ +00009ba0: 3264 2530 3264 2220 225c 6e44 5445 4e44 2d%02d" "\nDTEND │ │ │ +00009bb0: 3b22 2069 6361 6c65 6e64 6172 2d2d 6461 ;" icalendar--da │ │ │ +00009bc0: 7465 2d74 6f2d 6973 6f64 6174 6520 3139 te-to-isodate 19 │ │ │ +00009bd0: 3030 2030 2022 5c6e 5252 554c 453a 4652 00 0 "\nRRULE:FR │ │ │ +00009be0: 4551 3d59 4541 524c 593b 494e 5445 5256 EQ=YEARLY;INTERV │ │ │ +00009bf0: 414c 3d31 3b42 594d 4f4e 5448 3d22 2022 AL=1;BYMONTH=" " │ │ │ +00009c00: 2564 2220 223b 4259 4d4f 4e54 4844 4159 %d" ";BYMONTHDAY │ │ │ +00009c10: 3d22 5d20 3233 2028 2324 202e 2033 3834 ="] 23 (#$ . 384 │ │ │ +00009c20: 3435 295d 290a 2340 3433 3620 436f 6e76 45)]).#@436 Conv │ │ │ +00009c30: 6572 7420 7365 7870 2064 6961 7279 2065 ert sexp diary e │ │ │ +00009c40: 6e74 7279 2074 6f20 6943 616c 656e 6461 ntry to iCalenda │ │ │ +00009c50: 7220 666f 726d 6174 2e0a 456e 756d 6572 r format..Enumer │ │ │ +00009c60: 6174 6520 7468 6520 6576 616c 7561 7465 ate the evaluate │ │ │ +00009c70: 6420 7365 7870 2065 6e74 7279 2066 6f72 d sexp entry for │ │ │ +00009c80: 2074 6865 206e 6578 740a 6069 6361 6c65 the next.`icale │ │ │ +00009c90: 6e64 6172 2d65 7870 6f72 742d 7365 7870 ndar-export-sexp │ │ │ +00009ca0: 2d65 6e75 6d65 7261 7469 6f6e 2d64 6179 -enumeration-day │ │ │ +00009cb0: 7327 2064 6179 732e 2020 4e4f 4e4d 4152 s' days. NONMAR │ │ │ +00009cc0: 4b45 5220 6973 2061 0a72 6567 756c 6172 KER is a.regular │ │ │ +00009cd0: 2065 7870 7265 7373 696f 6e20 6d61 7463 expression matc │ │ │ +00009ce0: 6869 6e67 2074 6865 2073 7461 7274 206f hing the start o │ │ │ +00009cf0: 6620 6e6f 6e2d 6d61 726b 696e 6720 656e f non-marking en │ │ │ +00009d00: 7472 6965 732e 0a45 4e54 5259 2d4d 4149 tries..ENTRY-MAI │ │ │ +00009d10: 4e20 6973 2074 6865 2066 6972 7374 206c N is the first l │ │ │ +00009d20: 696e 6520 6f66 2074 6865 2064 6961 7279 ine of the diary │ │ │ +00009d30: 2065 6e74 7279 2e0a 0a4f 7074 696f 6e61 entry...Optiona │ │ │ +00009d40: 6c20 6172 6775 6d65 6e74 2053 5441 5254 l argument START │ │ │ +00009d50: 2064 6574 6572 6d69 6e65 7320 7468 6520 determines the │ │ │ +00009d60: 6669 7273 7420 6461 7920 6f66 2074 6865 first day of the │ │ │ +00009d70: 0a65 6e75 6d65 7261 7469 6f6e 2c20 6769 .enumeration, gi │ │ │ +00009d80: 7665 6e20 6173 2061 204c 6973 7020 7469 ven as a Lisp ti │ │ │ +00009d90: 6d65 2076 616c 7565 202d 2d20 7573 6564 me value -- used │ │ │ +00009da0: 2066 6f72 2074 6573 7420 7075 7270 6f73 for test purpos │ │ │ +00009db0: 6573 2e0a 0a28 666e 204e 4f4e 4d41 524b es...(fn NONMARK │ │ │ +00009dc0: 4552 2045 4e54 5259 2d4d 4149 4e20 266f ER ENTRY-MAIN &o │ │ │ +00009dd0: 7074 696f 6e61 6c20 5354 4152 5429 1f0a ptional START).. │ │ │ +00009de0: 2864 6566 616c 6961 7320 2769 6361 6c65 (defalias 'icale │ │ │ +00009df0: 6e64 6172 2d2d 636f 6e76 6572 742d 7365 ndar--convert-se │ │ │ +00009e00: 7870 2d74 6f2d 6963 616c 2023 5b37 3730 xp-to-ical #[770 │ │ │ +00009e10: 2022 5c33 3031 035c 3330 3250 035c 225c "\301.\302P.\"\ │ │ │ +00009e20: 3230 3323 005c 3330 335c 3330 3403 5c22 203#.\303\304.\" │ │ │ +00009e30: 5c32 3130 5c33 3035 035c 3330 365c 3330 \210\305.\306\30 │ │ │ +00009e40: 3705 5c33 3130 5c32 3234 5c33 3130 5c32 7.\310\224\310\2 │ │ │ +00009e50: 3235 235c 3330 3706 065c 3331 315c 3232 25#\307..\311\22 │ │ │ +00009e60: 345c 3331 315c 3232 3523 515c 225c 3230 4\311\225#Q\"\20 │ │ │ +00009e70: 375c 3330 3103 5c33 3132 5003 5c22 5c32 7\301.\312P.\"\2 │ │ │ +00009e80: 3033 6500 5c33 3033 5c33 3133 035c 225c 03e.\303\313.\"\ │ │ │ +00009e90: 3231 305c 3330 3702 5c33 3130 5c32 3234 210\307.\310\224 │ │ │ +00009ea0: 5c33 3130 5c32 3235 235c 3330 3703 5c33 \310\225#\307.\3 │ │ │ +00009eb0: 3131 5c32 3234 5c33 3131 5c32 3235 2302 11\224\311\225#. │ │ │ +00009ec0: 5c32 3036 4500 5c33 3134 205c 3331 355c \206E.\314 \315\ │ │ │ +00009ed0: 3331 365c 3331 375c 3332 305c 3332 315c 316\317\320\321\ │ │ │ +00009ee0: 3332 325c 3332 335c 3332 3406 0d06 0d06 322\323\324..... │ │ │ +00009ef0: 5c66 065c 6606 5c66 255c 3332 355c 225c \f.\f.\f%\325\"\ │ │ │ +00009f00: 3332 365c 3332 3725 5c33 3330 5c33 3331 326\327%\330\331 │ │ │ +00009f10: 0853 5c22 5c22 5c22 5c32 3037 5c33 3136 .S\"\"\"\207\316 │ │ │ +00009f20: 5c32 3037 2220 5b69 6361 6c65 6e64 6172 \207" [icalendar │ │ │ +00009f30: 2d65 7870 6f72 742d 7365 7870 2d65 6e75 -export-sexp-enu │ │ │ +00009f40: 6d65 7261 7469 6f6e 2d64 6179 7320 7374 meration-days st │ │ │ +00009f50: 7269 6e67 2d6d 6174 6368 2022 2525 2861 ring-match "%%(a │ │ │ +00009f60: 6e64 205c 5c28 285b 5e29 5d2b 295c 5c29 nd \\(([^)]+)\\) │ │ │ +00009f70: 295c 5c28 5c5c 732d 2a2e 2a3f 5c5c 2920 )\\(\\s-*.*?\\) │ │ │ +00009f80: 3f24 2220 6963 616c 656e 6461 722d 2d64 ?$" icalendar--d │ │ │ +00009f90: 6d73 6720 2264 6961 7279 2d73 6578 7020 msg "diary-sexp │ │ │ +00009fa0: 6672 6f6d 2069 6361 6c65 6e64 6172 2e65 from icalendar.e │ │ │ +00009fb0: 6c20 2573 2220 6963 616c 656e 6461 722d l %s" icalendar- │ │ │ +00009fc0: 2d63 6f6e 7665 7274 2d74 6f2d 6963 616c -convert-to-ical │ │ │ +00009fd0: 2022 2525 2220 7375 6273 7472 696e 6720 "%%" substring │ │ │ +00009fe0: 3120 3220 2225 255c 5c28 285b 5e29 5d2b 1 2 "%%\\(([^)]+ │ │ │ +00009ff0: 295c 5c29 5c5c 732d 2a5c 5c28 2e2a 5c5c )\\)\\s-*\\(.*\\ │ │ │ +0000a000: 2922 2022 6469 6172 792d 7365 7870 2025 )" "diary-sexp % │ │ │ +0000a010: 7322 2063 7572 7265 6e74 2d74 696d 6520 s" current-time │ │ │ +0000a020: 6465 6c65 7465 206e 696c 206d 6170 6361 delete nil mapca │ │ │ +0000a030: 7220 6d61 6b65 2d62 7974 652d 636f 6465 r make-byte-code │ │ │ +0000a040: 2032 3537 2022 5c33 3036 5c33 3037 5c33 257 "\306\307\3 │ │ │ +0000a050: 3034 5c33 3130 045f 5c22 215c 3331 3101 04\310._\"!\311. │ │ │ +0000a060: 385c 3331 3202 385c 3331 3303 385c 3331 8\312.8\313.8\31 │ │ │ +0000a070: 345c 3330 325c 3330 3304 0606 0545 235c 4\302\303....E#\ │ │ │ +0000a080: 3231 313b 5c32 3033 2300 5c32 3131 5c32 211;\203#.\211\2 │ │ │ +0000a090: 3032 2e00 5c32 3131 3a5c 3230 332d 005c 02..\211:\203-.\ │ │ │ +0000a0a0: 3231 3141 5c32 3032 2e00 5c33 3135 5c32 211A\202..\315\2 │ │ │ +0000a0b0: 3131 5c32 3034 3600 5c33 3135 5c32 3032 11\2046.\315\202 │ │ │ +0000a0c0: 5300 5c32 3131 3b5c 3230 334f 005c 3331 S.\211;\203O.\31 │ │ │ +0000a0d0: 361d 5c33 3137 5c33 3030 5c33 3230 5c33 6.\317\300\320\3 │ │ │ +0000a0e0: 3231 0606 0608 065c 6e06 0725 5c22 295c 21.....\n..%\")\ │ │ │ +0000a0f0: 3230 3253 005c 3332 325c 3332 335c 3330 202S.\322\323\30 │ │ │ +0000a100: 315c 225c 3230 3722 2076 636f 6e63 6174 1\"\207" vconcat │ │ │ +0000a110: 2076 6563 746f 7220 5b63 616c 656e 6461 vector [calenda │ │ │ +0000a120: 722d 6461 7465 2d73 7479 6c65 2064 6563 r-date-style dec │ │ │ +0000a130: 6f64 652d 7469 6d65 2074 696d 652d 6164 ode-time time-ad │ │ │ +0000a140: 6420 3836 3430 3020 3320 3420 3520 6469 d 86400 3 4 5 di │ │ │ +0000a150: 6172 792d 7365 7870 2d65 6e74 7279 206e ary-sexp-entry n │ │ │ +0000a160: 696c 2069 736f 2069 6361 6c65 6e64 6172 il iso icalendar │ │ │ +0000a170: 2d2d 636f 6e76 6572 742d 6f72 6469 6e61 --convert-ordina │ │ │ +0000a180: 7279 2d74 6f2d 6963 616c 2066 6f72 6d61 ry-to-ical forma │ │ │ +0000a190: 7420 2225 3464 2f25 3032 642f 2530 3264 t "%4d/%02d/%02d │ │ │ +0000a1a0: 2025 7322 2065 7272 6f72 2022 556e 7375 %s" error "Unsu │ │ │ +0000a1b0: 7070 6f72 7465 6420 5365 7870 2d65 6e74 pported Sexp-ent │ │ │ +0000a1c0: 7279 3a20 2573 225d 2031 3520 225c 6e5c ry: %s"] 15 "\n\ │ │ │ +0000a1d0: 6e28 666e 204f 4646 5345 5429 2220 6e75 n(fn OFFSET)" nu │ │ │ +0000a1e0: 6d62 6572 2d73 6571 7565 6e63 6520 305d mber-sequence 0] │ │ │ +0000a1f0: 2031 3920 2823 2420 2e20 3339 3938 3029 19 (#$ . 39980) │ │ │ +0000a200: 5d29 0a23 4032 3032 2043 6f6e 7665 7274 ]).#@202 Convert │ │ │ +0000a210: 2062 6c6f 636b 2064 6961 7279 2065 6e74 block diary ent │ │ │ +0000a220: 7279 2074 6f20 6943 616c 656e 6461 7220 ry to iCalendar │ │ │ +0000a230: 666f 726d 6174 2e0a 4e4f 4e4d 4152 4b45 format..NONMARKE │ │ │ +0000a240: 5220 6973 2061 2072 6567 756c 6172 2065 R is a regular e │ │ │ +0000a250: 7870 7265 7373 696f 6e20 6d61 7463 6869 xpression matchi │ │ │ +0000a260: 6e67 2074 6865 2073 7461 7274 206f 6620 ng the start of │ │ │ +0000a270: 6e6f 6e2d 6d61 726b 696e 670a 656e 7472 non-marking.entr │ │ │ +0000a280: 6965 732e 2020 454e 5452 592d 4d41 494e ies. ENTRY-MAIN │ │ │ +0000a290: 2069 7320 7468 6520 6669 7273 7420 6c69 is the first li │ │ │ +0000a2a0: 6e65 206f 6620 7468 6520 6469 6172 7920 ne of the diary │ │ │ +0000a2b0: 656e 7472 792e 0a0a 2866 6e20 4e4f 4e4d entry...(fn NONM │ │ │ +0000a2c0: 4152 4b45 5220 454e 5452 592d 4d41 494e ARKER ENTRY-MAIN │ │ │ +0000a2d0: 291f 0a28 6465 6661 6c69 6173 2027 6963 )..(defalias 'ic │ │ │ +0000a2e0: 616c 656e 6461 722d 2d63 6f6e 7665 7274 alendar--convert │ │ │ +0000a2f0: 2d62 6c6f 636b 2d74 6f2d 6963 616c 2023 -block-to-ical # │ │ │ +0000a300: 5b35 3134 2022 5c33 3030 025c 3330 3150 [514 "\300.\301P │ │ │ +0000a310: 025c 225c 3230 355c 3234 3400 5c33 3032 .\"\205\244.\302 │ │ │ +0000a320: 015c 3330 335c 3232 345c 3330 335c 3232 .\303\224\303\22 │ │ │ +0000a330: 3523 5c33 3032 025c 3330 345c 3232 345c 5#\302.\304\224\ │ │ │ +0000a340: 3330 345c 3232 3523 5c33 3035 0221 5c33 304\225#\305.!\3 │ │ │ +0000a350: 3035 0221 5c33 3035 035c 3330 335c 225c 05.!\305.\303\"\ │ │ │ +0000a360: 3330 365c 3330 375c 3232 345c 3230 352f 306\307\224\205/ │ │ │ +0000a370: 005c 3330 3206 075c 3330 375c 3232 345c .\302..\307\224\ │ │ │ +0000a380: 3330 375c 3232 3523 5c33 3130 5c32 3234 307\225#\310\224 │ │ │ +0000a390: 5c32 3035 3c00 5c33 3032 0608 5c33 3130 \205<.\302..\310 │ │ │ +0000a3a0: 5c32 3234 5c33 3130 5c32 3235 235c 225c \224\310\225#\"\ │ │ │ +0000a3b0: 3330 365c 3331 315c 3232 345c 3230 354b 306\311\224\205K │ │ │ +0000a3c0: 005c 3330 3206 085c 3331 315c 3232 345c .\302..\311\224\ │ │ │ +0000a3d0: 3331 315c 3232 3523 5c33 3132 5c32 3234 311\225#\312\224 │ │ │ +0000a3e0: 5c32 3035 5800 5c33 3032 0609 5c33 3132 \205X.\302..\312 │ │ │ +0000a3f0: 5c32 3234 5c33 3132 5c32 3235 235c 225c \224\312\225#\"\ │ │ │ +0000a400: 3331 335c 3330 3206 095c 3331 345c 3232 313\302..\314\22 │ │ │ +0000a410: 345c 3331 345c 3232 3523 215c 3331 355c 4\314\225#!\315\ │ │ │ +0000a420: 3331 3606 5c6e 5c22 5c32 3130 025c 3230 316.\n\"\210.\20 │ │ │ +0000a430: 335c 3230 3200 015c 3230 345c 3230 3200 3\202..\204\202. │ │ │ +0000a440: 5c33 3137 5c33 3230 5c33 3231 5c33 3232 \317\320\321\322 │ │ │ +0000a450: 0606 2321 5c33 3233 5c33 3234 5c33 3235 ..#!\323\324\325 │ │ │ +0000a460: 035c 5c5c 225c 3236 3203 5c32 3130 025c .\\\"\262.\210.\ │ │ │ +0000a470: 3230 335c 3233 3100 5c33 3236 0606 045c 203\231.\326...\ │ │ │ +0000a480: 3332 3706 0906 065c 3333 3006 0b5c 3236 327....\330..\26 │ │ │ +0000a490: 3008 0142 5c32 3032 5c32 3432 005c 3333 0..B\202\242.\33 │ │ │ +0000a4a0: 3106 065c 3333 3206 0652 0142 5c32 3636 1..\332..R.B\266 │ │ │ +0000a4b0: 5c32 3130 5c32 3037 2220 5b73 7472 696e \210\207" [strin │ │ │ +0000a4c0: 672d 6d61 7463 6820 2225 2528 6469 6172 g-match "%%(diar │ │ │ +0000a4d0: 792d 626c 6f63 6b20 5c5c 285b 5e20 2f5d y-block \\([^ /] │ │ │ +0000a4e0: 2b5b 202f 5d2b 5b5e 202f 5d2b 5b20 2f5d +[ /]+[^ /]+[ /] │ │ │ +0000a4f0: 2b5b 5e20 5d2b 5c5c 2920 2b5c 5c28 5b5e +[^ ]+\\) +\\([^ │ │ │ +0000a500: 202f 5d2b 5b20 2f5d 2b5b 5e20 2f5d 2b5b /]+[ /]+[^ /]+[ │ │ │ +0000a510: 202f 5d2b 5b5e 205d 2b5c 5c29 295c 5c73 /]+[^ ]+\\))\\s │ │ │ +0000a520: 2d2a 5c5c 285c 5c28 5b30 2d39 5d5b 302d -*\\(\\([0-9][0- │ │ │ +0000a530: 395d 3f3a 5b30 2d39 5d5b 302d 395d 5c5c 9]?:[0-9][0-9]\\ │ │ │ +0000a540: 295c 5c28 5b61 705d 6d5c 5c29 3f5c 5c28 )\\([ap]m\\)?\\( │ │ │ +0000a550: 2d5c 5c28 5b30 2d39 5d5b 302d 395d 3f3a -\\([0-9][0-9]?: │ │ │ +0000a560: 5b30 2d39 5d5b 302d 395d 5c5c 295c 5c28 [0-9][0-9]\\)\\( │ │ │ +0000a570: 5b61 705d 6d5c 5c29 3f5c 5c29 3f5c 5c29 [ap]m\\)?\\)?\\) │ │ │ +0000a580: 3f5c 5c73 2d2a 5c5c 282e 2a3f 5c5c 2920 ?\\s-*\\(.*?\\) │ │ │ +0000a590: 3f24 2220 7375 6273 7472 696e 6720 3120 ?$" substring 1 │ │ │ +0000a5a0: 3220 6963 616c 656e 6461 722d 2d64 6174 2 icalendar--dat │ │ │ +0000a5b0: 6573 7472 696e 672d 746f 2d69 736f 6461 estring-to-isoda │ │ │ +0000a5c0: 7465 2069 6361 6c65 6e64 6172 2d2d 6469 te icalendar--di │ │ │ +0000a5d0: 6172 7974 696d 652d 746f 2d69 736f 7469 arytime-to-isoti │ │ │ +0000a5e0: 6d65 2034 2035 2037 2038 2069 6361 6c65 me 4 5 7 8 icale │ │ │ +0000a5f0: 6e64 6172 2d2d 636f 6e76 6572 742d 7374 ndar--convert-st │ │ │ +0000a600: 7269 6e67 2d66 6f72 2d65 7870 6f72 7420 ring-for-export │ │ │ +0000a610: 3920 6963 616c 656e 6461 722d 2d64 6d73 9 icalendar--dms │ │ │ +0000a620: 6720 2264 6961 7279 2d62 6c6f 636b 2025 g "diary-block % │ │ │ +0000a630: 7322 2072 6561 6420 7265 706c 6163 652d s" read replace- │ │ │ +0000a640: 7265 6765 7870 2d69 6e2d 7374 7269 6e67 regexp-in-string │ │ │ +0000a650: 2022 5e54 303f 2220 2222 2066 6f72 6d61 "^T0?" "" forma │ │ │ +0000a660: 7420 2254 2530 3664 2220 3130 3030 3020 t "T%06d" 10000 │ │ │ +0000a670: 225c 6e44 5453 5441 5254 3b56 414c 5545 "\nDTSTART;VALUE │ │ │ +0000a680: 3d44 4154 452d 5449 4d45 3a22 2022 5c6e =DATE-TIME:" "\n │ │ │ +0000a690: 4454 454e 443b 5641 4c55 453d 4441 5445 DTEND;VALUE=DATE │ │ │ +0000a6a0: 2d54 494d 453a 2220 225c 6e52 5255 4c45 -TIME:" "\nRRULE │ │ │ +0000a6b0: 3a46 5245 513d 4441 494c 593b 494e 5445 :FREQ=DAILY;INTE │ │ │ +0000a6c0: 5256 414c 3d31 3b55 4e54 494c 3d22 2022 RVAL=1;UNTIL=" " │ │ │ +0000a6d0: 5c6e 4454 5354 4152 543b 5641 4c55 453d \nDTSTART;VALUE= │ │ │ +0000a6e0: 4441 5445 3a22 2022 5c6e 4454 454e 443b DATE:" "\nDTEND; │ │ │ +0000a6f0: 5641 4c55 453d 4441 5445 3a22 5d20 3138 VALUE=DATE:"] 18 │ │ │ +0000a700: 2028 2324 202e 2034 3134 3831 295d 290a (#$ . 41481)]). │ │ │ +0000a710: 2340 3238 3220 436f 6e76 6572 7420 666c #@282 Convert fl │ │ │ +0000a720: 6f61 7420 6469 6172 7920 656e 7472 7920 oat diary entry │ │ │ +0000a730: 746f 2069 4361 6c65 6e64 6172 2066 6f72 to iCalendar for │ │ │ +0000a740: 6d61 7420 2d2d 2070 6172 7469 616c 6c79 mat -- partially │ │ │ +0000a750: 2075 6e73 7570 706f 7274 6564 210a 0a20 unsupported!.. │ │ │ +0000a760: 2046 4958 4d45 2120 4441 5920 6672 6f6d FIXME! DAY from │ │ │ +0000a770: 2064 6961 7279 2d66 6c6f 6174 2079 6574 diary-float yet │ │ │ +0000a780: 2075 6e69 6d70 6c65 6d65 6e74 6564 2e0a unimplemented.. │ │ │ +0000a790: 0a20 204e 4f4e 4d41 524b 4552 2069 7320 . NONMARKER is │ │ │ +0000a7a0: 6120 7265 6775 6c61 7220 6578 7072 6573 a regular expres │ │ │ +0000a7b0: 7369 6f6e 206d 6174 6368 696e 6720 7468 sion matching th │ │ │ +0000a7c0: 6520 7374 6172 7420 6f66 206e 6f6e 2d6d e start of non-m │ │ │ +0000a7d0: 6172 6b69 6e67 0a20 2065 6e74 7269 6573 arking. entries │ │ │ +0000a7e0: 2e20 2045 4e54 5259 2d4d 4149 4e20 6973 . ENTRY-MAIN is │ │ │ +0000a7f0: 2074 6865 2066 6972 7374 206c 696e 6520 the first line │ │ │ +0000a800: 6f66 2074 6865 2064 6961 7279 2065 6e74 of the diary ent │ │ │ +0000a810: 7279 2e0a 0a28 666e 204e 4f4e 4d41 524b ry...(fn NONMARK │ │ │ +0000a820: 4552 2045 4e54 5259 2d4d 4149 4e29 1f0a ER ENTRY-MAIN).. │ │ │ +0000a830: 2864 6566 616c 6961 7320 2769 6361 6c65 (defalias 'icale │ │ │ +0000a840: 6e64 6172 2d2d 636f 6e76 6572 742d 666c ndar--convert-fl │ │ │ +0000a850: 6f61 742d 746f 2d69 6361 6c20 235b 3531 oat-to-ical #[51 │ │ │ +0000a860: 3420 225c 3330 3302 5c33 3034 5002 5c22 4 "\303.\304P.\" │ │ │ +0000a870: 5c32 3035 5c32 3431 005c 3330 355c 3330 \205\241.\305\30 │ │ │ +0000a880: 3621 725c 3231 3171 5c32 3130 5c33 3037 6!r\211q\210\307 │ │ │ +0000a890: 5c33 3130 5c33 3131 5c33 3132 5c33 3133 \310\311\312\313 │ │ │ +0000a8a0: 0521 5c33 3134 5c22 5c33 3135 245c 3231 .!\314\"\315$\21 │ │ │ +0000a8b0: 365c 3331 365c 3331 3703 5c22 635c 3231 6\316\317.\"c\21 │ │ │ +0000a8c0: 3065 625c 3231 305c 3332 3070 215c 3231 0eb\210\320p!\21 │ │ │ +0000a8d0: 3141 405c 3331 3502 385c 3332 3103 385c 1A@\315.8\321.8\ │ │ │ +0000a8e0: 3332 3204 385c 3332 335c 3332 345c 3332 322.8\323\324\32 │ │ │ +0000a8f0: 3560 647b 2301 5c32 3033 4900 5c33 3236 5`d{#.\203I.\326 │ │ │ +0000a900: 5c33 3237 0609 5c22 5c32 3130 5c33 3330 \327..\"\210\330 │ │ │ +0000a910: 5c33 3331 215c 3231 305c 3333 325c 3333 \331!\210\332\33 │ │ │ +0000a920: 335c 3333 3421 5c33 3335 2018 0609 195c 3\334!\335 ....\ │ │ │ +0000a930: 3333 3606 0706 0706 0723 2a3f 5c32 3035 336......#*?\205 │ │ │ +0000a940: 6500 5c33 3337 5c33 3333 5c33 3334 2150 e.\337\333\334!P │ │ │ +0000a950: 5c33 3430 0608 5c32 3437 5c32 3034 7200 \340..\247\204r. │ │ │ +0000a960: 0608 3c5c 3230 3376 005c 3334 315c 3230 ..<\203v.\341\20 │ │ │ +0000a970: 3277 005c 3334 3206 093c 5c32 3035 5c32 2w.\342..<\205\2 │ │ │ +0000a980: 3035 005c 3334 335c 3334 3406 0b41 405c 05.\343\344..A@\ │ │ │ +0000a990: 3334 3523 065c 6e5c 3234 375c 3230 355c 345#.\n\247\205\ │ │ │ +0000a9a0: 3231 3700 5c33 3436 060b 215c 3334 375c 217.\346..!\347\ │ │ │ +0000a9b0: 3334 3606 0b21 5c6e 060d 485c 3236 305c 346..!\n..H\260\ │ │ │ +0000a9c0: 6e01 425c 3236 365c 3230 362a 5c32 3632 n.B\266\206*\262 │ │ │ +0000a9d0: 015c 3230 3722 205b 6461 7465 2065 6e74 .\207" [date ent │ │ │ +0000a9e0: 7279 2069 6361 6c65 6e64 6172 2d2d 7765 ry icalendar--we │ │ │ +0000a9f0: 656b 6461 792d 6172 7261 7920 7374 7269 ekday-array stri │ │ │ +0000aa00: 6e67 2d6d 6174 6368 2022 2525 5c5c 2828 ng-match "%%\\(( │ │ │ +0000aa10: 6469 6172 792d 666c 6f61 7420 2e2b 5c5c diary-float .+\\ │ │ │ +0000aa20: 2920 3f24 2220 6765 6e65 7261 7465 2d6e ) ?$" generate-n │ │ │ +0000aa30: 6577 2d62 7566 6665 7220 2220 2a74 656d ew-buffer " *tem │ │ │ +0000aa40: 702a 2220 6d61 6b65 2d62 7974 652d 636f p*" make-byte-co │ │ │ +0000aa50: 6465 2030 2022 5c33 3031 5c33 3030 215c de 0 "\301\300!\ │ │ │ +0000aa60: 3230 3509 005c 3330 325c 3330 3021 5c32 205..\302\300!\2 │ │ │ +0000aa70: 3037 2220 7663 6f6e 6361 7420 7665 6374 07" vconcat vect │ │ │ +0000aa80: 6f72 205b 6275 6666 6572 2d6e 616d 6520 or [buffer-name │ │ │ +0000aa90: 6b69 6c6c 2d62 7566 6665 725d 2032 206d kill-buffer] 2 m │ │ │ +0000aaa0: 6174 6368 2d73 7472 696e 6720 3120 7265 atch-string 1 re │ │ │ +0000aab0: 6164 2033 2034 2072 6570 6c61 6365 2d72 ad 3 4 replace-r │ │ │ +0000aac0: 6567 6578 702d 696e 2d73 7472 696e 6720 egexp-in-string │ │ │ +0000aad0: 225c 5c28 5e20 2b5c 5c7c 202b 245c 5c29 "\\(^ +\\| +$\\) │ │ │ +0000aae0: 2220 2222 2069 6361 6c65 6e64 6172 2d2d " "" icalendar-- │ │ │ +0000aaf0: 646d 7367 2022 6469 6172 792d 666c 6f61 dmsg "diary-floa │ │ │ +0000ab00: 7420 2573 2220 6572 726f 7220 2244 6f6e t %s" error "Don │ │ │ +0000ab10: 2774 206b 6e6f 7720 6966 206f 7220 686f 't know if or ho │ │ │ +0000ab20: 7720 746f 2069 6d70 6c65 6d65 6e74 2064 w to implement d │ │ │ +0000ab30: 6179 2069 6e20 6064 6961 7279 2d66 6c6f ay in `diary-flo │ │ │ +0000ab40: 6174 2722 2022 5c6e 4454 5354 4152 543b at'" "\nDTSTART; │ │ │ +0000ab50: 5641 4c55 453d 4441 5445 3a22 2066 6f72 VALUE=DATE:" for │ │ │ +0000ab60: 6d61 742d 7469 6d65 2d73 7472 696e 6720 mat-time-string │ │ │ +0000ab70: 2225 5925 6d25 6422 2063 616c 656e 6461 "%Y%m%d" calenda │ │ │ +0000ab80: 722d 6375 7272 656e 742d 6461 7465 2064 r-current-date d │ │ │ +0000ab90: 6961 7279 2d66 6c6f 6174 2022 5c6e 4558 iary-float "\nEX │ │ │ +0000aba0: 4441 5445 3b56 414c 5545 3d44 4154 453a DATE;VALUE=DATE: │ │ │ +0000abb0: 2220 225c 6e52 5255 4c45 3a22 2022 4652 " "\nRRULE:" "FR │ │ │ +0000abc0: 4551 3d59 4541 524c 593b 4259 4d4f 4e54 EQ=YEARLY;BYMONT │ │ │ +0000abd0: 483d 2220 2246 5245 513d 4d4f 4e54 484c H=" "FREQ=MONTHL │ │ │ +0000abe0: 5922 206d 6170 636f 6e63 6174 2023 5b32 Y" mapconcat #[2 │ │ │ +0000abf0: 3537 2022 5c33 3030 0121 5c32 3037 2220 57 "\300.!\207" │ │ │ +0000ac00: 5b6e 756d 6265 722d 746f 2d73 7472 696e [number-to-strin │ │ │ +0000ac10: 675d 2033 2022 5c6e 5c6e 2866 6e20 4d29 g] 3 "\n\n(fn M) │ │ │ +0000ac20: 225d 2022 2c22 206e 756d 6265 722d 746f "] "," number-to │ │ │ +0000ac30: 2d73 7472 696e 6720 223b 4259 4441 593d -string ";BYDAY= │ │ │ +0000ac40: 225d 2032 3020 2823 2420 2e20 3432 3737 "] 20 (#$ . 4277 │ │ │ +0000ac50: 3429 5d29 0a23 4032 3333 2043 6f6e 7665 4)]).#@233 Conve │ │ │ +0000ac60: 7274 2060 6469 6172 792d 6461 7465 2720 rt `diary-date' │ │ │ +0000ac70: 6469 6172 7920 656e 7472 7920 746f 2069 diary entry to i │ │ │ +0000ac80: 4361 6c65 6e64 6172 2066 6f72 6d61 7420 Calendar format │ │ │ +0000ac90: 2d2d 2075 6e73 7570 706f 7274 6564 210a -- unsupported!. │ │ │ +0000aca0: 0a46 4958 4d45 210a 0a4e 4f4e 4d41 524b .FIXME!..NONMARK │ │ │ +0000acb0: 4552 2069 7320 6120 7265 6775 6c61 7220 ER is a regular │ │ │ +0000acc0: 6578 7072 6573 7369 6f6e 206d 6174 6368 expression match │ │ │ +0000acd0: 696e 6720 7468 6520 7374 6172 7420 6f66 ing the start of │ │ │ +0000ace0: 206e 6f6e 2d6d 6172 6b69 6e67 0a65 6e74 non-marking.ent │ │ │ +0000acf0: 7269 6573 2e20 2045 4e54 5259 2d4d 4149 ries. ENTRY-MAI │ │ │ +0000ad00: 4e20 6973 2074 6865 2066 6972 7374 206c N is the first l │ │ │ +0000ad10: 696e 6520 6f66 2074 6865 2064 6961 7279 ine of the diary │ │ │ +0000ad20: 2065 6e74 7279 2e0a 0a28 666e 204e 4f4e entry...(fn NON │ │ │ +0000ad30: 4d41 524b 4552 2045 4e54 5259 2d4d 4149 MARKER ENTRY-MAI │ │ │ +0000ad40: 4e29 1f0a 2864 6566 616c 6961 7320 2769 N)..(defalias 'i │ │ │ +0000ad50: 6361 6c65 6e64 6172 2d2d 636f 6e76 6572 calendar--conver │ │ │ +0000ad60: 742d 6461 7465 2d74 6f2d 6963 616c 2023 t-date-to-ical # │ │ │ +0000ad70: 5b35 3134 2022 5c33 3030 025c 3330 3150 [514 "\300.\301P │ │ │ +0000ad80: 025c 225c 3230 3511 005c 3330 325c 3330 .\"\205..\302\30 │ │ │ +0000ad90: 3302 5c22 5c32 3130 5c33 3034 5c33 3035 3.\"\210\304\305 │ │ │ +0000ada0: 215c 3230 3722 205b 7374 7269 6e67 2d6d !\207" [string-m │ │ │ +0000adb0: 6174 6368 2022 2525 2864 6961 7279 2d64 atch "%%(diary-d │ │ │ +0000adc0: 6174 6520 5c5c 285b 5e29 5d2b 5c5c 2929 ate \\([^)]+\\)) │ │ │ +0000add0: 5c5c 732d 2a5c 5c28 2e2a 3f5c 5c29 203f \\s-*\\(.*?\\) ? │ │ │ +0000ade0: 2422 2069 6361 6c65 6e64 6172 2d2d 646d $" icalendar--dm │ │ │ +0000adf0: 7367 2022 6469 6172 792d 6461 7465 2025 sg "diary-date % │ │ │ +0000ae00: 7322 2065 7272 6f72 2022 6064 6961 7279 s" error "`diary │ │ │ +0000ae10: 2d64 6174 6527 2069 7320 6e6f 7420 7375 -date' is not su │ │ │ +0000ae20: 7070 6f72 7465 6420 7965 7422 5d20 3520 pported yet"] 5 │ │ │ +0000ae30: 2823 2420 2e20 3434 3132 3329 5d29 0a23 (#$ . 44123)]).# │ │ │ +0000ae40: 4032 3131 2043 6f6e 7665 7274 2060 6469 @211 Convert `di │ │ │ +0000ae50: 6172 792d 6379 636c 6963 2720 6469 6172 ary-cyclic' diar │ │ │ +0000ae60: 7920 656e 7472 7920 746f 2069 4361 6c65 y entry to iCale │ │ │ +0000ae70: 6e64 6172 2066 6f72 6d61 742e 0a4e 4f4e ndar format..NON │ │ │ +0000ae80: 4d41 524b 4552 2069 7320 6120 7265 6775 MARKER is a regu │ │ │ +0000ae90: 6c61 7220 6578 7072 6573 7369 6f6e 206d lar expression m │ │ │ +0000aea0: 6174 6368 696e 6720 7468 6520 7374 6172 atching the star │ │ │ +0000aeb0: 7420 6f66 206e 6f6e 2d6d 6172 6b69 6e67 t of non-marking │ │ │ +0000aec0: 0a65 6e74 7269 6573 2e20 2045 4e54 5259 .entries. ENTRY │ │ │ +0000aed0: 2d4d 4149 4e20 6973 2074 6865 2066 6972 -MAIN is the fir │ │ │ +0000aee0: 7374 206c 696e 6520 6f66 2074 6865 2064 st line of the d │ │ │ +0000aef0: 6961 7279 2065 6e74 7279 2e0a 0a28 666e iary entry...(fn │ │ │ +0000af00: 204e 4f4e 4d41 524b 4552 2045 4e54 5259 NONMARKER ENTRY │ │ │ +0000af10: 2d4d 4149 4e29 1f0a 2864 6566 616c 6961 -MAIN)..(defalia │ │ │ +0000af20: 7320 2769 6361 6c65 6e64 6172 2d2d 636f s 'icalendar--co │ │ │ +0000af30: 6e76 6572 742d 6379 636c 6963 2d74 6f2d nvert-cyclic-to- │ │ │ +0000af40: 6963 616c 2023 5b35 3134 2022 5c33 3030 ical #[514 "\300 │ │ │ +0000af50: 025c 3330 3150 025c 225c 3230 355c 3237 .\301P.\"\205\27 │ │ │ +0000af60: 3100 5c33 3032 015c 3330 335c 3232 345c 1.\302.\303\224\ │ │ │ +0000af70: 3330 335c 3232 3523 5c33 3032 025c 3330 303\225#\302.\30 │ │ │ +0000af80: 345c 3232 345c 3330 345c 3232 3523 5c33 4\224\304\225#\3 │ │ │ +0000af90: 3035 0121 5c33 3035 0221 5c33 3035 035c 05.!\305.!\305.\ │ │ │ +0000afa0: 3330 335c 225c 3330 365c 3330 375c 3232 303\"\306\307\22 │ │ │ +0000afb0: 345c 3230 352f 005c 3330 3206 075c 3330 4\205/.\302..\30 │ │ │ +0000afc0: 375c 3232 345c 3330 375c 3232 3523 5c33 7\224\307\225#\3 │ │ │ +0000afd0: 3130 5c32 3234 5c32 3035 3c00 5c33 3032 10\224\205<.\302 │ │ │ +0000afe0: 0608 5c33 3130 5c32 3234 5c33 3130 5c32 ..\310\224\310\2 │ │ │ +0000aff0: 3235 235c 225c 3330 365c 3331 315c 3232 25#\"\306\311\22 │ │ │ +0000b000: 345c 3230 354b 005c 3330 3206 085c 3331 4\205K.\302..\31 │ │ │ +0000b010: 315c 3232 345c 3331 315c 3232 3523 5c33 1\224\311\225#\3 │ │ │ +0000b020: 3132 5c32 3234 5c32 3035 5800 5c33 3032 12\224\205X.\302 │ │ │ +0000b030: 0609 5c33 3132 5c32 3234 5c33 3132 5c32 ..\312\224\312\2 │ │ │ +0000b040: 3235 235c 225c 3331 335c 3330 3206 095c 25#\"\313\302..\ │ │ │ +0000b050: 3331 345c 3232 345c 3331 345c 3232 3523 314\224\314\225# │ │ │ +0000b060: 215c 3331 355c 3331 3606 5c6e 5c22 5c32 !\315\316.\n\"\2 │ │ │ +0000b070: 3130 025c 3230 335c 3230 3200 015c 3230 10.\203\202..\20 │ │ │ +0000b080: 345c 3230 3200 5c33 3137 5c33 3230 5c33 4\202.\317\320\3 │ │ │ +0000b090: 3231 5c33 3232 0606 2321 5c33 3233 5c33 21\322..#!\323\3 │ │ │ +0000b0a0: 3234 5c33 3235 035c 5c5c 225c 3236 3203 24\325.\\\"\262. │ │ │ +0000b0b0: 5c32 3130 5c33 3236 035c 3230 335c 3231 \210\326.\203\21 │ │ │ +0000b0c0: 3300 5c33 3237 5c32 3032 5c32 3134 005c 3.\327\202\214.\ │ │ │ +0000b0d0: 3333 3006 0705 5c32 3036 5c32 3233 005c 330...\206\223.\ │ │ │ +0000b0e0: 3332 325c 3333 3106 065c 3230 335c 3233 322\331..\203\23 │ │ │ +0000b0f0: 3500 5c33 3237 5c32 3032 5c32 3336 005c 5.\327\202\236.\ │ │ │ +0000b100: 3333 3006 075c 3230 335c 3235 3000 065c 330..\203\250..\ │ │ │ +0000b110: 6e5c 3230 325c 3235 3200 0609 0608 5c32 n\202\252.....\2 │ │ │ +0000b120: 3036 5c32 3630 005c 3332 325c 3333 3206 06\260.\322\332. │ │ │ +0000b130: 105c 3236 305c 6e01 425c 3236 365c 3231 .\260\n.B\266\21 │ │ │ +0000b140: 305c 3230 3722 205b 7374 7269 6e67 2d6d 0\207" [string-m │ │ │ +0000b150: 6174 6368 2022 2525 2864 6961 7279 2d63 atch "%%(diary-c │ │ │ +0000b160: 7963 6c69 6320 5c5c 285b 5e20 5d2b 5c5c yclic \\([^ ]+\\ │ │ │ +0000b170: 2920 2b5c 5c28 5b5e 202f 5d2b 5b20 2f5d ) +\\([^ /]+[ /] │ │ │ +0000b180: 2b5b 5e20 2f5d 2b5b 202f 5d2b 5b5e 205d +[^ /]+[ /]+[^ ] │ │ │ +0000b190: 2b5c 5c29 295c 5c73 2d2a 5c5c 285c 5c28 +\\))\\s-*\\(\\( │ │ │ +0000b1a0: 5b30 2d39 5d5b 302d 395d 3f3a 5b30 2d39 [0-9][0-9]?:[0-9 │ │ │ +0000b1b0: 5d5b 302d 395d 5c5c 295c 5c28 5b61 705d ][0-9]\\)\\([ap] │ │ │ +0000b1c0: 6d5c 5c29 3f5c 5c28 2d5c 5c28 5b30 2d39 m\\)?\\(-\\([0-9 │ │ │ +0000b1d0: 5d5b 302d 395d 3f3a 5b30 2d39 5d5b 302d ][0-9]?:[0-9][0- │ │ │ +0000b1e0: 395d 5c5c 295c 5c28 5b61 705d 6d5c 5c29 9]\\)\\([ap]m\\) │ │ │ +0000b1f0: 3f5c 5c29 3f5c 5c29 3f5c 5c73 2d2a 5c5c ?\\)?\\)?\\s-*\\ │ │ │ +0000b200: 282e 2a3f 5c5c 2920 3f24 2220 7375 6273 (.*?\\) ?$" subs │ │ │ +0000b210: 7472 696e 6720 3120 3220 6963 616c 656e tring 1 2 icalen │ │ │ +0000b220: 6461 722d 2d64 6174 6573 7472 696e 672d dar--datestring- │ │ │ +0000b230: 746f 2d69 736f 6461 7465 2069 6361 6c65 to-isodate icale │ │ │ +0000b240: 6e64 6172 2d2d 6469 6172 7974 696d 652d ndar--diarytime- │ │ │ +0000b250: 746f 2d69 736f 7469 6d65 2034 2035 2037 to-isotime 4 5 7 │ │ │ +0000b260: 2038 2069 6361 6c65 6e64 6172 2d2d 636f 8 icalendar--co │ │ │ +0000b270: 6e76 6572 742d 7374 7269 6e67 2d66 6f72 nvert-string-for │ │ │ +0000b280: 2d65 7870 6f72 7420 3920 6963 616c 656e -export 9 icalen │ │ │ +0000b290: 6461 722d 2d64 6d73 6720 2264 6961 7279 dar--dmsg "diary │ │ │ +0000b2a0: 2d63 7963 6c69 6320 2573 2220 7265 6164 -cyclic %s" read │ │ │ +0000b2b0: 2072 6570 6c61 6365 2d72 6567 6578 702d replace-regexp- │ │ │ +0000b2c0: 696e 2d73 7472 696e 6720 225e 5430 3f22 in-string "^T0?" │ │ │ +0000b2d0: 2022 2220 666f 726d 6174 2022 5425 3036 "" format "T%06 │ │ │ +0000b2e0: 6422 2031 3030 3030 2022 5c6e 4454 5354 d" 10000 "\nDTST │ │ │ +0000b2f0: 4152 543b 2220 2256 414c 5545 3d44 4154 ART;" "VALUE=DAT │ │ │ +0000b300: 452d 5449 4d45 3a22 2022 5641 4c55 453d E-TIME:" "VALUE= │ │ │ +0000b310: 4441 5445 3a22 2022 5c6e 4454 454e 443b DATE:" "\nDTEND; │ │ │ +0000b320: 2220 225c 6e52 5255 4c45 3a46 5245 513d " "\nRRULE:FREQ= │ │ │ +0000b330: 4441 494c 593b 494e 5445 5256 414c 3d22 DAILY;INTERVAL=" │ │ │ +0000b340: 5d20 3230 2028 2324 202e 2034 3436 3133 ] 20 (#$ . 44613 │ │ │ +0000b350: 295d 290a 2340 3231 3620 436f 6e76 6572 )]).#@216 Conver │ │ │ +0000b360: 7420 6064 6961 7279 2d61 6e6e 6976 6572 t `diary-anniver │ │ │ +0000b370: 7361 7279 2720 6469 6172 7920 656e 7472 sary' diary entr │ │ │ +0000b380: 7920 746f 2069 4361 6c65 6e64 6172 2066 y to iCalendar f │ │ │ +0000b390: 6f72 6d61 742e 0a4e 4f4e 4d41 524b 4552 ormat..NONMARKER │ │ │ +0000b3a0: 2069 7320 6120 7265 6775 6c61 7220 6578 is a regular ex │ │ │ +0000b3b0: 7072 6573 7369 6f6e 206d 6174 6368 696e pression matchin │ │ │ +0000b3c0: 6720 7468 6520 7374 6172 7420 6f66 206e g the start of n │ │ │ +0000b3d0: 6f6e 2d6d 6172 6b69 6e67 0a65 6e74 7269 on-marking.entri │ │ │ +0000b3e0: 6573 2e20 2045 4e54 5259 2d4d 4149 4e20 es. ENTRY-MAIN │ │ │ +0000b3f0: 6973 2074 6865 2066 6972 7374 206c 696e is the first lin │ │ │ +0000b400: 6520 6f66 2074 6865 2064 6961 7279 2065 e of the diary e │ │ │ +0000b410: 6e74 7279 2e0a 0a28 666e 204e 4f4e 4d41 ntry...(fn NONMA │ │ │ +0000b420: 524b 4552 2045 4e54 5259 2d4d 4149 4e29 RKER ENTRY-MAIN) │ │ │ +0000b430: 1f0a 2864 6566 616c 6961 7320 2769 6361 ..(defalias 'ica │ │ │ +0000b440: 6c65 6e64 6172 2d2d 636f 6e76 6572 742d lendar--convert- │ │ │ +0000b450: 616e 6e69 7665 7273 6172 792d 746f 2d69 anniversary-to-i │ │ │ +0000b460: 6361 6c20 235b 3531 3420 225c 3330 3002 cal #[514 "\300. │ │ │ +0000b470: 5c33 3031 5002 5c22 5c32 3035 5c32 3537 \301P.\"\205\257 │ │ │ +0000b480: 005c 3330 3201 5c33 3033 5c32 3234 5c33 .\302.\303\224\3 │ │ │ +0000b490: 3033 5c32 3235 235c 3330 3401 215c 3330 03\225#\304.!\30 │ │ │ +0000b4a0: 3402 5c33 3033 5c22 5c33 3035 5c33 3036 4.\303\"\305\306 │ │ │ +0000b4b0: 5c32 3234 5c32 3035 2400 5c33 3032 055c \224\205$.\302.\ │ │ │ +0000b4c0: 3330 365c 3232 345c 3330 365c 3232 3523 306\224\306\225# │ │ │ +0000b4d0: 5c33 3037 5c32 3234 5c32 3035 3100 5c33 \307\224\2051.\3 │ │ │ +0000b4e0: 3032 0606 5c33 3037 5c32 3234 5c33 3037 02..\307\224\307 │ │ │ +0000b4f0: 5c32 3235 235c 225c 3330 355c 3331 305c \225#\"\305\310\ │ │ │ +0000b500: 3232 345c 3230 3540 005c 3330 3206 065c 224\205@.\302..\ │ │ │ +0000b510: 3331 305c 3232 345c 3331 305c 3232 3523 310\224\310\225# │ │ │ +0000b520: 5c33 3131 5c32 3234 5c32 3035 4d00 5c33 \311\224\205M.\3 │ │ │ +0000b530: 3032 0607 5c33 3131 5c32 3234 5c33 3131 02..\311\224\311 │ │ │ +0000b540: 5c32 3235 235c 225c 3331 325c 3330 3206 \225#\"\312\302. │ │ │ +0000b550: 075c 3331 335c 3232 345c 3331 335c 3232 .\313\224\313\22 │ │ │ +0000b560: 3523 215c 3331 345c 3331 3506 085c 225c 5#!\314\315..\"\ │ │ │ +0000b570: 3231 3002 5c32 3033 7700 015c 3230 3477 210.\203w..\204w │ │ │ +0000b580: 005c 3331 365c 3331 375c 3332 305c 3332 .\316\317\320\32 │ │ │ +0000b590: 3106 0623 215c 3332 325c 3332 335c 3332 1..#!\322\323\32 │ │ │ +0000b5a0: 3403 5c5c 5c22 5c32 3632 035c 3231 305c 4.\\\"\262.\210\ │ │ │ +0000b5b0: 3332 3503 5c32 3033 5c32 3030 005c 3332 325.\203\200.\32 │ │ │ +0000b5c0: 365c 3230 325c 3230 3100 5c33 3237 0606 6\202\201.\327.. │ │ │ +0000b5d0: 055c 3230 365c 3231 3000 5c33 3231 5c33 .\206\210.\321\3 │ │ │ +0000b5e0: 3330 0606 5c32 3033 5c32 3232 005c 3332 30..\203\222.\32 │ │ │ +0000b5f0: 365c 3230 325c 3232 3300 5c33 3237 0609 6\202\223.\327.. │ │ │ +0000b600: 0608 5c32 3036 5c32 3333 005c 3332 315c ..\206\233.\321\ │ │ │ +0000b610: 3333 315c 3330 3206 0e5c 3330 375c 3331 331\302..\307\31 │ │ │ +0000b620: 3023 5c33 3332 5c33 3032 0610 5c33 3130 0#\332\302..\310 │ │ │ +0000b630: 5c33 3133 235c 3236 305c 6601 425c 3236 \313#\260\f.B\26 │ │ │ +0000b640: 365c 3230 365c 3230 3722 205b 7374 7269 6\206\207" [stri │ │ │ +0000b650: 6e67 2d6d 6174 6368 2022 2525 2864 6961 ng-match "%%(dia │ │ │ +0000b660: 7279 2d61 6e6e 6976 6572 7361 7279 205c ry-anniversary \ │ │ │ +0000b670: 5c28 5b5e 295d 2b5c 5c29 295c 5c73 2d2a \([^)]+\\))\\s-* │ │ │ +0000b680: 5c5c 285c 5c28 5b30 2d39 5d5b 302d 395d \\(\\([0-9][0-9] │ │ │ +0000b690: 3f3a 5b30 2d39 5d5b 302d 395d 5c5c 295c ?:[0-9][0-9]\\)\ │ │ │ +0000b6a0: 5c28 5b61 705d 6d5c 5c29 3f5c 5c28 2d5c \([ap]m\\)?\\(-\ │ │ │ +0000b6b0: 5c28 5b30 2d39 5d5b 302d 395d 3f3a 5b30 \([0-9][0-9]?:[0 │ │ │ +0000b6c0: 2d39 5d5b 302d 395d 5c5c 295c 5c28 5b61 -9][0-9]\\)\\([a │ │ │ +0000b6d0: 705d 6d5c 5c29 3f5c 5c29 3f5c 5c29 3f5c p]m\\)?\\)?\\)?\ │ │ │ +0000b6e0: 5c73 2d2a 5c5c 282e 2a3f 5c5c 2920 3f24 \s-*\\(.*?\\) ?$ │ │ │ +0000b6f0: 2220 7375 6273 7472 696e 6720 3120 6963 " substring 1 ic │ │ │ +0000b700: 616c 656e 6461 722d 2d64 6174 6573 7472 alendar--datestr │ │ │ +0000b710: 696e 672d 746f 2d69 736f 6461 7465 2069 ing-to-isodate i │ │ │ +0000b720: 6361 6c65 6e64 6172 2d2d 6469 6172 7974 calendar--diaryt │ │ │ +0000b730: 696d 652d 746f 2d69 736f 7469 6d65 2033 ime-to-isotime 3 │ │ │ +0000b740: 2034 2036 2037 2069 6361 6c65 6e64 6172 4 6 7 icalendar │ │ │ +0000b750: 2d2d 636f 6e76 6572 742d 7374 7269 6e67 --convert-string │ │ │ +0000b760: 2d66 6f72 2d65 7870 6f72 7420 3820 6963 -for-export 8 ic │ │ │ +0000b770: 616c 656e 6461 722d 2d64 6d73 6720 2264 alendar--dmsg "d │ │ │ +0000b780: 6961 7279 2d61 6e6e 6976 6572 7361 7279 iary-anniversary │ │ │ +0000b790: 2025 7322 2072 6561 6420 7265 706c 6163 %s" read replac │ │ │ +0000b7a0: 652d 7265 6765 7870 2d69 6e2d 7374 7269 e-regexp-in-stri │ │ │ +0000b7b0: 6e67 2022 5e54 303f 2220 2222 2066 6f72 ng "^T0?" "" for │ │ │ +0000b7c0: 6d61 7420 2254 2530 3664 2220 3130 3030 mat "T%06d" 1000 │ │ │ +0000b7d0: 3020 225c 6e44 5453 5441 5254 3b22 2022 0 "\nDTSTART;" " │ │ │ +0000b7e0: 5641 4c55 453d 4441 5445 2d54 494d 453a VALUE=DATE-TIME: │ │ │ +0000b7f0: 2220 2256 414c 5545 3d44 4154 453a 2220 " "VALUE=DATE:" │ │ │ +0000b800: 225c 6e44 5445 4e44 3b22 2022 5c6e 5252 "\nDTEND;" "\nRR │ │ │ +0000b810: 554c 453a 4652 4551 3d59 4541 524c 593b ULE:FREQ=YEARLY; │ │ │ +0000b820: 494e 5445 5256 414c 3d31 3b42 594d 4f4e INTERVAL=1;BYMON │ │ │ +0000b830: 5448 3d22 2022 3b42 594d 4f4e 5448 4441 TH=" ";BYMONTHDA │ │ │ +0000b840: 593d 225d 2032 3320 2823 2420 2e20 3435 Y="] 23 (#$ . 45 │ │ │ +0000b850: 3931 3429 5d29 0a23 4032 3932 2049 6d70 914)]).#@292 Imp │ │ │ +0000b860: 6f72 7420 616e 2069 4361 6c65 6e64 6172 ort an iCalendar │ │ │ +0000b870: 2066 696c 6520 616e 6420 6170 7065 6e64 file and append │ │ │ +0000b880: 2074 6f20 6120 6469 6172 7920 6669 6c65 to a diary file │ │ │ +0000b890: 2e0a 4172 6775 6d65 6e74 2049 4341 4c2d ..Argument ICAL- │ │ │ +0000b8a0: 4649 4c45 4e41 4d45 206f 7574 7075 7420 FILENAME output │ │ │ +0000b8b0: 6943 616c 656e 6461 7220 6669 6c65 2e0a iCalendar file.. │ │ │ +0000b8c0: 4172 6775 6d65 6e74 2044 4941 5259 2d46 Argument DIARY-F │ │ │ +0000b8d0: 494c 454e 414d 4520 696e 7075 7420 6064 ILENAME input `d │ │ │ +0000b8e0: 6961 7279 2d66 696c 6527 2e0a 4f70 7469 iary-file'..Opti │ │ │ +0000b8f0: 6f6e 616c 2061 7267 756d 656e 7420 4e4f onal argument NO │ │ │ +0000b900: 4e2d 4d41 524b 494e 4720 6465 7465 726d N-MARKING determ │ │ │ +0000b910: 696e 6573 2077 6865 7468 6572 2065 7665 ines whether eve │ │ │ +0000b920: 6e74 7320 6172 6520 6372 6561 7465 6420 nts are created │ │ │ +0000b930: 6173 0a6e 6f6e 2d6d 6172 6b69 6e67 206f as.non-marking o │ │ │ +0000b940: 7220 6e6f 742e 0a0a 2866 6e20 4943 414c r not...(fn ICAL │ │ │ +0000b950: 2d46 494c 454e 414d 4520 4449 4152 592d -FILENAME DIARY- │ │ │ +0000b960: 4649 4c45 4e41 4d45 2026 6f70 7469 6f6e FILENAME &option │ │ │ +0000b970: 616c 204e 4f4e 2d4d 4152 4b49 4e47 291f al NON-MARKING). │ │ │ +0000b980: 0a28 6465 6661 6c69 6173 2027 6963 616c .(defalias 'ical │ │ │ +0000b990: 656e 6461 722d 696d 706f 7274 2d66 696c endar-import-fil │ │ │ +0000b9a0: 6520 235b 3737 3020 2272 5c33 3030 0321 e #[770 "r\300.! │ │ │ +0000b9b0: 715c 3231 305c 3330 3102 5c33 3032 0323 q\210\301.\302.# │ │ │ +0000b9c0: 295c 3230 3722 205b 6669 6e64 2d66 696c )\207" [find-fil │ │ │ +0000b9d0: 6520 6963 616c 656e 6461 722d 696d 706f e icalendar-impo │ │ │ +0000b9e0: 7274 2d62 7566 6665 7220 745d 2037 2028 rt-buffer t] 7 ( │ │ │ +0000b9f0: 2324 202e 2034 3731 3937 2920 2266 496d #$ . 47197) "fIm │ │ │ +0000ba00: 706f 7274 2069 4361 6c65 6e64 6172 2064 port iCalendar d │ │ │ +0000ba10: 6174 6120 6672 6f6d 2066 696c 653a 205c ata from file: \ │ │ │ +0000ba20: 6e46 696e 746f 2064 6961 7279 2066 696c nFinto diary fil │ │ │ +0000ba30: 653a 5c6e 5022 5d29 0a23 4036 3535 2045 e:\nP"]).#@655 E │ │ │ +0000ba40: 7874 7261 6374 2069 4361 6c65 6e64 6172 xtract iCalendar │ │ │ +0000ba50: 2065 7665 6e74 7320 6672 6f6d 2063 7572 events from cur │ │ │ +0000ba60: 7265 6e74 2062 7566 6665 722e 0a0a 5468 rent buffer...Th │ │ │ +0000ba70: 6973 2066 756e 6374 696f 6e20 7365 6172 is function sear │ │ │ +0000ba80: 6368 6573 2074 6865 2063 7572 7265 6e74 ches the current │ │ │ +0000ba90: 2062 7566 6665 7220 666f 7220 7468 6520 buffer for the │ │ │ +0000baa0: 6669 7273 7420 6943 616c 656e 6461 720a first iCalendar. │ │ │ +0000bab0: 6f62 6a65 6374 2c20 7265 6164 7320 6974 object, reads it │ │ │ +0000bac0: 2061 6e64 2061 6464 7320 616c 6c20 5645 and adds all VE │ │ │ +0000bad0: 5645 4e54 2065 6c65 6d65 6e74 7320 746f VENT elements to │ │ │ +0000bae0: 2074 6865 2064 6961 7279 0a44 4941 5259 the diary.DIARY │ │ │ +0000baf0: 2d46 494c 454e 414d 452e 0a0a 4974 2077 -FILENAME...It w │ │ │ +0000bb00: 696c 6c20 6173 6b20 666f 7220 6561 6368 ill ask for each │ │ │ +0000bb10: 2061 7070 6f69 6e74 6d65 6e74 2077 6865 appointment whe │ │ │ +0000bb20: 7468 6572 2074 6f20 6164 6420 6974 2074 ther to add it t │ │ │ +0000bb30: 6f20 7468 6520 6469 6172 790a 756e 6c65 o the diary.unle │ │ │ +0000bb40: 7373 2044 4f2d 4e4f 542d 4153 4b20 6973 ss DO-NOT-ASK is │ │ │ +0000bb50: 206e 6f6e 2d6e 696c 2e20 2057 6865 6e20 non-nil. When │ │ │ +0000bb60: 6361 6c6c 6564 2069 6e74 6572 6163 7469 called interacti │ │ │ +0000bb70: 7665 6c79 2c0a 444f 2d4e 4f54 2d41 534b vely,.DO-NOT-ASK │ │ │ +0000bb80: 2069 7320 6e69 6c2c 2073 6f20 7468 6174 is nil, so that │ │ │ +0000bb90: 2079 6f75 2061 7265 2061 736b 6564 2066 you are asked f │ │ │ +0000bba0: 6f72 2065 6163 6820 6576 656e 742e 0a0a or each event... │ │ │ +0000bbb0: 4e4f 4e2d 4d41 524b 494e 4720 6465 7465 NON-MARKING dete │ │ │ +0000bbc0: 726d 696e 6573 2077 6865 7468 6572 2064 rmines whether d │ │ │ +0000bbd0: 6961 7279 2065 7665 6e74 7320 6172 6520 iary events are │ │ │ +0000bbe0: 6372 6561 7465 6420 6173 0a6e 6f6e 2d6d created as.non-m │ │ │ +0000bbf0: 6172 6b69 6e67 2e0a 0a52 6574 7572 6e20 arking...Return │ │ │ +0000bc00: 636f 6465 2074 206d 6561 6e73 2074 6861 code t means tha │ │ │ +0000bc10: 7420 696d 706f 7274 696e 6720 776f 726b t importing work │ │ │ +0000bc20: 6564 2077 656c 6c2c 2072 6574 7572 6e20 ed well, return │ │ │ +0000bc30: 636f 6465 206e 696c 0a6d 6561 6e73 2074 code nil.means t │ │ │ +0000bc40: 6861 7420 616e 2065 7272 6f72 2068 6173 hat an error has │ │ │ +0000bc50: 206f 6363 7572 7265 642e 2020 4572 726f occurred. Erro │ │ │ +0000bc60: 7220 6d65 7373 6167 6573 2077 696c 6c20 r messages will │ │ │ +0000bc70: 6265 2069 6e20 7468 650a 6275 6666 6572 be in the.buffer │ │ │ +0000bc80: 2060 2a69 6361 6c65 6e64 6172 2d65 7272 `*icalendar-err │ │ │ +0000bc90: 6f72 732a 272e 0a0a 2866 6e20 266f 7074 ors*'...(fn &opt │ │ │ +0000bca0: 696f 6e61 6c20 4449 4152 592d 4649 4c45 ional DIARY-FILE │ │ │ +0000bcb0: 4e41 4d45 2044 4f2d 4e4f 542d 4153 4b20 NAME DO-NOT-ASK │ │ │ +0000bcc0: 4e4f 4e2d 4d41 524b 494e 4729 1f0a 2864 NON-MARKING)..(d │ │ │ +0000bcd0: 6566 616c 6961 7320 2769 6361 6c65 6e64 efalias 'icalend │ │ │ +0000bce0: 6172 2d69 6d70 6f72 742d 6275 6666 6572 ar-import-buffer │ │ │ +0000bcf0: 2023 5b37 3638 2022 725c 3330 305c 3330 #[768 "r\300\30 │ │ │ +0000bd00: 3121 5c32 3130 5c33 3032 7021 715c 3231 1!\210\302p!q\21 │ │ │ +0000bd10: 3065 625c 3231 305c 3330 305c 3330 3321 0eb\210\300\303! │ │ │ +0000bd20: 5c32 3130 5c33 3034 5c33 3035 5c33 3036 \210\304\305\306 │ │ │ +0000bd30: 5c33 3037 235c 3230 335a 005c 3330 365c \307#\203Z.\306\ │ │ │ +0000bd40: 3231 315c 3330 305c 3331 3021 5c32 3130 211\300\310!\210 │ │ │ +0000bd50: 5c33 3131 205c 3231 305c 3331 325c 3330 \311 \210\312\30 │ │ │ +0000bd60: 365c 3231 315c 225c 3236 3202 5c33 3030 6\211\"\262.\300 │ │ │ +0000bd70: 5c33 3133 215c 3231 305c 3330 305c 3331 \313!\210\300\31 │ │ │ +0000bd80: 3421 5c32 3130 5c33 3135 0206 0606 0606 4!\210\315...... │ │ │ +0000bd90: 0624 5c32 3632 0104 5c32 3033 4f00 5c33 .$\262..\203O.\3 │ │ │ +0000bda0: 3136 0521 5c32 3131 5c32 3033 4e00 725c 16.!\211\203N.r\ │ │ │ +0000bdb0: 3231 3171 5c32 3130 5c33 3137 205c 3231 211q\210\317 \21 │ │ │ +0000bdc0: 3029 5c32 3130 5c33 3030 5c33 3230 215c 0)\210\300\320!\ │ │ │ +0000bdd0: 3231 305c 3231 313f 5c32 3636 5c32 3032 210\211?\266\202 │ │ │ +0000bde0: 5c32 3032 5f00 5c33 3030 5c33 3231 215c \202_.\300\321!\ │ │ │ +0000bdf0: 3231 305c 3330 3629 5c32 3037 2220 5b6d 210\306)\207" [m │ │ │ +0000be00: 6573 7361 6765 2022 5072 6570 6172 696e essage "Preparin │ │ │ +0000be10: 6720 6943 616c 656e 6461 722e 2e2e 2220 g iCalendar..." │ │ │ +0000be20: 6963 616c 656e 6461 722d 2d67 6574 2d75 icalendar--get-u │ │ │ +0000be30: 6e66 6f6c 6465 642d 6275 6666 6572 2022 nfolded-buffer " │ │ │ +0000be40: 5072 6570 6172 696e 6720 6943 616c 656e Preparing iCalen │ │ │ +0000be50: 6461 722e 2e2e 646f 6e65 2220 7265 2d73 dar...done" re-s │ │ │ +0000be60: 6561 7263 682d 666f 7277 6172 6420 225e earch-forward "^ │ │ │ +0000be70: 4245 4749 4e3a 5643 414c 454e 4441 525c BEGIN:VCALENDAR\ │ │ │ +0000be80: 5c73 2d2a 2422 206e 696c 2074 2022 5265 \s-*$" nil t "Re │ │ │ +0000be90: 6164 696e 6720 6943 616c 656e 6461 722e ading iCalendar. │ │ │ +0000bea0: 2e2e 2220 6265 6769 6e6e 696e 672d 6f66 .." beginning-of │ │ │ +0000beb0: 2d6c 696e 6520 6963 616c 656e 6461 722d -line icalendar- │ │ │ +0000bec0: 2d72 6561 642d 656c 656d 656e 7420 2252 -read-element "R │ │ │ +0000bed0: 6561 6469 6e67 2069 4361 6c65 6e64 6172 eading iCalendar │ │ │ +0000bee0: 2e2e 2e64 6f6e 6522 2022 436f 6e76 6572 ...done" "Conver │ │ │ +0000bef0: 7469 6e67 2069 4361 6c65 6e64 6172 2e2e ting iCalendar.. │ │ │ +0000bf00: 2e22 2069 6361 6c65 6e64 6172 2d2d 636f ." icalendar--co │ │ │ +0000bf10: 6e76 6572 742d 6963 616c 2d74 6f2d 6469 nvert-ical-to-di │ │ │ +0000bf20: 6172 7920 6669 6e64 2d62 7566 6665 722d ary find-buffer- │ │ │ +0000bf30: 7669 7369 7469 6e67 2073 6176 652d 6275 visiting save-bu │ │ │ +0000bf40: 6666 6572 2022 436f 6e76 6572 7469 6e67 ffer "Converting │ │ │ +0000bf50: 2069 4361 6c65 6e64 6172 2e2e 2e64 6f6e iCalendar...don │ │ │ +0000bf60: 6522 2022 4375 7272 656e 7420 6275 6666 e" "Current buff │ │ │ +0000bf70: 6572 2064 6f65 7320 6e6f 7420 636f 6e74 er does not cont │ │ │ +0000bf80: 6169 6e20 6943 616c 656e 6461 7220 636f ain iCalendar co │ │ │ +0000bf90: 6e74 656e 7473 2122 5d20 3130 2028 2324 ntents!"] 10 (#$ │ │ │ +0000bfa0: 202e 2034 3736 3739 2920 6e69 6c5d 290a . 47679) nil]). │ │ │ +0000bfb0: 2340 3637 2043 7265 6174 6520 6120 7374 #@67 Create a st │ │ │ +0000bfc0: 7269 6e67 2072 6570 7265 7365 6e74 6174 ring representat │ │ │ +0000bfd0: 696f 6e20 6f66 2061 6e20 6943 616c 656e ion of an iCalen │ │ │ +0000bfe0: 6461 7220 4556 454e 542e 0a0a 2866 6e20 dar EVENT...(fn │ │ │ +0000bff0: 4556 454e 5429 1f0a 2864 6566 616c 6961 EVENT)..(defalia │ │ │ +0000c000: 7320 2769 6361 6c65 6e64 6172 2d2d 666f s 'icalendar--fo │ │ │ +0000c010: 726d 6174 2d69 6361 6c2d 6576 656e 7420 rmat-ical-event │ │ │ +0000c020: 235b 3235 3720 225c 3330 3208 215c 3230 #[257 "\302.!\20 │ │ │ +0000c030: 335c 6e00 0801 215c 3230 3708 435c 3330 3\n...!\207.C\30 │ │ │ +0000c040: 335c 3330 3401 195c 3330 355c 3330 365c 3\304..\305\306\ │ │ │ +0000c050: 3330 375c 3331 305c 3331 315c 3331 3206 307\310\311\312. │ │ │ +0000c060: 0906 095c 225c 3331 335c 225c 3331 345c ...\"\313\"\314\ │ │ │ +0000c070: 3331 3525 025c 225c 3231 3002 5c32 3432 315%.\"\210.\242 │ │ │ +0000c080: 295c 3230 3722 205b 6963 616c 656e 6461 )\207" [icalenda │ │ │ +0000c090: 722d 696d 706f 7274 2d66 6f72 6d61 7420 r-import-format │ │ │ +0000c0a0: 6361 7365 2d66 6f6c 642d 7365 6172 6368 case-fold-search │ │ │ +0000c0b0: 2066 756e 6374 696f 6e70 206e 696c 2028 functionp nil ( │ │ │ +0000c0c0: 2822 2563 2220 434c 4153 5320 6963 616c ("%c" CLASS ical │ │ │ +0000c0d0: 656e 6461 722d 696d 706f 7274 2d66 6f72 endar-import-for │ │ │ +0000c0e0: 6d61 742d 636c 6173 7329 2028 2225 6422 mat-class) ("%d" │ │ │ +0000c0f0: 2044 4553 4352 4950 5449 4f4e 2069 6361 DESCRIPTION ica │ │ │ +0000c100: 6c65 6e64 6172 2d69 6d70 6f72 742d 666f lendar-import-fo │ │ │ +0000c110: 726d 6174 2d64 6573 6372 6970 7469 6f6e rmat-description │ │ │ +0000c120: 2920 2822 256c 2220 4c4f 4341 5449 4f4e ) ("%l" LOCATION │ │ │ +0000c130: 2069 6361 6c65 6e64 6172 2d69 6d70 6f72 icalendar-impor │ │ │ +0000c140: 742d 666f 726d 6174 2d6c 6f63 6174 696f t-format-locatio │ │ │ +0000c150: 6e29 2028 2225 6f22 204f 5247 414e 495a n) ("%o" ORGANIZ │ │ │ +0000c160: 4552 2069 6361 6c65 6e64 6172 2d69 6d70 ER icalendar-imp │ │ │ +0000c170: 6f72 742d 666f 726d 6174 2d6f 7267 616e ort-format-organ │ │ │ +0000c180: 697a 6572 2920 2822 2573 2220 5355 4d4d izer) ("%s" SUMM │ │ │ +0000c190: 4152 5920 6963 616c 656e 6461 722d 696d ARY icalendar-im │ │ │ +0000c1a0: 706f 7274 2d66 6f72 6d61 742d 7375 6d6d port-format-summ │ │ │ +0000c1b0: 6172 7929 2028 2225 7422 2053 5441 5455 ary) ("%t" STATU │ │ │ +0000c1c0: 5320 6963 616c 656e 6461 722d 696d 706f S icalendar-impo │ │ │ +0000c1d0: 7274 2d66 6f72 6d61 742d 7374 6174 7573 rt-format-status │ │ │ +0000c1e0: 2920 2822 2575 2220 5552 4c20 6963 616c ) ("%u" URL ical │ │ │ +0000c1f0: 656e 6461 722d 696d 706f 7274 2d66 6f72 endar-import-for │ │ │ +0000c200: 6d61 742d 7572 6c29 2028 2225 5522 2055 mat-url) ("%U" U │ │ │ +0000c210: 4944 2069 6361 6c65 6e64 6172 2d69 6d70 ID icalendar-imp │ │ │ +0000c220: 6f72 742d 666f 726d 6174 2d75 6964 2929 ort-format-uid)) │ │ │ +0000c230: 206d 6170 6320 6d61 6b65 2d62 7974 652d mapc make-byte- │ │ │ +0000c240: 636f 6465 2032 3537 2022 5c32 3131 4001 code 257 "\211@. │ │ │ +0000c250: 4140 0241 4140 5c33 3032 5c33 3030 035c A@.AA@\302\300.\ │ │ │ +0000c260: 225c 3330 3301 5c32 3033 2500 0147 5c33 "\303.\203%..G\3 │ │ │ +0000c270: 3034 565c 3230 3325 005c 3330 355c 3330 04V\203%.\305\30 │ │ │ +0000c280: 365c 3330 3704 2105 4a5c 3331 305c 3231 6\307.!.J\310\21 │ │ │ +0000c290: 3125 5c32 3632 015c 3330 315c 3330 3506 1%\262.\301\305. │ │ │ +0000c2a0: 0603 5c33 3031 5c32 3432 5c33 3130 5c32 ..\301\242\310\2 │ │ │ +0000c2b0: 3131 255c 3234 305c 3230 3722 2076 636f 11%\240\207" vco │ │ │ +0000c2c0: 6e63 6174 2076 6563 746f 7220 5b69 6361 ncat vector [ica │ │ │ +0000c2d0: 6c65 6e64 6172 2d2d 6765 742d 6576 656e lendar--get-even │ │ │ +0000c2e0: 742d 7072 6f70 6572 7479 2022 2220 3020 t-property "" 0 │ │ │ +0000c2f0: 7265 706c 6163 652d 7265 6765 7870 2d69 replace-regexp-i │ │ │ +0000c300: 6e2d 7374 7269 6e67 2022 2573 2220 6963 n-string "%s" ic │ │ │ +0000c310: 616c 656e 6461 722d 2d63 6f6e 7665 7274 alendar--convert │ │ │ +0000c320: 2d73 7472 696e 672d 666f 722d 696d 706f -string-for-impo │ │ │ +0000c330: 7274 2074 5d20 3133 2022 5c6e 5c6e 2866 rt t] 13 "\n\n(f │ │ │ +0000c340: 6e20 4929 225d 2031 3220 2823 2420 2e20 n I)"] 12 (#$ . │ │ │ +0000c350: 3439 3037 3729 5d29 0a23 4035 3431 2043 49077)]).#@541 C │ │ │ +0000c360: 6f6e 7665 7274 2069 4361 6c65 6e64 6172 onvert iCalendar │ │ │ +0000c370: 2064 6174 6120 746f 2061 6e20 456d 6163 data to an Emac │ │ │ +0000c380: 7320 6469 6172 7920 6669 6c65 2e0a 496d s diary file..Im │ │ │ +0000c390: 706f 7274 2056 4556 454e 5453 2066 726f port VEVENTS fro │ │ │ +0000c3a0: 6d20 7468 6520 6943 616c 656e 6461 7220 m the iCalendar │ │ │ +0000c3b0: 6f62 6a65 6374 2049 4341 4c2d 4c49 5354 object ICAL-LIST │ │ │ +0000c3c0: 2061 6e64 2073 6176 6573 2074 6865 6d20 and saves them │ │ │ +0000c3d0: 746f 2061 0a44 4941 5259 2d46 494c 454e to a.DIARY-FILEN │ │ │ +0000c3e0: 414d 452e 2020 4966 2044 4f2d 4e4f 542d AME. If DO-NOT- │ │ │ +0000c3f0: 4153 4b20 6973 206e 696c 2074 6865 2075 ASK is nil the u │ │ │ +0000c400: 7365 7220 6973 2061 736b 6564 2066 6f72 ser is asked for │ │ │ +0000c410: 2065 6163 6820 6576 656e 740a 7768 6574 each event.whet │ │ │ +0000c420: 6865 7220 746f 2061 6374 7561 6c6c 7920 her to actually │ │ │ +0000c430: 696d 706f 7274 2069 742e 2020 4e4f 4e2d import it. NON- │ │ │ +0000c440: 4d41 524b 494e 4720 6465 7465 726d 696e MARKING determin │ │ │ +0000c450: 6573 2077 6865 7468 6572 2064 6961 7279 es whether diary │ │ │ +0000c460: 0a65 7665 6e74 7320 6172 6520 6372 6561 .events are crea │ │ │ +0000c470: 7465 6420 6173 206e 6f6e 2d6d 6172 6b69 ted as non-marki │ │ │ +0000c480: 6e67 2e0a 5468 6973 2066 756e 6374 696f ng..This functio │ │ │ +0000c490: 6e20 6174 7465 6d70 7473 2074 6f20 7265 n attempts to re │ │ │ +0000c4a0: 7475 726e 2074 2069 6620 736f 6d65 7468 turn t if someth │ │ │ +0000c4b0: 696e 6720 676f 6573 2077 726f 6e67 2e20 ing goes wrong. │ │ │ +0000c4c0: 2049 6e20 7468 6973 0a63 6173 6520 616e In this.case an │ │ │ +0000c4d0: 2065 7272 6f72 2073 7472 696e 6720 7768 error string wh │ │ │ +0000c4e0: 6963 6820 6465 7363 7269 6265 7320 616c ich describes al │ │ │ +0000c4f0: 6c20 7468 6520 6572 726f 7273 2061 6e64 l the errors and │ │ │ +0000c500: 2070 726f 626c 656d 7320 6973 0a77 7269 problems is.wri │ │ │ +0000c510: 7474 656e 2069 6e74 6f20 7468 6520 6275 tten into the bu │ │ │ +0000c520: 6666 6572 2060 2a69 6361 6c65 6e64 6172 ffer `*icalendar │ │ │ +0000c530: 2d65 7272 6f72 732a 272e 0a0a 2866 6e20 -errors*'...(fn │ │ │ +0000c540: 4943 414c 2d4c 4953 5420 4449 4152 592d ICAL-LIST DIARY- │ │ │ +0000c550: 4649 4c45 4e41 4d45 2026 6f70 7469 6f6e FILENAME &option │ │ │ +0000c560: 616c 2044 4f2d 4e4f 542d 4153 4b20 4e4f al DO-NOT-ASK NO │ │ │ +0000c570: 4e2d 4d41 524b 494e 4729 1f0a 2864 6566 N-MARKING)..(def │ │ │ +0000c580: 616c 6961 7320 2769 6361 6c65 6e64 6172 alias 'icalendar │ │ │ +0000c590: 2d2d 636f 6e76 6572 742d 6963 616c 2d74 --convert-ical-t │ │ │ +0000c5a0: 6f2d 6469 6172 7920 235b 3130 3236 2022 o-diary #[1026 " │ │ │ +0000c5b0: 5c33 3030 0421 5c33 3031 5c33 3032 5c33 \300.!\301\302\3 │ │ │ +0000c5c0: 3033 5c33 3034 0608 215c 3330 335c 3231 03\304..!\303\21 │ │ │ +0000c5d0: 3143 0606 5c32 3033 5c33 3337 0106 0640 1C..\203\337...@ │ │ │ +0000c5e0: 5c32 3632 0206 0641 5c32 3632 075c 3330 \262...A\262.\30 │ │ │ +0000c5f0: 335c 3236 3205 5c33 3035 315c 3330 3201 3\262.\3051\302. │ │ │ +0000c600: 5c33 3036 025c 3330 375c 225c 3331 305c \306.\307\"\310\ │ │ │ +0000c610: 3331 3104 5c33 3037 5c22 055c 225c 3331 311.\307\".\"\31 │ │ │ +0000c620: 3202 5c33 3033 0323 5c33 3133 0121 035c 2.\303.#\313.!.\ │ │ │ +0000c630: 3230 3544 0003 475c 3331 3456 5c32 3035 205D..G\314V\205 │ │ │ +0000c640: 4400 5c33 3135 0221 5c33 3036 0607 5c33 D.\315.!\306..\3 │ │ │ +0000c650: 3136 5c22 5c33 3130 5c33 3131 0609 5c33 16\"\310\311..\3 │ │ │ +0000c660: 3136 5c22 065c 6e5c 225c 3331 3202 5c33 16\".\n\"\312.\3 │ │ │ +0000c670: 3033 0323 5c33 3132 035c 3331 3704 235c 03.#\312.\317.#\ │ │ │ +0000c680: 3330 335c 3231 315c 3231 315c 3332 305c 303\211\211\320\ │ │ │ +0000c690: 3330 3606 0f5c 3332 315c 225c 3230 3669 306..\321\"\206i │ │ │ +0000c6a0: 005c 3332 3221 5c33 3036 060f 5c33 3233 .\322!\306..\323 │ │ │ +0000c6b0: 5c22 5c33 3036 0610 5c33 3234 5c22 5c33 \"\306..\324\"\3 │ │ │ +0000c6c0: 3036 0611 5c33 3235 5c22 5c33 3236 5c33 06..\325\"\326\3 │ │ │ +0000c6d0: 3237 060e 0606 235c 3231 3006 0f5c 3230 27....#\210..\20 │ │ │ +0000c6e0: 335c 3232 3500 5c33 3131 0612 5c33 3037 3\225.\311..\307 │ │ │ +0000c6f0: 5c22 4140 5c33 3330 5c32 3330 5c32 3033 \"A@\330\230\203 │ │ │ +0000c700: 5c32 3235 005c 3330 335c 3236 325c 665c \225.\303\262\f\ │ │ │ +0000c710: 3231 315c 3230 335c 3330 3000 5c33 3331 211\203\300.\331 │ │ │ +0000c720: 060e 5c33 3332 0321 5c22 5c33 3331 060f ..\332.!\"\331.. │ │ │ +0000c730: 5c33 3332 045c 3330 325c 225c 2206 5c6e \332.\302\"\".\n │ │ │ +0000c740: 5c32 3033 5c32 3732 0006 5c6e 023d 5c32 \203\272..\n.=\2 │ │ │ +0000c750: 3034 5c32 3732 005c 3333 335c 3333 3406 04\272.\333\334. │ │ │ +0000c760: 075c 225c 3231 3001 5c32 3632 0b5c 3236 .\"\210.\262.\26 │ │ │ +0000c770: 3209 5c32 3130 0608 5c32 3033 5c33 3134 2.\210..\203\314 │ │ │ +0000c780: 005c 3331 3306 0921 5c32 3032 5c33 3136 .\313..!\202\316 │ │ │ +0000c790: 0006 5c66 5c32 3632 0706 075c 3230 335c ..\f\262...\203\ │ │ │ +0000c7a0: 3333 3400 5c33 3133 0608 215c 3230 325c 334.\313..!\202\ │ │ │ +0000c7b0: 3333 3600 065c 665c 3236 3206 0608 5c32 336..\f\262...\2 │ │ │ +0000c7c0: 3035 5c33 3636 005c 3331 3106 125c 3331 05\366.\311..\31 │ │ │ +0000c7d0: 365c 2241 405c 3333 305c 3233 303f 5c32 6\"A@\330\230?\2 │ │ │ +0000c7e0: 3035 5c33 3636 005c 3331 3506 0921 5c32 05\366.\315..!\2 │ │ │ +0000c7f0: 3632 055c 3332 365c 3333 3506 0e06 0923 62.\326\335....# │ │ │ +0000c800: 5c32 3130 025c 3230 3318 0106 105c 3333 \210.\203....\33 │ │ │ +0000c810: 3606 1306 1006 0f06 0924 5c32 3430 5c32 6........$\240\2 │ │ │ +0000c820: 3130 5c33 3032 5c32 3632 155c 3230 325c 10\302\262.\202\ │ │ │ +0000c830: 3230 3501 015c 3230 333b 015c 3332 365c 205..\203;.\326\ │ │ │ +0000c840: 3333 3721 5c32 3130 0610 5c33 3031 5c32 337!\210..\301\2 │ │ │ +0000c850: 3430 5c32 3130 5c33 3430 5c33 3431 5c33 40\210\340\341\3 │ │ │ +0000c860: 3432 5c33 3433 5c33 3434 5c33 3435 0616 42\343\344\345.. │ │ │ +0000c870: 215c 3334 365c 225c 3334 375c 3335 3025 !\346\"\347\350% │ │ │ +0000c880: 5c33 3531 0421 5c22 5c32 3130 5c32 3032 \351.!\"\210\202 │ │ │ +0000c890: 5c32 3035 0106 5c66 0607 5c32 3330 5c32 \205..\f..\230\2 │ │ │ +0000c8a0: 3034 5301 0610 5c33 3532 060e 0608 5c22 04S...\352....\" │ │ │ +0000c8b0: 5c32 3430 5c32 3130 5c33 3032 5c32 3632 \240\210\302\262 │ │ │ +0000c8c0: 155c 3230 325c 3230 3501 060b 5c32 3033 .\202\205...\203 │ │ │ +0000c8d0: 7501 045c 3230 3363 0106 0b05 5c32 3330 u..\203c....\230 │ │ │ +0000c8e0: 5c32 3034 7501 0610 5c33 3533 060f 060e \204u...\353.... │ │ │ +0000c8f0: 0608 235c 3234 305c 3231 305c 3330 325c ..#\240\210\302\ │ │ │ +0000c900: 3236 3215 5c32 3032 5c32 3035 015c 3332 262.\202\205.\32 │ │ │ +0000c910: 365c 3335 3421 5c32 3130 0610 5c33 3133 6\354!\210..\313 │ │ │ +0000c920: 060f 5c33 3535 5c22 5c32 3430 5c32 3130 ..\355\"\240\210 │ │ │ +0000c930: 5c33 3032 5c32 3632 1506 145c 3230 335c \302\262...\203\ │ │ │ +0000c940: 3235 3701 0610 5c32 3131 5c32 3432 5c33 257...\211\242\3 │ │ │ +0000c950: 3536 5c33 3537 0615 2151 5c32 3430 5c32 56\357..!Q\240\2 │ │ │ +0000c960: 3130 0618 5c32 3033 5c32 3336 015c 3330 10..\203\236.\30 │ │ │ +0000c970: 335c 3236 3204 5c33 3630 0611 5c32 3432 3\262.\360..\242 │ │ │ +0000c980: 061b 061a 0607 245c 3231 315c 3236 321b ......$\211\262. │ │ │ +0000c990: 5c32 3032 5c32 3734 015c 3330 325c 3236 \202\274.\302\26 │ │ │ +0000c9a0: 3214 5c33 3631 5c33 3632 0617 0614 235c 2.\361\362....#\ │ │ │ +0000c9b0: 3231 315c 3236 3217 5c32 3636 5c32 3230 211\262.\266\220 │ │ │ +0000c9c0: 305c 3230 325c 3333 3301 5c33 3333 5c33 0\202\333.\333\3 │ │ │ +0000c9d0: 3633 045c 225c 3231 305c 3330 325c 3236 63.\"\210\302\26 │ │ │ +0000c9e0: 3205 5c33 3631 5c33 3634 0206 0906 0624 2.\361\364.....$ │ │ │ +0000c9f0: 5c32 3632 075c 3333 335c 3336 3506 085c \262.\333\365..\ │ │ │ +0000ca00: 225c 3236 3201 5c32 3130 5c32 3032 0d00 "\262.\210\202.. │ │ │ +0000ca10: 0609 5c32 3033 5c33 3730 015c 3336 3606 ..\203\370.\366. │ │ │ +0000ca20: 5c6e 215c 3231 315c 3230 335c 3336 3701 \n!\211\203\367. │ │ │ +0000ca30: 725c 3231 3171 5c32 3130 6462 5c32 3130 r\211q\210db\210 │ │ │ +0000ca40: 5c33 3637 635c 3231 3029 5c32 3130 035c \367c\210)\210.\ │ │ │ +0000ca50: 3230 3309 0272 5c33 3730 5c33 3731 2171 203..r\370\371!q │ │ │ +0000ca60: 5c32 3130 5c33 3732 205c 3231 3005 635c \210\372 \210.c\ │ │ │ +0000ca70: 3231 3029 5c33 3333 5c33 3733 215c 3231 210)\333\373!\21 │ │ │ +0000ca80: 3003 5c32 3037 2220 5b69 6361 6c65 6e64 0.\207" [icalend │ │ │ +0000ca90: 6172 2d2d 616c 6c2d 6576 656e 7473 2022 ar--all-events " │ │ │ +0000caa0: 2220 7420 6e69 6c20 6963 616c 656e 6461 " t nil icalenda │ │ │ +0000cab0: 722d 2d63 6f6e 7665 7274 2d61 6c6c 2d74 r--convert-all-t │ │ │ +0000cac0: 696d 657a 6f6e 6573 2028 6572 726f 7229 imezones (error) │ │ │ +0000cad0: 2069 6361 6c65 6e64 6172 2d2d 6765 742d icalendar--get- │ │ │ +0000cae0: 6576 656e 742d 7072 6f70 6572 7479 2044 event-property D │ │ │ +0000caf0: 5453 5441 5254 2069 6361 6c65 6e64 6172 TSTART icalendar │ │ │ +0000cb00: 2d2d 6669 6e64 2d74 696d 652d 7a6f 6e65 --find-time-zone │ │ │ +0000cb10: 2069 6361 6c65 6e64 6172 2d2d 6765 742d icalendar--get- │ │ │ +0000cb20: 6576 656e 742d 7072 6f70 6572 7479 2d61 event-property-a │ │ │ +0000cb30: 7474 7269 6275 7465 7320 6963 616c 656e ttributes icalen │ │ │ +0000cb40: 6461 722d 2d64 6563 6f64 652d 6973 6f64 dar--decode-isod │ │ │ +0000cb50: 6174 6574 696d 6520 6963 616c 656e 6461 atetime icalenda │ │ │ +0000cb60: 722d 2d64 6174 6574 696d 652d 746f 2d64 r--datetime-to-d │ │ │ +0000cb70: 6961 7279 2d64 6174 6520 3820 6963 616c iary-date 8 ical │ │ │ +0000cb80: 656e 6461 722d 2d64 6174 6574 696d 652d endar--datetime- │ │ │ +0000cb90: 746f 2d63 6f6c 6f6e 7469 6d65 2044 5445 to-colontime DTE │ │ │ +0000cba0: 4e44 202d 3120 6963 616c 656e 6461 722d ND -1 icalendar- │ │ │ +0000cbb0: 2d63 6f6e 7665 7274 2d73 7472 696e 672d -convert-string- │ │ │ +0000cbc0: 666f 722d 696d 706f 7274 2053 554d 4d41 for-import SUMMA │ │ │ +0000cbd0: 5259 2022 4e6f 2073 756d 6d61 7279 2220 RY "No summary" │ │ │ +0000cbe0: 5252 554c 4520 5244 4154 4520 4455 5241 RRULE RDATE DURA │ │ │ +0000cbf0: 5449 4f4e 2069 6361 6c65 6e64 6172 2d2d TION icalendar-- │ │ │ +0000cc00: 646d 7367 2022 2573 3a20 6025 7327 2220 dmsg "%s: `%s'" │ │ │ +0000cc10: 2244 4154 4522 2069 6361 6c65 6e64 6172 "DATE" icalendar │ │ │ +0000cc20: 2d2d 6164 642d 6465 636f 6465 642d 7469 --add-decoded-ti │ │ │ +0000cc30: 6d65 7320 6963 616c 656e 6461 722d 2d64 mes icalendar--d │ │ │ +0000cc40: 6563 6f64 652d 6973 6f64 7572 6174 696f ecode-isoduratio │ │ │ +0000cc50: 6e20 6d65 7373 6167 6520 2249 6e63 6f6e n message "Incon │ │ │ +0000cc60: 7369 7374 656e 7420 656e 6474 696d 6520 sistent endtime │ │ │ +0000cc70: 616e 6420 6475 7261 7469 6f6e 2066 6f72 and duration for │ │ │ +0000cc80: 2025 7322 2022 7374 6172 742d 643a 2025 %s" "start-d: % │ │ │ +0000cc90: 732c 2065 6e64 2d64 3a20 2573 2220 6963 s, end-d: %s" ic │ │ │ +0000cca0: 616c 656e 6461 722d 2d63 6f6e 7665 7274 alendar--convert │ │ │ +0000ccb0: 2d72 6563 7572 7269 6e67 2d74 6f2d 6469 -recurring-to-di │ │ │ +0000ccc0: 6172 7920 2272 6461 7465 2065 7665 6e74 ary "rdate event │ │ │ +0000ccd0: 2220 6d61 7063 206d 616b 652d 6279 7465 " mapc make-byte │ │ │ +0000cce0: 2d63 6f64 6520 3235 3720 225c 3330 305c -code 257 "\300\ │ │ │ +0000ccf0: 3231 315c 3234 325c 3330 315c 3330 3221 211\242\301\302! │ │ │ +0000cd00: 505c 3234 305c 3230 3722 2076 636f 6e63 P\240\207" vconc │ │ │ +0000cd10: 6174 2076 6563 746f 7220 5b66 6f72 6d61 at vector [forma │ │ │ +0000cd20: 7420 222e 2e2e 2e2e 2e22 5d20 3520 225c t "......"] 5 "\ │ │ │ +0000cd30: 6e5c 6e28 666e 2044 4154 4553 5452 494e n\n(fn DATESTRIN │ │ │ +0000cd40: 4729 2220 6963 616c 656e 6461 722d 2d73 G)" icalendar--s │ │ │ +0000cd50: 706c 6974 2d76 616c 7565 2069 6361 6c65 plit-value icale │ │ │ +0000cd60: 6e64 6172 2d2d 636f 6e76 6572 742d 6e6f ndar--convert-no │ │ │ +0000cd70: 6e2d 7265 6375 7272 696e 672d 616c 6c2d n-recurring-all- │ │ │ +0000cd80: 6461 792d 746f 2d64 6961 7279 2069 6361 day-to-diary ica │ │ │ +0000cd90: 6c65 6e64 6172 2d2d 636f 6e76 6572 742d lendar--convert- │ │ │ +0000cda0: 6e6f 6e2d 7265 6375 7272 696e 672d 6e6f non-recurring-no │ │ │ +0000cdb0: 742d 616c 6c2d 6461 792d 746f 2d64 6961 t-all-day-to-dia │ │ │ +0000cdc0: 7279 2022 616c 6c20 6461 7920 6576 656e ry "all day even │ │ │ +0000cdd0: 7422 2022 2f22 2022 2022 2069 6361 6c65 t" "/" " " icale │ │ │ +0000cde0: 6e64 6172 2d2d 666f 726d 6174 2d69 6361 ndar--format-ica │ │ │ +0000cdf0: 6c2d 6576 656e 7420 6963 616c 656e 6461 l-event icalenda │ │ │ +0000ce00: 722d 2d61 6464 2d64 6961 7279 2d65 6e74 r--add-diary-ent │ │ │ +0000ce10: 7279 2066 6f72 6d61 7420 2225 735c 6e43 ry format "%s\nC │ │ │ +0000ce20: 616e 6e6f 7420 6861 6e64 6c65 2074 6869 annot handle thi │ │ │ +0000ce30: 7320 6576 656e 743a 2573 2220 2249 676e s event:%s" "Ign │ │ │ +0000ce40: 6f72 696e 6720 6576 656e 7420 5c22 2573 oring event \"%s │ │ │ +0000ce50: 5c22 2220 2225 735c 6e25 735c 6e43 616e \"" "%s\n%s\nCan │ │ │ +0000ce60: 6e6f 7420 6861 6e64 6c65 2074 6869 7320 not handle this │ │ │ +0000ce70: 6576 656e 743a 2025 7322 2022 2573 2220 event: %s" "%s" │ │ │ +0000ce80: 6669 6e64 2d62 7566 6665 722d 7669 7369 find-buffer-visi │ │ │ +0000ce90: 7469 6e67 2022 5c6e 2220 6765 742d 6275 ting "\n" get-bu │ │ │ +0000cea0: 6666 6572 2d63 7265 6174 6520 222a 6963 ffer-create "*ic │ │ │ +0000ceb0: 616c 656e 6461 722d 6572 726f 7273 2a22 alendar-errors*" │ │ │ +0000cec0: 2065 7261 7365 2d62 7566 6665 7220 2243 erase-buffer "C │ │ │ +0000ced0: 6f6e 7665 7274 696e 6720 6943 616c 656e onverting iCalen │ │ │ +0000cee0: 6461 722e 2e2e 646f 6e65 225d 2033 3420 dar...done"] 34 │ │ │ +0000cef0: 2823 2420 2e20 3530 3031 3529 5d29 0a23 (#$ . 50015)]).# │ │ │ +0000cf00: 4032 3239 2043 6f6e 7665 7274 2072 6563 @229 Convert rec │ │ │ +0000cf10: 7572 7269 6e67 2069 4361 6c65 6e64 6172 urring iCalendar │ │ │ +0000cf20: 2065 7665 6e74 2045 2074 6f20 6469 6172 event E to diar │ │ │ +0000cf30: 7920 666f 726d 6174 2e0a 0a44 5453 5441 y format...DTSTA │ │ │ +0000cf40: 5254 2d44 4543 2069 7320 7468 6520 4454 RT-DEC is the DT │ │ │ +0000cf50: 5354 4152 5420 7072 6f70 6572 7479 206f START property o │ │ │ +0000cf60: 6620 452e 0a53 5441 5254 2d54 2069 7320 f E..START-T is │ │ │ +0000cf70: 7468 6520 6576 656e 7427 7320 7374 6172 the event's star │ │ │ +0000cf80: 7420 7469 6d65 2069 6e20 6469 6172 7920 t time in diary │ │ │ +0000cf90: 666f 726d 6174 2e0a 454e 442d 5420 6973 format..END-T is │ │ │ +0000cfa0: 2074 6865 2065 7665 6e74 2773 2065 6e64 the event's end │ │ │ +0000cfb0: 2074 696d 6520 696e 2064 6961 7279 2066 time in diary f │ │ │ +0000cfc0: 6f72 6d61 742e 0a0a 2866 6e20 4520 4454 ormat...(fn E DT │ │ │ +0000cfd0: 5354 4152 542d 4445 4320 5354 4152 542d START-DEC START- │ │ │ +0000cfe0: 5420 454e 442d 5429 1f0a 2864 6566 616c T END-T)..(defal │ │ │ +0000cff0: 6961 7320 2769 6361 6c65 6e64 6172 2d2d ias 'icalendar-- │ │ │ +0000d000: 636f 6e76 6572 742d 7265 6375 7272 696e convert-recurrin │ │ │ +0000d010: 672d 746f 2d64 6961 7279 2023 5b31 3032 g-to-diary #[102 │ │ │ +0000d020: 3820 225c 3330 315c 3330 3221 5c32 3130 8 "\301\302!\210 │ │ │ +0000d030: 5c33 3033 045c 3330 345c 225c 3330 3501 \303.\304\"\305. │ │ │ +0000d040: 215c 3330 365c 3330 3702 5c22 4140 5c33 !\306\307.\"A@\3 │ │ │ +0000d050: 3036 5c33 3130 035c 2241 405c 3330 365c 06\310.\"A@\306\ │ │ │ +0000d060: 3331 3104 5c22 4140 5c33 3132 5c33 3036 311.\"A@\312\306 │ │ │ +0000d070: 5c33 3133 0606 5c22 4140 5c32 3036 2900 \313..\"A@\206). │ │ │ +0000d080: 5c33 3134 215c 3331 3506 0921 5c33 3135 \314!\315..!\315 │ │ │ +0000d090: 5c33 3136 0521 215c 3331 355c 3331 3606 \316.!!\315\316. │ │ │ +0000d0a0: 065c 3331 375c 2221 5c33 3230 055c 3230 .\317\"!\320.\20 │ │ │ +0000d0b0: 3330 0106 065c 3230 334b 005c 3332 315c 30...\203K.\321\ │ │ │ +0000d0c0: 3332 3221 5c32 3130 5c32 3032 3001 5c33 322!\210\2020.\3 │ │ │ +0000d0d0: 3233 0608 5c33 3234 5c32 3330 5c32 3033 23..\324\230\203 │ │ │ +0000d0e0: 7f00 5c33 3235 060e 5c33 3233 5c32 3131 ..\325..\323\211 │ │ │ +0000d0f0: 5c32 3131 5c33 3132 065c 6621 060b 5f5c \211\312.\f!.._\ │ │ │ +0000d100: 3332 335c 3231 315c 3235 3706 5c22 5c32 323\211\257.\"\2 │ │ │ +0000d110: 3632 085c 3332 3506 0e5c 3332 335c 3231 62.\325..\323\21 │ │ │ +0000d120: 315c 3231 315c 3331 3206 5c66 2153 060b 1\211\312.\f!S.. │ │ │ +0000d130: 5f5c 3332 335c 3231 315c 3235 3706 5c22 _\323\211\257.\" │ │ │ +0000d140: 5c32 3632 015c 3230 3224 0106 085c 3332 \262.\202$...\32 │ │ │ +0000d150: 365c 3233 305c 3230 335c 3236 3600 5c33 6\230\203\266.\3 │ │ │ +0000d160: 3235 060e 5c33 3233 5c32 3131 5c32 3131 25..\323\211\211 │ │ │ +0000d170: 5c33 3237 5c33 3132 060d 215c 3333 3006 \327\312..!\330. │ │ │ +0000d180: 0d23 5c33 3233 5c32 3131 5c32 3537 065c .#\323\211\257.\ │ │ │ +0000d190: 225c 3236 3208 5c33 3235 060e 5c33 3233 "\262.\325..\323 │ │ │ +0000d1a0: 5c32 3131 5c32 3131 5c33 3237 5c33 3132 \211\211\327\312 │ │ │ +0000d1b0: 060d 2153 5c33 3330 060d 235c 3332 335c ..!S\330..#\323\ │ │ │ +0000d1c0: 3231 315c 3235 3706 5c22 5c32 3632 015c 211\257.\"\262.\ │ │ │ +0000d1d0: 3230 3224 0106 085c 3333 315c 3233 305c 202$...\331\230\ │ │ │ +0000d1e0: 3230 335c 3335 3200 5c33 3235 060e 5c33 203\352.\325..\3 │ │ │ +0000d1f0: 3233 5c32 3131 5c32 3131 5c32 3131 5c33 23\211\211\211\3 │ │ │ +0000d200: 3132 060d 2153 065c 665f 5c33 3233 5c32 12..!S.\f_\323\2 │ │ │ +0000d210: 3537 065c 225c 3236 3208 5c33 3235 060e 57.\"\262.\325.. │ │ │ +0000d220: 5c33 3233 5c32 3131 5c32 3131 5c32 3131 \323\211\211\211 │ │ │ +0000d230: 5c33 3132 060d 2153 065c 665f 5c33 3233 \312..!S.\f_\323 │ │ │ +0000d240: 5c32 3537 065c 225c 3236 3201 5c32 3032 \257.\"\262.\202 │ │ │ +0000d250: 2401 0608 5c33 3332 5c32 3330 5c32 3033 $...\332\230\203 │ │ │ +0000d260: 1e01 5c33 3235 060e 5c33 3233 5c32 3131 ..\325..\323\211 │ │ │ +0000d270: 5c32 3131 5c32 3131 5c32 3131 5c33 3132 \211\211\211\312 │ │ │ +0000d280: 060e 2153 060d 5f5c 3235 3706 5c22 5c32 ..!S.._\257.\"\2 │ │ │ +0000d290: 3632 085c 3332 3506 0e5c 3332 335c 3231 62.\325..\323\21 │ │ │ +0000d2a0: 315c 3231 315c 3231 315c 3231 315c 3331 1\211\211\211\31 │ │ │ +0000d2b0: 3206 0e21 5306 0d5f 5c32 3537 065c 225c 2..!S.._\257.\"\ │ │ │ +0000d2c0: 3236 3201 5c32 3032 2401 5c33 3231 5c33 262.\202$.\321\3 │ │ │ +0000d2d0: 3333 065c 6e5c 225c 3231 305c 3331 3506 33.\n\"\210\315. │ │ │ +0000d2e0: 0821 5c32 3632 045c 3331 3501 215c 3236 .!\262.\315.!\26 │ │ │ +0000d2f0: 3203 5c32 3130 0607 5c33 3236 5c32 3330 2.\210..\326\230 │ │ │ +0000d300: 5c32 3033 0502 5c33 3036 5c33 3334 065c \203..\306\334.\ │ │ │ +0000d310: 6e5c 2241 405c 3333 3501 215c 3231 3147 n\"A@\335.!\211G │ │ │ +0000d320: 5c33 3336 565c 3230 354c 015c 3333 375c \336V\205L.\337\ │ │ │ +0000d330: 3334 3002 5c22 060e 5c32 3034 5c32 3330 340.\"..\204\230 │ │ │ +0000d340: 015c 3330 315c 3334 3121 5c32 3130 0609 .\301\341!\210.. │ │ │ +0000d350: 5c32 3033 7d01 5c33 3337 5c33 3432 025c \203}.\337\342.\ │ │ │ +0000d360: 3230 3669 015c 3333 375c 3334 3306 0b5c 206i.\337\343..\ │ │ │ +0000d370: 3333 305f 060b 2306 0906 5c66 5c32 3033 330_..#...\f\203 │ │ │ +0000d380: 7501 0608 5c32 3032 7701 0609 245c 3236 u...\202w...$\26 │ │ │ +0000d390: 3204 5c32 3032 0002 5c33 3337 5c33 3434 2.\202..\337\344 │ │ │ +0000d3a0: 025c 3230 365c 3230 3401 5c33 3230 035c .\206\204.\320.\ │ │ │ +0000d3b0: 3230 335c 3231 3401 5c33 3336 5c32 3032 203\214.\336\202 │ │ │ +0000d3c0: 5c32 3230 0106 5c6e 5c33 3330 5f06 5c6e \220..\n\330_.\n │ │ │ +0000d3d0: 245c 3236 3204 5c32 3032 0002 5c33 3031 $\262.\202..\301 │ │ │ +0000d3e0: 5c33 3435 215c 3231 3006 095c 3230 335c \345!\210..\203\ │ │ │ +0000d3f0: 3332 3101 5c33 3337 5c33 3436 025c 3230 321.\337\346.\20 │ │ │ +0000d400: 365c 3236 3001 5c33 3337 5c33 3433 060b 6\260.\337\343.. │ │ │ +0000d410: 5c33 3330 5f06 0b23 0609 0609 0613 5c32 \330_..#......\2 │ │ │ +0000d420: 3036 5c32 3732 015c 3332 3006 135c 3230 06\272.\320..\20 │ │ │ +0000d430: 335c 3330 3301 5c33 3437 5c32 3032 5c33 3\303.\347\202\3 │ │ │ +0000d440: 3034 015c 3332 3006 145c 3230 365c 3331 04.\320..\206\31 │ │ │ +0000d450: 3201 5c33 3230 2607 5c32 3632 045c 3230 2.\320&.\262.\20 │ │ │ +0000d460: 3200 025c 3333 375c 3335 3002 5c32 3036 2..\337\350.\206 │ │ │ +0000d470: 5c33 3330 015c 3332 3003 5c32 3033 5c33 \330.\320.\203\3 │ │ │ +0000d480: 3430 015c 3333 365c 3230 325c 3334 3401 40.\336\202\344. │ │ │ +0000d490: 065c 6e5c 3333 305f 065c 6e06 135c 3230 .\n\330_.\n..\20 │ │ │ +0000d4a0: 365c 3335 3401 5c33 3230 0613 5c32 3033 6\354.\320..\203 │ │ │ +0000d4b0: 5c33 3635 015c 3334 375c 3230 325c 3336 \365.\347\202\36 │ │ │ +0000d4c0: 3601 5c33 3230 0614 5c32 3036 5c33 3734 6.\320..\206\374 │ │ │ +0000d4d0: 015c 3332 3026 075c 3236 3204 5c32 3636 .\320&.\262.\266 │ │ │ +0000d4e0: 035c 3230 325c 3234 3303 0607 5c33 3332 .\202\243...\332 │ │ │ +0000d4f0: 5c32 3330 5c32 3033 5c32 3030 025c 3330 \230\203\200.\30 │ │ │ +0000d500: 315c 3335 3121 5c32 3130 0606 5c32 3033 1\351!\210..\203 │ │ │ +0000d510: 6102 5c33 3532 060d 385c 3335 3306 0e38 a.\352..8\353..8 │ │ │ +0000d520: 5c33 3534 085c 3335 355c 3236 375c 3230 \354.\355\267\20 │ │ │ +0000d530: 323c 025c 3333 375c 3335 3603 0523 5c32 2<.\337\356..#\2 │ │ │ +0000d540: 3032 3d02 5c33 3337 5c33 3537 0404 235c 02=.\337\357..#\ │ │ │ +0000d550: 3230 323d 025c 3333 375c 3335 3703 0523 202=.\337\357..# │ │ │ +0000d560: 5c32 3032 3d02 5c33 3630 5c33 3631 0608 \202=.\360\361.. │ │ │ +0000d570: 5c33 3632 0609 5c33 3633 0614 5c32 3036 \362..\363..\206 │ │ │ +0000d580: 4a02 5c33 3230 0614 5c32 3033 5302 5c33 J.\320..\203S.\3 │ │ │ +0000d590: 3437 5c32 3032 5402 5c33 3230 0615 5c32 47\202T.\320..\2 │ │ │ +0000d5a0: 3036 5a02 5c33 3230 5c32 3630 5c6e 5c32 06Z.\320\260\n\2 │ │ │ +0000d5b0: 3636 5c32 3033 5c32 3032 5c32 3433 035c 66\203\202\243.\ │ │ │ +0000d5c0: 3333 375c 3336 3405 060e 5c32 3036 6a02 337\364...\206j. │ │ │ +0000d5d0: 5c33 3230 060e 5c32 3033 7302 5c33 3437 \320..\203s.\347 │ │ │ +0000d5e0: 5c32 3032 7402 5c33 3230 060f 5c32 3036 \202t.\320..\206 │ │ │ +0000d5f0: 7a02 5c33 3230 255c 3236 3201 5c32 3032 z.\320%\262.\202 │ │ │ +0000d600: 5c32 3433 0306 075c 3333 315c 3233 305c \243...\331\230\ │ │ │ +0000d610: 3230 3343 035c 3330 315c 3336 3521 5c32 203C.\301\365!\2 │ │ │ +0000d620: 3130 5c33 3036 5c33 3334 065c 6e5c 2241 10\306\334.\n\"A │ │ │ +0000d630: 405c 3231 315c 3230 355c 3237 3502 5c33 @\211\205\275.\3 │ │ │ +0000d640: 3636 205c 3336 375c 3332 335c 3337 305c 66 \367\323\370\ │ │ │ +0000d650: 3337 315c 3337 3205 215c 3337 335c 225c 371\372.!\373\"\ │ │ │ +0000d660: 3335 3224 5c32 3136 5c33 3734 5c33 3735 352$\216\374\375 │ │ │ +0000d670: 035c 225c 3230 355c 3237 3202 5c33 3736 .\"\205\272.\376 │ │ │ +0000d680: 025c 3333 365c 3232 345c 3333 365c 3232 .\336\224\336\22 │ │ │ +0000d690: 3523 5c33 3736 035c 3337 375c 3232 345c 5#\376.\377\224\ │ │ │ +0000d6a0: 3337 375c 3232 3523 4229 5c32 3632 015c 377\225#B)\262.\ │ │ │ +0000d6b0: 3231 315c 3230 335c 3332 3502 5c32 3131 211\203\325.\211 │ │ │ +0000d6c0: 405c 3230 3140 0002 4121 5c33 3337 5c32 @\201@..A!\337\2 │ │ │ +0000d6d0: 3031 4100 0204 235c 3236 365c 3230 325c 01A...#\266\202\ │ │ │ +0000d6e0: 3230 3204 035c 3333 375c 3230 3142 005c 202..\337\201B.\ │ │ │ +0000d6f0: 3335 3206 1138 085c 3230 3143 005c 3236 352..8.\201C.\26 │ │ │ +0000d700: 375c 3230 3200 035c 3333 375c 3230 3144 7\202..\337\201D │ │ │ +0000d710: 0002 5c22 5c32 3032 0103 5c33 3337 5c32 ..\"\202..\337\2 │ │ │ +0000d720: 3031 4500 025c 225c 3230 3201 035c 3333 01E..\"\202..\33 │ │ │ +0000d730: 375c 3230 3146 0002 5c22 5c32 3032 0103 7\201F..\"\202.. │ │ │ +0000d740: 5c33 3630 5c32 3632 015c 225c 3333 375c \360\262.\"\337\ │ │ │ +0000d750: 3230 3147 0002 0609 060d 5c32 3033 1503 201G......\203.. │ │ │ +0000d760: 0609 5c32 3032 2603 085c 3230 3148 003d ..\202&..\201H.= │ │ │ +0000d770: 5c32 3033 2303 5c32 3031 4900 5c32 3032 \203#.\201I.\202 │ │ │ +0000d780: 2603 5c32 3031 4a00 0613 5c32 3036 2c03 &.\201J...\206,. │ │ │ +0000d790: 5c33 3230 0613 5c32 3033 3503 5c33 3437 \320..\2035.\347 │ │ │ +0000d7a0: 5c32 3032 3603 5c33 3230 0614 5c32 3036 \2026.\320..\206 │ │ │ +0000d7b0: 3c03 5c33 3230 2607 5c32 3636 5c32 3034 <.\320&.\266\204 │ │ │ +0000d7c0: 5c32 3032 5c32 3433 0306 075c 3332 345c \202\243...\324\ │ │ │ +0000d7d0: 3233 305c 3230 335c 3234 3303 0606 5c32 230\203\243...\2 │ │ │ +0000d7e0: 3033 5c32 3031 035c 3333 375c 3230 314b 03\201.\337\201K │ │ │ +0000d7f0: 0006 0606 065c 3231 3106 5c6e 5c32 3033 .....\211.\n\203 │ │ │ +0000d800: 6203 0606 5c32 3032 6403 0607 0611 5c32 b...\202d.....\2 │ │ │ +0000d810: 3036 6a03 5c33 3230 0611 5c32 3033 7303 06j.\320..\203s. │ │ │ +0000d820: 5c33 3437 5c32 3032 7403 5c33 3230 0612 \347\202t.\320.. │ │ │ +0000d830: 5c32 3036 7a03 5c33 3230 2608 5c32 3632 \206z.\320&.\262 │ │ │ +0000d840: 015c 3230 325c 3234 3303 5c33 3337 5c32 .\202\243.\337\2 │ │ │ +0000d850: 3031 4c00 0606 0606 060f 5c32 3036 5c32 01L.......\206\2 │ │ │ +0000d860: 3137 035c 3332 3006 0f5c 3230 335c 3233 17.\320..\203\23 │ │ │ +0000d870: 3003 5c33 3437 5c32 3032 5c32 3331 035c 0.\347\202\231.\ │ │ │ +0000d880: 3332 3006 105c 3230 365c 3233 3703 5c33 320..\206\237.\3 │ │ │ +0000d890: 3230 2606 5c32 3632 015c 3230 314d 0006 20&.\262.\201M.. │ │ │ +0000d8a0: 0e5c 3230 314e 005c 225c 3231 315c 3230 .\201N.\"\211\20 │ │ │ +0000d8b0: 335c 3332 3103 5c33 3136 0140 215c 3331 3\321.\316.@!\31 │ │ │ +0000d8c0: 3501 215c 3230 314f 005c 3230 3150 005c 5.!\201O.\201P.\ │ │ │ +0000d8d0: 3333 375c 3230 3151 0004 5c22 0606 235c 337\201Q..\"..#\ │ │ │ +0000d8e0: 3236 3204 5c32 3636 025c 3231 3141 5c32 262.\266.\211A\2 │ │ │ +0000d8f0: 3632 015c 3230 325c 3235 3403 5c32 3130 62.\202\254.\210 │ │ │ +0000d900: 5c33 3033 060e 5c32 3031 5200 5c22 5c32 \303..\201R.\"\2 │ │ │ +0000d910: 3033 5c33 3534 035c 3231 315c 3230 3153 03\354.\211\201S │ │ │ +0000d920: 005c 3230 314d 0006 105c 3230 3152 005c .\201M...\201R.\ │ │ │ +0000d930: 2251 5c32 3632 015c 3230 3722 205b 6361 "Q\262.\207" [ca │ │ │ +0000d940: 6c65 6e64 6172 2d64 6174 652d 7374 796c lendar-date-styl │ │ │ +0000d950: 6520 6963 616c 656e 6461 722d 2d64 6d73 e icalendar--dms │ │ │ +0000d960: 6720 2272 6563 7572 7269 6e67 2065 7665 g "recurring eve │ │ │ +0000d970: 6e74 2220 6963 616c 656e 6461 722d 2d67 nt" icalendar--g │ │ │ +0000d980: 6574 2d65 7665 6e74 2d70 726f 7065 7274 et-event-propert │ │ │ +0000d990: 7920 5252 554c 4520 6963 616c 656e 6461 y RRULE icalenda │ │ │ +0000d9a0: 722d 2d73 706c 6974 2d76 616c 7565 2061 r--split-value a │ │ │ +0000d9b0: 7373 6f63 2046 5245 5120 554e 5449 4c20 ssoc FREQ UNTIL │ │ │ +0000d9c0: 434f 554e 5420 7265 6164 2049 4e54 4552 COUNT read INTER │ │ │ +0000d9d0: 5641 4c20 2231 2220 6963 616c 656e 6461 VAL "1" icalenda │ │ │ +0000d9e0: 722d 2d64 6174 6574 696d 652d 746f 2d64 r--datetime-to-d │ │ │ +0000d9f0: 6961 7279 2d64 6174 6520 6963 616c 656e iary-date icalen │ │ │ +0000da00: 6461 722d 2d64 6563 6f64 652d 6973 6f64 dar--decode-isod │ │ │ +0000da10: 6174 6574 696d 6520 2d31 2022 2220 6d65 atetime -1 "" me │ │ │ +0000da20: 7373 6167 6520 224d 7573 7420 6e6f 7420 ssage "Must not │ │ │ +0000da30: 6861 7665 2055 4e54 494c 2061 6e64 2043 have UNTIL and C │ │ │ +0000da40: 4f55 4e54 202d 2d20 6967 6e6f 7269 6e67 OUNT -- ignoring │ │ │ +0000da50: 2043 4f55 4e54 2065 6c65 6d65 6e74 2122 COUNT element!" │ │ │ +0000da60: 2030 2022 4441 494c 5922 2069 6361 6c65 0 "DAILY" icale │ │ │ +0000da70: 6e64 6172 2d2d 6164 642d 6465 636f 6465 ndar--add-decode │ │ │ +0000da80: 642d 7469 6d65 7320 2257 4545 4b4c 5922 d-times "WEEKLY" │ │ │ +0000da90: 202a 2037 2022 4d4f 4e54 484c 5922 2022 * 7 "MONTHLY" " │ │ │ +0000daa0: 5945 4152 4c59 2220 2243 616e 6e6f 7420 YEARLY" "Cannot │ │ │ +0000dab0: 6861 6e64 6c65 2043 4f55 4e54 2061 7474 handle COUNT att │ │ │ +0000dac0: 7269 6275 7465 2066 6f72 2060 2573 2720 ribute for `%s' │ │ │ +0000dad0: 6576 656e 7473 2e22 2042 5944 4159 2069 events." BYDAY i │ │ │ +0000dae0: 6361 6c65 6e64 6172 2d2d 6765 742d 7765 calendar--get-we │ │ │ +0000daf0: 656b 6461 792d 6e75 6d62 6572 7320 3120 ekday-numbers 1 │ │ │ +0000db00: 666f 726d 6174 2022 286d 656d 7120 2863 format "(memq (c │ │ │ +0000db10: 616c 656e 6461 722d 6461 792d 6f66 2d77 alendar-day-of-w │ │ │ +0000db20: 6565 6b20 6461 7465 2920 2725 7329 2022 eek date) '%s) " │ │ │ +0000db30: 2022 7765 656b 6c79 2061 6c6c 2d64 6179 "weekly all-day │ │ │ +0000db40: 2220 2225 2525 2528 616e 6420 2573 2864 " "%%%%(and %s(d │ │ │ +0000db50: 6961 7279 2d62 6c6f 636b 2025 7320 2573 iary-block %s %s │ │ │ +0000db60: 2929 2220 2228 6469 6172 792d 6379 636c ))" "(diary-cycl │ │ │ +0000db70: 6963 2025 6420 2573 2920 2220 2225 2525 ic %d %s) " "%%% │ │ │ +0000db80: 2528 616e 6420 2573 2864 6961 7279 2d63 %(and %s(diary-c │ │ │ +0000db90: 7963 6c69 6320 2564 2025 7329 2922 2022 yclic %d %s))" " │ │ │ +0000dba0: 7765 656b 6c79 206e 6f74 2d61 6c6c 2d64 weekly not-all-d │ │ │ +0000dbb0: 6179 2220 2225 2525 2528 616e 6420 2573 ay" "%%%%(and %s │ │ │ +0000dbc0: 2864 6961 7279 2d62 6c6f 636b 2025 7320 (diary-block %s │ │ │ +0000dbd0: 2573 2929 2025 7325 7325 7322 2022 2d22 %s)) %s%s%s" "-" │ │ │ +0000dbe0: 2022 2525 2525 2861 6e64 2025 7328 6469 "%%%%(and %s(di │ │ │ +0000dbf0: 6172 792d 6379 636c 6963 2025 6420 2573 ary-cyclic %d %s │ │ │ +0000dc00: 2929 2025 7325 7325 7322 2022 7965 6172 )) %s%s%s" "year │ │ │ +0000dc10: 6c79 2220 3320 3420 2225 2528 616e 6420 ly" 3 4 "%%(and │ │ │ +0000dc20: 2864 6961 7279 2d64 6174 6520 2220 2373 (diary-date " #s │ │ │ +0000dc30: 2868 6173 682d 7461 626c 6520 7369 7a65 (hash-table size │ │ │ +0000dc40: 2033 2074 6573 7420 6571 2072 6568 6173 3 test eq rehas │ │ │ +0000dc50: 682d 7369 7a65 2031 2e35 2072 6568 6173 h-size 1.5 rehas │ │ │ +0000dc60: 682d 7468 7265 7368 6f6c 6420 302e 3831 h-threshold 0.81 │ │ │ +0000dc70: 3235 2070 7572 6563 6f70 7920 7420 6461 25 purecopy t da │ │ │ +0000dc80: 7461 2028 6973 6f20 3534 3820 6575 726f ta (iso 548 euro │ │ │ +0000dc90: 7065 616e 2035 3536 2061 6d65 7269 6361 pean 556 america │ │ │ +0000dca0: 6e20 3536 3429 2920 2274 2025 6420 2564 n 564)) "t %d %d │ │ │ +0000dcb0: 2220 2225 6420 2564 2074 2220 6e69 6c20 " "%d %d t" nil │ │ │ +0000dcc0: 2229 2028 6469 6172 792d 626c 6f63 6b20 ") (diary-block │ │ │ +0000dcd0: 2220 2220 2220 2229 2920 2220 2225 2525 " " " ")) " "%%% │ │ │ +0000dce0: 2528 616e 6420 2864 6961 7279 2d61 6e6e %(and (diary-ann │ │ │ +0000dcf0: 6976 6572 7361 7279 2025 7329 2920 2573 iversary %s)) %s │ │ │ +0000dd00: 2573 2573 2220 226d 6f6e 7468 6c79 2220 %s%s" "monthly" │ │ │ +0000dd10: 6d61 7463 682d 6461 7461 206d 616b 652d match-data make- │ │ │ +0000dd20: 6279 7465 2d63 6f64 6520 225c 3330 315c byte-code "\301\ │ │ │ +0000dd30: 3330 305c 3330 325c 225c 3230 3722 2076 300\302\"\207" v │ │ │ +0000dd40: 636f 6e63 6174 2076 6563 746f 7220 5b73 concat vector [s │ │ │ +0000dd50: 6574 2d6d 6174 6368 2d64 6174 6120 6576 et-match-data ev │ │ │ +0000dd60: 6170 6f72 6174 655d 2073 7472 696e 672d aporate] string- │ │ │ +0000dd70: 6d61 7463 6820 225c 5c28 2d3f 5b30 2d39 match "\\(-?[0-9 │ │ │ +0000dd80: 5d2b 5c5c 295c 5c28 5b41 2d5a 5d5b 412d ]+\\)\\([A-Z][A- │ │ │ +0000dd90: 5a5d 5c5c 2922 2073 7562 7374 7269 6e67 Z]\\)" substring │ │ │ +0000dda0: 2032 2069 6361 6c65 6e64 6172 2d2d 6765 2 icalendar--ge │ │ │ +0000ddb0: 742d 7765 656b 6461 792d 6e75 6d62 6572 t-weekday-number │ │ │ +0000ddc0: 2022 2864 6961 7279 2d66 6c6f 6174 2074 "(diary-float t │ │ │ +0000ddd0: 2025 7320 2573 2922 2022 2864 6961 7279 %s %s)" "(diary │ │ │ +0000dde0: 2d64 6174 6520 2573 2922 2023 7328 6861 -date %s)" #s(ha │ │ │ +0000ddf0: 7368 2d74 6162 6c65 2073 697a 6520 3320 sh-table size 3 │ │ │ +0000de00: 7465 7374 2065 7120 7265 6861 7368 2d73 test eq rehash-s │ │ │ +0000de10: 697a 6520 312e 3520 7265 6861 7368 2d74 ize 1.5 rehash-t │ │ │ +0000de20: 6872 6573 686f 6c64 2030 2e38 3132 3520 hreshold 0.8125 │ │ │ +0000de30: 7075 7265 636f 7079 2074 2064 6174 6120 purecopy t data │ │ │ +0000de40: 2869 736f 2037 3431 2065 7572 6f70 6561 (iso 741 europea │ │ │ +0000de50: 6e20 3735 3020 616d 6572 6963 616e 2037 n 750 american 7 │ │ │ +0000de60: 3539 2929 2022 7420 7420 2564 2220 2225 59)) "t t %d" "% │ │ │ +0000de70: 6420 7420 7422 2022 7420 2564 2074 2220 d t t" "t %d t" │ │ │ +0000de80: 2225 2525 2528 616e 6420 2573 2028 6469 "%%%%(and %s (di │ │ │ +0000de90: 6172 792d 626c 6f63 6b20 2573 2025 7329 ary-block %s %s) │ │ │ +0000dea0: 2920 2573 2573 2573 2220 6973 6f20 2239 ) %s%s%s" iso "9 │ │ │ +0000deb0: 3939 3920 3120 3122 2022 3120 3120 3939 999 1 1" "1 1 99 │ │ │ +0000dec0: 3939 2220 2225 2525 2528 616e 6420 2864 99" "%%%%(and (d │ │ │ +0000ded0: 6961 7279 2d63 7963 6c69 6320 2573 2025 iary-cyclic %s % │ │ │ +0000dee0: 7329 2028 6469 6172 792d 626c 6f63 6b20 s) (diary-block │ │ │ +0000def0: 2573 2025 7329 2920 2573 2573 2573 2220 %s %s)) %s%s%s" │ │ │ +0000df00: 2225 2525 2528 616e 6420 2864 6961 7279 "%%%%(and (diary │ │ │ +0000df10: 2d63 7963 6c69 6320 2573 2025 7329 2920 -cyclic %s %s)) │ │ │ +0000df20: 2573 2573 2573 2220 6963 616c 656e 6461 %s%s%s" icalenda │ │ │ +0000df30: 722d 2d67 6574 2d65 7665 6e74 2d70 726f r--get-event-pro │ │ │ +0000df40: 7065 7274 6965 7320 4558 4441 5445 2072 perties EXDATE r │ │ │ +0000df50: 6570 6c61 6365 2d72 6567 6578 702d 696e eplace-regexp-in │ │ │ +0000df60: 2d73 7472 696e 6720 225e 2525 285c 5c28 -string "^%%(\\( │ │ │ +0000df70: 616e 6420 5c5c 293f 2220 2225 2525 2528 and \\)?" "%%%%( │ │ │ +0000df80: 616e 6420 286e 6f74 2028 6469 6172 792d and (not (diary- │ │ │ +0000df90: 6461 7465 2025 7329 2920 2220 4558 5255 date %s)) " EXRU │ │ │ +0000dfa0: 4c45 2022 5c6e 2045 7863 6570 7469 6f6e LE "\n Exception │ │ │ +0000dfb0: 2072 756c 6573 3a20 225d 2032 3620 2823 rules: "] 26 (# │ │ │ +0000dfc0: 2420 2e20 3532 3939 3729 5d29 0a23 4031 $ . 52997)]).#@1 │ │ │ +0000dfd0: 3936 2043 6f6e 7665 7274 206e 6f6e 2d72 96 Convert non-r │ │ │ +0000dfe0: 6563 7572 7269 6e67 2069 4361 6c65 6e64 ecurring iCalend │ │ │ +0000dff0: 6172 2045 5645 4e54 2074 6f20 6469 6172 ar EVENT to diar │ │ │ +0000e000: 7920 666f 726d 6174 2e0a 0a44 5453 5441 y format...DTSTA │ │ │ +0000e010: 5254 2069 7320 7468 6520 6465 636f 6465 RT is the decode │ │ │ +0000e020: 6420 4454 5354 4152 5420 7072 6f70 6572 d DTSTART proper │ │ │ +0000e030: 7479 206f 6620 452e 0a41 7267 756d 656e ty of E..Argumen │ │ │ +0000e040: 7420 5354 4152 542d 4420 6769 7665 7320 t START-D gives │ │ │ +0000e050: 7468 6520 6669 7273 7420 6461 792e 0a41 the first day..A │ │ │ +0000e060: 7267 756d 656e 7420 454e 442d 4420 6769 rgument END-D gi │ │ │ +0000e070: 7665 7320 7468 6520 6c61 7374 2064 6179 ves the last day │ │ │ +0000e080: 2e0a 0a28 666e 2053 5441 5254 2d44 2045 ...(fn START-D E │ │ │ +0000e090: 4e44 2d44 291f 0a28 6465 6661 6c69 6173 ND-D)..(defalias │ │ │ +0000e0a0: 2027 6963 616c 656e 6461 722d 2d63 6f6e 'icalendar--con │ │ │ +0000e0b0: 7665 7274 2d6e 6f6e 2d72 6563 7572 7269 vert-non-recurri │ │ │ +0000e0c0: 6e67 2d61 6c6c 2d64 6179 2d74 6f2d 6469 ng-all-day-to-di │ │ │ +0000e0d0: 6172 7920 235b 3531 3420 225c 3330 305c ary #[514 "\300\ │ │ │ +0000e0e0: 3330 3121 5c32 3130 5c33 3032 5c33 3033 301!\210\302\303 │ │ │ +0000e0f0: 0303 235c 3230 3722 205b 6963 616c 656e ..#\207" [icalen │ │ │ +0000e100: 6461 722d 2d64 6d73 6720 226e 6f6e 2d72 dar--dmsg "non-r │ │ │ +0000e110: 6563 7572 7269 6e67 2061 6c6c 2d64 6179 ecurring all-day │ │ │ +0000e120: 2065 7665 6e74 2220 666f 726d 6174 2022 event" format " │ │ │ +0000e130: 2525 2525 2861 6e64 2028 6469 6172 792d %%%%(and (diary- │ │ │ +0000e140: 626c 6f63 6b20 2573 2025 7329 2922 5d20 block %s %s))"] │ │ │ +0000e150: 3620 2823 2420 2e20 3537 3239 3929 5d29 6 (#$ . 57299)]) │ │ │ +0000e160: 0a23 4032 3333 2043 6f6e 7665 7274 2072 .#@233 Convert r │ │ │ +0000e170: 6563 7572 7269 6e67 2069 6361 6c65 6e64 ecurring icalend │ │ │ +0000e180: 6172 2045 5645 4e54 2074 6f20 6469 6172 ar EVENT to diar │ │ │ +0000e190: 7920 666f 726d 6174 2e0a 0a44 5453 5441 y format...DTSTA │ │ │ +0000e1a0: 5254 2d44 4543 2069 7320 7468 6520 6465 RT-DEC is the de │ │ │ +0000e1b0: 636f 6465 6420 4454 5354 4152 5420 7072 coded DTSTART pr │ │ │ +0000e1c0: 6f70 6572 7479 206f 6620 452e 0a53 5441 operty of E..STA │ │ │ +0000e1d0: 5254 2d54 2069 7320 7468 6520 6576 656e RT-T is the even │ │ │ +0000e1e0: 7427 7320 7374 6172 7420 7469 6d65 2069 t's start time i │ │ │ +0000e1f0: 6e20 6469 6172 7920 666f 726d 6174 2e0a n diary format.. │ │ │ +0000e200: 454e 442d 5420 6973 2074 6865 2065 7665 END-T is the eve │ │ │ +0000e210: 6e74 2773 2065 6e64 2074 696d 6520 696e nt's end time in │ │ │ +0000e220: 2064 6961 7279 2066 6f72 6d61 742e 0a0a diary format... │ │ │ +0000e230: 2866 6e20 4454 5354 4152 542d 4445 4320 (fn DTSTART-DEC │ │ │ +0000e240: 5354 4152 542d 5420 454e 442d 5429 1f0a START-T END-T).. │ │ │ +0000e250: 2864 6566 616c 6961 7320 2769 6361 6c65 (defalias 'icale │ │ │ +0000e260: 6e64 6172 2d2d 636f 6e76 6572 742d 6e6f ndar--convert-no │ │ │ +0000e270: 6e2d 7265 6375 7272 696e 672d 6e6f 742d n-recurring-not- │ │ │ +0000e280: 616c 6c2d 6461 792d 746f 2d64 6961 7279 all-day-to-diary │ │ │ +0000e290: 2023 5b37 3731 2022 5c33 3030 5c33 3031 #[771 "\300\301 │ │ │ +0000e2a0: 215c 3231 305c 3231 315c 3230 3312 005c !\210\211\203..\ │ │ │ +0000e2b0: 3330 325c 3330 335c 3330 3405 5c33 3035 302\303\304.\305 │ │ │ +0000e2c0: 5c22 0404 245c 3230 375c 3330 325c 3330 \"..$\207\302\30 │ │ │ +0000e2d0: 365c 3330 3405 5c33 3035 5c22 0423 5c32 6\304.\305\".#\2 │ │ │ +0000e2e0: 3037 2220 5b69 6361 6c65 6e64 6172 2d2d 07" [icalendar-- │ │ │ +0000e2f0: 646d 7367 2022 6e6f 7420 616c 6c20 6461 dmsg "not all da │ │ │ +0000e300: 7920 6576 656e 7422 2066 6f72 6d61 7420 y event" format │ │ │ +0000e310: 2225 7320 2573 2d25 7322 2069 6361 6c65 "%s %s-%s" icale │ │ │ +0000e320: 6e64 6172 2d2d 6461 7465 7469 6d65 2d74 ndar--datetime-t │ │ │ +0000e330: 6f2d 6469 6172 792d 6461 7465 2022 2f22 o-diary-date "/" │ │ │ +0000e340: 2022 2573 2025 7322 5d20 3820 2823 2420 "%s %s"] 8 (#$ │ │ │ +0000e350: 2e20 3537 3730 3329 5d29 0a23 4033 3837 . 57703)]).#@387 │ │ │ +0000e360: 2041 6464 2053 5452 494e 4720 746f 2074 Add STRING to t │ │ │ +0000e370: 6865 2064 6961 7279 2066 696c 6520 4449 he diary file DI │ │ │ +0000e380: 4152 592d 4649 4c45 4e41 4d45 2e0a 5354 ARY-FILENAME..ST │ │ │ +0000e390: 5249 4e47 206d 7573 7420 6265 2061 2070 RING must be a p │ │ │ +0000e3a0: 726f 7065 726c 7920 666f 726d 6174 7465 roperly formatte │ │ │ +0000e3b0: 6420 7661 6c69 6420 6469 6172 7920 656e d valid diary en │ │ │ +0000e3c0: 7472 792e 2020 4e4f 4e2d 4d41 524b 494e try. NON-MARKIN │ │ │ +0000e3d0: 470a 6465 7465 726d 696e 6573 2077 6865 G.determines whe │ │ │ +0000e3e0: 7468 6572 2064 6961 7279 2065 7665 6e74 ther diary event │ │ │ +0000e3f0: 7320 6172 6520 6372 6561 7465 6420 6173 s are created as │ │ │ +0000e400: 206e 6f6e 2d6d 6172 6b69 6e67 2e20 2049 non-marking. I │ │ │ +0000e410: 660a 5355 4d4d 4152 5920 6973 206e 6f74 f.SUMMARY is not │ │ │ +0000e420: 206e 696c 2069 7420 6d75 7374 2062 6520 nil it must be │ │ │ +0000e430: 6120 7374 7269 6e67 2074 6861 7420 6769 a string that gi │ │ │ +0000e440: 7665 7320 7468 6520 7375 6d6d 6172 7920 ves the summary │ │ │ +0000e450: 6f66 2074 6865 0a65 6e74 7279 2e20 2049 of the.entry. I │ │ │ +0000e460: 6e20 7468 6973 2063 6173 6520 7468 6520 n this case the │ │ │ +0000e470: 7573 6572 2077 696c 6c20 6265 2061 736b user will be ask │ │ │ +0000e480: 6564 2077 6865 7468 6572 2068 6520 7761 ed whether he wa │ │ │ +0000e490: 6e74 7320 746f 2069 6e73 6572 740a 7468 nts to insert.th │ │ │ +0000e4a0: 6520 656e 7472 792e 0a0a 2866 6e20 5354 e entry...(fn ST │ │ │ +0000e4b0: 5249 4e47 2044 4941 5259 2d46 494c 454e RING DIARY-FILEN │ │ │ +0000e4c0: 414d 4520 4e4f 4e2d 4d41 524b 494e 4720 AME NON-MARKING │ │ │ +0000e4d0: 266f 7074 696f 6e61 6c20 5355 4d4d 4152 &optional SUMMAR │ │ │ +0000e4e0: 5929 1f0a 2864 6566 616c 6961 7320 2769 Y)..(defalias 'i │ │ │ +0000e4f0: 6361 6c65 6e64 6172 2d2d 6164 642d 6469 calendar--add-di │ │ │ +0000e500: 6172 792d 656e 7472 7920 235b 3130 3237 ary-entry #[1027 │ │ │ +0000e510: 2022 5c32 3131 5c32 3033 0d00 5c33 3030 "\211\203..\300 │ │ │ +0000e520: 5c33 3031 5c33 3032 035c 2221 5c32 3033 \301\302.\"!\203 │ │ │ +0000e530: 2900 5c32 3131 5c32 3033 1800 5c33 3030 ).\211\203..\300 │ │ │ +0000e540: 5c33 3033 5c33 3034 2121 5c32 3632 0202 \303\304!!\262.. │ │ │ +0000e550: 5c32 3034 2100 5c33 3035 5c33 3036 215c \204!.\305\306!\ │ │ │ +0000e560: 3236 3203 5c33 3037 0403 055c 3331 305c 262.\307...\310\ │ │ │ +0000e570: 3231 3125 5c32 3130 025c 3230 3722 205b 211%\210.\207" [ │ │ │ +0000e580: 792d 6f72 2d6e 2d70 2066 6f72 6d61 742d y-or-n-p format- │ │ │ +0000e590: 6d65 7373 6167 6520 2241 6464 2061 7070 message "Add app │ │ │ +0000e5a0: 6f69 6e74 6d65 6e74 2066 6f72 2060 2573 ointment for `%s │ │ │ +0000e5b0: 2720 746f 2064 6961 7279 3f20 2220 666f ' to diary? " fo │ │ │ +0000e5c0: 726d 6174 2022 4d61 6b65 2061 7070 6f69 rmat "Make appoi │ │ │ +0000e5d0: 6e74 6d65 6e74 206e 6f6e 2d6d 6172 6b69 ntment non-marki │ │ │ +0000e5e0: 6e67 3f20 2220 7265 6164 2d66 696c 652d ng? " read-file- │ │ │ +0000e5f0: 6e61 6d65 2022 4164 6420 6170 706f 696e name "Add appoin │ │ │ +0000e600: 746d 656e 7420 746f 2074 6869 7320 6469 tment to this di │ │ │ +0000e610: 6172 7920 6669 6c65 3a20 2220 6469 6172 ary file: " diar │ │ │ +0000e620: 792d 6d61 6b65 2d65 6e74 7279 2074 5d20 y-make-entry t] │ │ │ +0000e630: 3130 2028 2324 202e 2035 3832 3039 295d 10 (#$ . 58209)] │ │ │ +0000e640: 290a 2340 3635 2045 7861 6d70 6c65 2066 ).#@65 Example f │ │ │ +0000e650: 756e 6374 696f 6e20 666f 7220 666f 726d unction for form │ │ │ +0000e660: 6174 7469 6e67 2061 6e20 6943 616c 656e atting an iCalen │ │ │ +0000e670: 6461 7220 4556 454e 542e 0a0a 2866 6e20 dar EVENT...(fn │ │ │ +0000e680: 4556 454e 5429 1f0a 2864 6566 616c 6961 EVENT)..(defalia │ │ │ +0000e690: 7320 2769 6361 6c65 6e64 6172 2d69 6d70 s 'icalendar-imp │ │ │ +0000e6a0: 6f72 742d 666f 726d 6174 2d73 616d 706c ort-format-sampl │ │ │ +0000e6b0: 6520 235b 3235 3720 225c 3330 305c 3330 e #[257 "\300\30 │ │ │ +0000e6c0: 315c 3330 3203 5c33 3033 5c22 5c32 3036 1\302.\303\"\206 │ │ │ +0000e6d0: 5c6e 005c 3330 345c 3330 3204 5c33 3035 \n.\304\302.\305 │ │ │ +0000e6e0: 5c22 5c32 3036 1200 5c33 3034 5c33 3032 \"\206..\304\302 │ │ │ +0000e6f0: 055c 3330 365c 225c 3230 361a 005c 3330 .\306\"\206..\30 │ │ │ +0000e700: 345c 3330 3206 065c 3330 375c 225c 3230 4\302..\307\"\20 │ │ │ +0000e710: 3623 005c 3330 345c 3330 3206 075c 3331 6#.\304\302..\31 │ │ │ +0000e720: 305c 225c 3230 362c 005c 3330 345c 3330 0\"\206,.\304\30 │ │ │ +0000e730: 3206 085c 3331 315c 225c 3230 3635 005c 2..\311\"\2065.\ │ │ │ +0000e740: 3330 345c 3330 3206 095c 3331 325c 225c 304\302..\312\"\ │ │ │ +0000e750: 3230 363e 005c 3330 3426 085c 3230 3722 206>.\304&.\207" │ │ │ +0000e760: 205b 666f 726d 6174 2022 5355 4d4d 4152 [format "SUMMAR │ │ │ +0000e770: 593d 2725 7327 2044 4553 4352 4950 5449 Y='%s' DESCRIPTI │ │ │ +0000e780: 4f4e 3d27 2573 2720 4c4f 4341 5449 4f4e ON='%s' LOCATION │ │ │ +0000e790: 3d27 2573 2720 4f52 4741 4e49 5a45 523d ='%s' ORGANIZER= │ │ │ +0000e7a0: 2725 7327 2053 5441 5455 533d 2725 7327 '%s' STATUS='%s' │ │ │ +0000e7b0: 2055 524c 3d27 2573 2720 434c 4153 533d URL='%s' CLASS= │ │ │ +0000e7c0: 2725 7327 2220 6963 616c 656e 6461 722d '%s'" icalendar- │ │ │ +0000e7d0: 2d67 6574 2d65 7665 6e74 2d70 726f 7065 -get-event-prope │ │ │ +0000e7e0: 7274 7920 5355 4d4d 4152 5920 2222 2044 rty SUMMARY "" D │ │ │ +0000e7f0: 4553 4352 4950 5449 4f4e 204c 4f43 4154 ESCRIPTION LOCAT │ │ │ +0000e800: 494f 4e20 4f52 4741 4e49 5a45 5220 5354 ION ORGANIZER ST │ │ │ +0000e810: 4154 5553 2055 524c 2043 4c41 5353 5d20 ATUS URL CLASS] │ │ │ +0000e820: 3132 2028 2324 202e 2035 3839 3531 295d 12 (#$ . 58951)] │ │ │ +0000e830: 290a 2870 726f 7669 6465 2027 6963 616c ).(provide 'ical │ │ │ +0000e840: 656e 6461 7229 0a endar). │ │ ├── ./usr/share/emacs/27.1/lisp/emacs-lisp/eieio-datadebug.elc │ │ │ @@ -125,80 +125,79 @@ │ │ │ 000007c0: 6f2d 696e 7365 7274 2d73 6c6f 7473 206e o-insert-slots n │ │ │ 000007d0: 696c 2028 286f 626a 2065 6965 696f 2d64 il ((obj eieio-d │ │ │ 000007e0: 6566 6175 6c74 2d73 7570 6572 636c 6173 efault-superclas │ │ │ 000007f0: 7329 2070 7265 6669 7829 2023 5b35 3134 s) prefix) #[514 │ │ │ 00000800: 2022 5c33 3033 185c 3330 345c 3330 3503 "\303.\304\305. │ │ │ 00000810: 2102 5c33 3036 235c 3231 3001 5c32 3131 !.\306#\210.\211 │ │ │ 00000820: 5c32 3131 5c33 3037 485c 3236 3201 095c \211\307H\262..\ │ │ │ -00000830: 3230 332b 005c 3231 315c 3231 3139 5c32 203+.\211\2119\2 │ │ │ -00000840: 3033 2500 5c32 3131 5c33 3130 4e5c 3230 03%.\211\310N\20 │ │ │ -00000850: 3626 005c 3231 315c 3230 3226 005c 3231 6&.\211\202&.\21 │ │ │ -00000860: 315c 3236 3201 5c32 3032 2c00 5c32 3131 1\262.\202,.\211 │ │ │ -00000870: 5c32 3632 015c 3236 3201 5c33 3034 015c \262.\262.\304.\ │ │ │ -00000880: 3331 3148 035c 3331 3223 5c32 3130 5c32 311H.\312#\210\2 │ │ │ -00000890: 3131 5c33 3133 485c 3231 3147 5c33 3037 11\313H\211G\307 │ │ │ -000008a0: 5c32 3131 0257 5c32 3035 5c32 3231 005c \211.W\205\221.\ │ │ │ -000008b0: 3231 3103 0148 5c33 3134 0121 5c6e 3e5c 211..H\314.!\n>\ │ │ │ -000008c0: 3230 3457 005c 3331 355c 3331 365c 3331 204W.\315\316\31 │ │ │ -000008d0: 3703 445c 225c 3231 305c 3231 315c 3331 7.D\"\210\211\31 │ │ │ -000008e0: 3148 5c33 3230 0607 025c 225c 3332 3101 1H\320...\"\321. │ │ │ -000008f0: 5c32 3036 6500 0221 5c33 3232 505c 3332 \206e..!\322P\32 │ │ │ -00000900: 3306 0b04 5c22 5c32 3033 5c32 3030 005c 3...\"\203\200.\ │ │ │ -00000910: 3332 3406 0b04 5c22 5c33 3034 0106 5c66 324...\"\304..\f │ │ │ -00000920: 0423 5c32 3636 025c 3230 325c 3231 3000 .#\266.\202\210. │ │ │ -00000930: 5c33 3235 5c33 3236 060b 035c 3332 3724 \325\326...\327$ │ │ │ -00000940: 5c32 3130 5c32 3636 055c 3231 3154 5c32 \210\266.\211T\2 │ │ │ -00000950: 3632 015c 3230 323e 005c 3236 365c 3230 62.\202>.\266\20 │ │ │ -00000960: 325c 3236 3201 5c32 3632 0129 5c32 3037 2\262.\262.)\207 │ │ │ -00000970: 2220 5b69 6e68 6962 6974 2d72 6561 642d " [inhibit-read- │ │ │ -00000980: 6f6e 6c79 2065 6965 696f 2d62 6163 6b77 only eieio-backw │ │ │ -00000990: 6172 642d 636f 6d70 6174 6962 696c 6974 ard-compatibilit │ │ │ -000009a0: 7920 636c 2d73 7472 7563 742d 636c 2d73 y cl-struct-cl-s │ │ │ -000009b0: 6c6f 742d 6465 7363 7269 7074 6f72 2d74 lot-descriptor-t │ │ │ -000009c0: 6167 7320 7420 6461 7461 2d64 6562 7567 ags t data-debug │ │ │ -000009d0: 2d69 6e73 6572 742d 7468 696e 6720 6569 -insert-thing ei │ │ │ -000009e0: 6569 6f2d 6f62 6a65 6374 2d6e 616d 652d eio-object-name- │ │ │ -000009f0: 7374 7269 6e67 2022 4e61 6d65 3a20 2220 string "Name: " │ │ │ -00000a00: 3020 636c 2d2d 636c 6173 7320 3120 2243 0 cl--class 1 "C │ │ │ -00000a10: 6c61 7373 3a20 2220 3420 7479 7065 2d6f lass: " 4 type-o │ │ │ -00000a20: 6620 7369 676e 616c 2077 726f 6e67 2d74 f signal wrong-t │ │ │ -00000a30: 7970 652d 6172 6775 6d65 6e74 2063 6c2d ype-argument cl- │ │ │ -00000a40: 736c 6f74 2d64 6573 6372 6970 746f 7220 slot-descriptor │ │ │ -00000a50: 6569 6569 6f2d 2d63 6c61 7373 2d73 6c6f eieio--class-slo │ │ │ -00000a60: 742d 696e 6974 6172 6720 7379 6d62 6f6c t-initarg symbol │ │ │ -00000a70: 2d6e 616d 6520 2220 2220 736c 6f74 2d62 -name " " slot-b │ │ │ -00000a80: 6f75 6e64 7020 6569 6569 6f2d 6f72 6566 oundp eieio-oref │ │ │ -00000a90: 2064 6174 612d 6465 6275 672d 696e 7365 data-debug-inse │ │ │ -00000aa0: 7274 2d63 7573 746f 6d20 2223 756e 626f rt-custom "#unbo │ │ │ -00000ab0: 756e 6422 2066 6f6e 742d 6c6f 636b 2d6b und" font-lock-k │ │ │ -00000ac0: 6579 776f 7264 2d66 6163 655d 2031 3620 eyword-face] 16 │ │ │ -00000ad0: 2249 6e73 6572 7420 7468 6520 736c 6f74 "Insert the slot │ │ │ -00000ae0: 7320 6f66 204f 424a 2069 6e74 6f20 7468 s of OBJ into th │ │ │ -00000af0: 6520 6375 7272 656e 7420 4444 4542 5547 e current DDEBUG │ │ │ -00000b00: 2062 7566 6665 722e 5c6e 5c6e 2866 6e20 buffer.\n\n(fn │ │ │ -00000b10: 4f42 4a20 5052 4546 4958 2922 5d20 6461 OBJ PREFIX)"] da │ │ │ -00000b20: 7461 2d64 6562 7567 2d61 6464 2d73 7065 ta-debug-add-spe │ │ │ -00000b30: 6369 616c 697a 6564 2d74 6869 6e67 2023 cialized-thing # │ │ │ -00000b40: 5b32 3537 2022 5c33 3030 0121 5c32 3037 [257 "\300.!\207 │ │ │ -00000b50: 2220 5b65 6965 696f 2d6f 626a 6563 742d " [eieio-object- │ │ │ -00000b60: 705d 2033 2022 5c6e 5c6e 2866 6e20 5448 p] 3 "\n\n(fn TH │ │ │ -00000b70: 494e 4729 225d 2064 6174 612d 6465 6275 ING)"] data-debu │ │ │ -00000b80: 672d 696e 7365 7274 2d6f 626a 6563 742d g-insert-object- │ │ │ -00000b90: 6275 7474 6f6e 2064 6174 612d 6465 6275 button data-debu │ │ │ -00000ba0: 672d 7368 6f77 2028 286f 626a 2065 6965 g-show ((obj eie │ │ │ -00000bb0: 696f 2d64 6566 6175 6c74 2d73 7570 6572 io-default-super │ │ │ -00000bc0: 636c 6173 7329 2920 235b 3235 3720 225c class)) #[257 "\ │ │ │ -00000bd0: 3330 305c 3330 315c 3330 325c 3330 3304 300\301\302\303. │ │ │ -00000be0: 215c 2221 5c32 3130 5c33 3034 015c 3330 !\"!\210\304.\30 │ │ │ -00000bf0: 355c 225c 3230 3722 205b 6461 7461 2d64 5\"\207" [data-d │ │ │ -00000c00: 6562 7567 2d6e 6577 2d62 7566 6665 7220 ebug-new-buffer │ │ │ -00000c10: 666f 726d 6174 2022 2a25 7320 4444 4542 format "*%s DDEB │ │ │ -00000c20: 5547 2a22 2065 6965 696f 2d6f 626a 6563 UG*" eieio-objec │ │ │ -00000c30: 742d 6e61 6d65 2064 6174 612d 6465 6275 t-name data-debu │ │ │ -00000c40: 672d 696e 7365 7274 2d6f 626a 6563 742d g-insert-object- │ │ │ -00000c50: 736c 6f74 7320 225d 225d 2036 2022 5275 slots "]"] 6 "Ru │ │ │ -00000c60: 6e20 6464 6562 7567 2061 6761 696e 7374 n ddebug against │ │ │ -00000c70: 2061 6e79 2045 4945 494f 206f 626a 6563 any EIEIO objec │ │ │ -00000c80: 7420 4f42 4a2e 5c6e 5c6e 2866 6e20 4f42 t OBJ.\n\n(fn OB │ │ │ -00000c90: 4a29 225d 2070 726f 7669 6465 2065 6965 J)"] provide eie │ │ │ -00000ca0: 696f 2d64 6174 6164 6562 7567 5d20 3629 io-datadebug] 6) │ │ │ -00000cb0: 0a . │ │ │ +00000830: 3230 332a 005c 3231 315c 3231 3139 5c32 203*.\211\2119\2 │ │ │ +00000840: 3033 2400 5c32 3131 5c33 3130 4e5c 3230 03$.\211\310N\20 │ │ │ +00000850: 3625 005c 3230 322b 005c 3231 315c 3236 6%.\202+.\211\26 │ │ │ +00000860: 3201 5c32 3032 2b00 5c32 3131 5c32 3636 2.\202+.\211\266 │ │ │ +00000870: 5c32 3032 5c33 3034 015c 3331 3148 035c \202\304.\311H.\ │ │ │ +00000880: 3331 3223 5c32 3130 5c32 3131 5c33 3133 312#\210\211\313 │ │ │ +00000890: 485c 3231 3147 5c33 3037 5c32 3131 0257 H\211G\307\211.W │ │ │ +000008a0: 5c32 3035 5c32 3136 005c 3231 3103 0148 \205\216.\211..H │ │ │ +000008b0: 5c33 3134 0121 5c6e 3e5c 3230 3454 005c \314.!\n>\204T.\ │ │ │ +000008c0: 3331 355c 3331 365c 3331 3703 445c 225c 315\316\317.D\"\ │ │ │ +000008d0: 3231 305c 3231 315c 3331 3148 5c33 3230 210\211\311H\320 │ │ │ +000008e0: 0607 025c 225c 3332 3101 5c32 3036 6200 ...\"\321.\206b. │ │ │ +000008f0: 0221 5c33 3232 505c 3332 3306 0b04 5c22 .!\322P\323...\" │ │ │ +00000900: 5c32 3033 7d00 5c33 3234 060b 045c 225c \203}.\324...\"\ │ │ │ +00000910: 3330 3401 065c 6604 235c 3236 3602 5c32 304..\f.#\266.\2 │ │ │ +00000920: 3032 5c32 3035 005c 3332 355c 3332 3606 02\205.\325\326. │ │ │ +00000930: 0b03 5c33 3237 245c 3231 305c 3236 3605 ..\327$\210\266. │ │ │ +00000940: 5c32 3131 545c 3236 3201 5c32 3032 3b00 \211T\262.\202;. │ │ │ +00000950: 5c32 3636 5c32 3032 5c32 3632 015c 3236 \266\202\262.\26 │ │ │ +00000960: 3201 295c 3230 3722 205b 696e 6869 6269 2.)\207" [inhibi │ │ │ +00000970: 742d 7265 6164 2d6f 6e6c 7920 6569 6569 t-read-only eiei │ │ │ +00000980: 6f2d 6261 636b 7761 7264 2d63 6f6d 7061 o-backward-compa │ │ │ +00000990: 7469 6269 6c69 7479 2063 6c2d 7374 7275 tibility cl-stru │ │ │ +000009a0: 6374 2d63 6c2d 736c 6f74 2d64 6573 6372 ct-cl-slot-descr │ │ │ +000009b0: 6970 746f 722d 7461 6773 2074 2064 6174 iptor-tags t dat │ │ │ +000009c0: 612d 6465 6275 672d 696e 7365 7274 2d74 a-debug-insert-t │ │ │ +000009d0: 6869 6e67 2065 6965 696f 2d6f 626a 6563 hing eieio-objec │ │ │ +000009e0: 742d 6e61 6d65 2d73 7472 696e 6720 224e t-name-string "N │ │ │ +000009f0: 616d 653a 2022 2030 2063 6c2d 2d63 6c61 ame: " 0 cl--cla │ │ │ +00000a00: 7373 2031 2022 436c 6173 733a 2022 2034 ss 1 "Class: " 4 │ │ │ +00000a10: 2074 7970 652d 6f66 2073 6967 6e61 6c20 type-of signal │ │ │ +00000a20: 7772 6f6e 672d 7479 7065 2d61 7267 756d wrong-type-argum │ │ │ +00000a30: 656e 7420 636c 2d73 6c6f 742d 6465 7363 ent cl-slot-desc │ │ │ +00000a40: 7269 7074 6f72 2065 6965 696f 2d2d 636c riptor eieio--cl │ │ │ +00000a50: 6173 732d 736c 6f74 2d69 6e69 7461 7267 ass-slot-initarg │ │ │ +00000a60: 2073 796d 626f 6c2d 6e61 6d65 2022 2022 symbol-name " " │ │ │ +00000a70: 2073 6c6f 742d 626f 756e 6470 2065 6965 slot-boundp eie │ │ │ +00000a80: 696f 2d6f 7265 6620 6461 7461 2d64 6562 io-oref data-deb │ │ │ +00000a90: 7567 2d69 6e73 6572 742d 6375 7374 6f6d ug-insert-custom │ │ │ +00000aa0: 2022 2375 6e62 6f75 6e64 2220 666f 6e74 "#unbound" font │ │ │ +00000ab0: 2d6c 6f63 6b2d 6b65 7977 6f72 642d 6661 -lock-keyword-fa │ │ │ +00000ac0: 6365 5d20 3136 2022 496e 7365 7274 2074 ce] 16 "Insert t │ │ │ +00000ad0: 6865 2073 6c6f 7473 206f 6620 4f42 4a20 he slots of OBJ │ │ │ +00000ae0: 696e 746f 2074 6865 2063 7572 7265 6e74 into the current │ │ │ +00000af0: 2044 4445 4255 4720 6275 6666 6572 2e5c DDEBUG buffer.\ │ │ │ +00000b00: 6e5c 6e28 666e 204f 424a 2050 5245 4649 n\n(fn OBJ PREFI │ │ │ +00000b10: 5829 225d 2064 6174 612d 6465 6275 672d X)"] data-debug- │ │ │ +00000b20: 6164 642d 7370 6563 6961 6c69 7a65 642d add-specialized- │ │ │ +00000b30: 7468 696e 6720 235b 3235 3720 225c 3330 thing #[257 "\30 │ │ │ +00000b40: 3001 215c 3230 3722 205b 6569 6569 6f2d 0.!\207" [eieio- │ │ │ +00000b50: 6f62 6a65 6374 2d70 5d20 3320 225c 6e5c object-p] 3 "\n\ │ │ │ +00000b60: 6e28 666e 2054 4849 4e47 2922 5d20 6461 n(fn THING)"] da │ │ │ +00000b70: 7461 2d64 6562 7567 2d69 6e73 6572 742d ta-debug-insert- │ │ │ +00000b80: 6f62 6a65 6374 2d62 7574 746f 6e20 6461 object-button da │ │ │ +00000b90: 7461 2d64 6562 7567 2d73 686f 7720 2828 ta-debug-show (( │ │ │ +00000ba0: 6f62 6a20 6569 6569 6f2d 6465 6661 756c obj eieio-defaul │ │ │ +00000bb0: 742d 7375 7065 7263 6c61 7373 2929 2023 t-superclass)) # │ │ │ +00000bc0: 5b32 3537 2022 5c33 3030 5c33 3031 5c33 [257 "\300\301\3 │ │ │ +00000bd0: 3032 5c33 3033 0421 5c22 215c 3231 305c 02\303.!\"!\210\ │ │ │ +00000be0: 3330 3401 5c33 3035 5c22 5c32 3037 2220 304.\305\"\207" │ │ │ +00000bf0: 5b64 6174 612d 6465 6275 672d 6e65 772d [data-debug-new- │ │ │ +00000c00: 6275 6666 6572 2066 6f72 6d61 7420 222a buffer format "* │ │ │ +00000c10: 2573 2044 4445 4255 472a 2220 6569 6569 %s DDEBUG*" eiei │ │ │ +00000c20: 6f2d 6f62 6a65 6374 2d6e 616d 6520 6461 o-object-name da │ │ │ +00000c30: 7461 2d64 6562 7567 2d69 6e73 6572 742d ta-debug-insert- │ │ │ +00000c40: 6f62 6a65 6374 2d73 6c6f 7473 2022 5d22 object-slots "]" │ │ │ +00000c50: 5d20 3620 2252 756e 2064 6465 6275 6720 ] 6 "Run ddebug │ │ │ +00000c60: 6167 6169 6e73 7420 616e 7920 4549 4549 against any EIEI │ │ │ +00000c70: 4f20 6f62 6a65 6374 204f 424a 2e5c 6e5c O object OBJ.\n\ │ │ │ +00000c80: 6e28 666e 204f 424a 2922 5d20 7072 6f76 n(fn OBJ)"] prov │ │ │ +00000c90: 6964 6520 6569 6569 6f2d 6461 7461 6465 ide eieio-datade │ │ │ +00000ca0: 6275 675d 2036 290a bug] 6).