;ELC ;;; Compiled ;;; in Emacs version 29.3 ;;; with all optimizations. (byte-code "\300\301!\210\300\302!\207" [require calendar evil-collection] 2) (defconst evil-collection-calendar-maps '(calendar-mode-map))#@40 Bind Org functions to Calendar keymap. (defalias 'evil-collection-calendar-setup-org-bindings #[0 "\303\304!\210\303\305!\210;\203\2026\306!\203\"\307\310\311#\262\20269\204+\311\2026\312=\2035\313\2026\311\314\315\316\317!\320$\266 \321=?\205\n;\203P\n\202u\306\n!\203a\n\307\322\311#\262\202u\n9\204j\311\202u\n\312=\203t\323\202u\311\314\315\316\317!\324$\262\207" [org-calendar-to-agenda-key org-agenda-diary-file org-calendar-insert-diary-entry-key require org org-agenda vectorp mapconcat #[257 "\300\301\"\207" [format "%c"] 4 "\n\n(fn X)"] "" default "c" evil-collection-define-key normal calendar-mode-map kbd org-calendar-goto-agenda diary-file #[257 "\300\301\"\207" [format "%c"] 4 "\n\n(fn X)"] "i" org-agenda-diary-entry] 6 (#$ . 223)]) (byte-code "\203 \301\302\303\"\210\301\207" [evil-collection-calendar-want-org-bindings add-hook calendar-mode-hook evil-collection-calendar-setup-org-bindings] 3)#@40 Set up `evil' bindings for `calendar'. (defalias 'evil-collection-calendar-setup #[0 "\300\301\302\"\210\303\302\304\305\306\307\310\311\312\313\314\315\316\317\316\320\321\322\323\324\325\326\327\330\331\332\333\334\335\336\335\337\340\341\342\343\344\345\346\347\350\351\352\353\354\355\356\357\360\361\360\362\363\364\365\366\367\370\371\372\373\374\375\376\377\201@\201A\201B\201C\201D\201E\201F\201G\201H\201I\201J\201G\201K\201L\201M\201N\201O\201P&R\210\201Q\304\201R\352\201S\350\201T\201U\201V\201W\201X\352\201Y\350\201Z\201[\201\\\201[\201]\201^\201_\201`\201a\201b\201c\201N&\207" [evil-set-initial-state calendar-mode normal evil-collection-define-key calendar-mode-map "h" calendar-backward-day "j" calendar-forward-week "k" calendar-backward-week "l" calendar-forward-day "0" calendar-beginning-of-week "^" "$" calendar-end-of-week [134217788] calendar-beginning-of-year [134217790] calendar-end-of-year "(" calendar-beginning-of-month ")" calendar-end-of-month " " scroll-other-window [33554464] scroll-other-window-down [delete] "<" calendar-scroll-right ">" calendar-scroll-left "" calendar-scroll-right-three-months "" calendar-scroll-left-three-months "{" calendar-backward-month "}" calendar-forward-month "v" calendar-set-mark "." calendar-goto-today "o" calendar-other-month "gD" "D" diary-view-other-diary-entries "d" diary-view-entries "m" diary-mark-entries "s" diary-show-all-entries "Aa" appt-add "Ad" appt-delete "u" calendar-unmark "x" calendar-mark-holidays "gm" calendar-lunar-phases "gs" calendar-sunrise-sunset "gh" calendar-list-holidays "gc" org-calendar-goto-agenda "a" "r" calendar-cursor-holidays "?" calendar-goto-info-node [134217789] calendar-count-days-region evil-collection-bind next-item prev-item next-section calendar-forward-year prev-section calendar-backward-year next-section-2 prev-section-2 quit calendar-exit quit-save quit-cancel evil-quit refresh calendar-redraw find-definition calendar-goto-date describe-mode] 83 (#$ . 1181)]) (provide 'evil-collection-calendar)