;ELC ;;; Compiled ;;; in Emacs version 29.3 ;;; with all optimizations. (byte-code "\300\301!\210\300\302\303\304#\207" [require evil-collection mu4e nil t] 4)#@119 Wrapper for `mu4e--main-action-str' to maintain compatibility with older release versions of `mu4e.' (fn &rest ARGS) (defalias 'evil-collection-mu4e--main-action-str #[128 "\300\301\302!\203 \302\202\f\303\"\207" [apply fboundp mu4e~main-action-str mu4e--main-action-str] 4 (#$ . 172)])#@119 Wrapper for `mu4e--main-view-queue' to maintain compatibility with older release versions of `mu4e.' (fn &rest ARGS) (defalias 'evil-collection-mu4e--main-view-queue #[128 "\300\301\302!\203 \302\202\f\303\"\207" [apply fboundp mu4e~main-view-queue mu4e--main-view-queue] 4 (#$ . 469)]) (defconst evil-collection-mu4e-maps '(mu4e-main-mode-map mu4e-headers-mode-map mu4e-view-mode-map mu4e-compose-mode-map))#@54 Set the appropriate initial state of all mu4e modes. (defalias 'evil-collection-mu4e-set-state #[0 "\300\211\203\211@\301\302\"\210A\266\202\202\210\301\303\304\"\207" [(mu4e-main-mode mu4e-headers-mode mu4e-view-mode mu4e-org-mode) evil-set-initial-state normal mu4e-compose-mode insert] 5 (#$ . 887)]) (defalias 'evil-collection-mu4e-org-set-header-to-normal-mode #[0 "\300\301\302\"\207" [evil-set-initial-state mu4e-compose-mode normal] 3]) (defalias 'evil-collection-mu4e-org-set-header-to-insert-mode #[0 "\300\301\302\"\207" [evil-set-initial-state mu4e-compose-mode insert] 3])#@46 All evil-mu4e bindings for evil normal mode. (defvar evil-collection-mu4e-mode-normal-map-bindings (byte-code "\301\302\303\304\305\306\307\310\311\312\313\314\315\316\317\312\320\321\322\323\324\316\325\326\327\330\331\332\333\334\335\336\337\340\341\342\343\344\345\346\347\350\351\352\353\354\355\356\357\360\361\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\201K\201L\201M\201N\201O\201P\205{\201QBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBBF\207" [evil-want-C-u-scroll (mu4e-main-mode-map "J" mu4e~headers-jump-to-maildir "j" next-line "k" previous-line "u" mu4e-update-mail-and-index "b" mu4e-search-bookmark "B" mu4e-search-bookmark-edit "N" mu4e-news ";" mu4e-context-switch "H" mu4e-display-manual "C" mu4e-compose-new "cc" mu4e-compose-new "x" mu4e-kill-update-mail "A" mu4e-about "f" smtpmail-send-queued-mail "m" mu4e--main-toggle-mail-sending-mode "s" mu4e-search) (mu4e-headers-mode-map "J" mu4e~headers-jump-to-maildir "C" mu4e-compose-new "E" mu4e-compose-edit "F" mu4e-compose-forward "R" mu4e-compose-reply "cc" mu4e-compose-new "ce" mu4e-compose-edit "cf" mu4e-compose-forward "cr" mu4e-compose-reply "o" mu4e-headers-change-sorting "j" mu4e-headers-next "k" mu4e-headers-prev "b" mu4e-search-bookmark "B" mu4e-search-bookmark-edit ";" mu4e-context-switch "/" mu4e-search-narrow "s" mu4e-search "S" mu4e-search-edit "x" mu4e-mark-execute-all "a" mu4e-headers-action "*" mu4e-headers-mark-for-something "&" mu4e-headers-mark-custom "A" mu4e-headers-mark-for-action "m" mu4e-headers-mark-for-move "r" mu4e-headers-mark-for-refile "D" mu4e-headers-mark-for-delete "d" mu4e-headers-mark-for-trash "=" mu4e-headers-mark-for-untrash "u" mu4e-headers-mark-for-unmark "U" mu4e-mark-unmark-all "?" mu4e-headers-mark-for-unread "!" mu4e-headers-mark-for-read "%" mu4e-headers-mark-pattern "+" mu4e-headers-mark-for-flag "-" mu4e-headers-mark-for-unflag "zr" mu4e-headers-toggle-include-related "zt" mu4e-headers-toggle-threading "zd" mu4e-headers-toggle-skip-duplicates "gl" mu4e-show-log "gv" mu4e-select-other-view "T" (lambda nil (interactive) (mu4e-headers-mark-thread nil '(read)))) (mu4e-compose-mode-map "gg" mu4e-compose-goto-top "G" mu4e-compose-goto-bottom "ZD" message-dont-send "ZF" mml-attach-file) mu4e-view-mode-map " " mu4e-view-scroll-up-or-next "gX" mu4e-view-fetch-url "C" mu4e-compose-new "H" mu4e-view-toggle-html "R" mu4e-compose-reply "cc" "ce" mu4e-compose-edit "cf" mu4e-compose-forward "cr" "p" mu4e-view-save-attachments "O" mu4e-headers-change-sorting "A" mu4e-view-mime-part-action "a" mu4e-view-action "J" mu4e~headers-jump-to-maildir "x" mu4e-view-marked-execute "&" mu4e-view-mark-custom "*" mu4e-view-mark-for-something "m" mu4e-view-mark-for-move "r" mu4e-view-mark-for-refile "D" mu4e-view-mark-for-delete "d" mu4e-view-mark-for-trash "=" mu4e-view-mark-for-untrash "u" mu4e-view-unmark "U" mu4e-view-unmark-all "?" mu4e-view-mark-for-unread "!" mu4e-view-mark-for-read "%" mu4e-view-mark-pattern "+" mu4e-view-mark-for-flag "-" mu4e-view-mark-for-unflag "zr" mu4e-headers-toggle-include-related "zt" mu4e-headers-toggle-threading "za" mu4e-view-toggle-hide-cited "gl" mu4e-show-log "s" mu4e-view-search-edit "|" mu4e-view-pipe "." mu4e-view-raw-message [67108909] mu4e-headers-split-view-shrink [67108907] mu4e-headers-split-view-grow "T" (lambda nil (interactive) (mu4e-headers-mark-thread nil '(read))) ("" evil-scroll-up)] 83) (#$ . 1484))#@46 All evil-mu4e bindings for evil visual mode. (defvar evil-collection-mu4e-mode-visual-map-bindings '((mu4e-headers-mode-map "*" mu4e-headers-mark-for-something "A" mu4e-headers-mark-for-action "m" mu4e-headers-mark-for-move "r" mu4e-headers-mark-for-refile "D" mu4e-headers-mark-for-delete "d" mu4e-headers-mark-for-trash "=" mu4e-headers-mark-for-untrash "u" mu4e-headers-mark-for-unmark "?" mu4e-headers-mark-for-unread "!" mu4e-headers-mark-for-read "+" mu4e-headers-mark-for-flag "-" mu4e-headers-mark-for-unflag) (mu4e-compose-mode-map "gg" mu4e-compose-goto-top "G" mu4e-compose-goto-bottom)) (#$ . 4998))#@19 Set the bindings. (defalias 'evil-collection-mu4e-set-bindings #[0 "\211\203\211@\302\303\304#\210A\266\202\202\210 \211\203)\211@\302\303\305#\210A\266\202\202\210\306\307\310\311#\210\306\312\310\311#\210\313\314\315\316\317\320\321\316\322\320\323\324\325\326\327\330&\210\313\331\332\333\334\335%\210\313\314\332\336\334\337%\210\313\340\341\342\343\344%\210\313\345\346\347\350\351\315\352\317\353\321\352\322\353\323\354\325\355\356\357\334\360&\210\361\362\345\363\364$\207" [evil-collection-mu4e-mode-normal-map-bindings evil-collection-mu4e-mode-visual-map-bindings apply evil-collection-define-key normal visual evil-set-command-property mu4e-compose-goto-bottom :keep-visual t mu4e-compose-goto-top evil-collection-bind mu4e-headers-mode-map next-item mu4e-headers-next-unread prev-item mu4e-headers-prev-unread next-section prev-section next-section-2 mu4e-headers-next prev-section-2 mu4e-headers-prev action mu4e-headers-view-message mu4e-main-mode-map refresh revert-buffer quit mu4e-quit mu4e-search-rerun mu4e~headers-quit-buffer mu4e-compose-mode-map quit-save message-send-and-exit quit-cancel mu4e-message-kill-buffer mu4e-view-mode-map cycle-next shr-next-link cycle-previous shr-previous-link mu4e-view-headers-next-unread mu4e-view-headers-prev-unread mu4e-view-headers-next mu4e-view-headers-prev browse-url mu4e-view-go-to-url mu4e~view-quit-buffer evil-collection-define-operator-key yank "u" mu4e-view-save-url] 22 (#$ . 5615)])#@52 The place where to start overriding Basic section. (defvar evil-collection-mu4e-begin-region-basic "\n Basics" (#$ . 7090))#@50 The place where to end overriding Basic section. (defvar evil-collection-mu4e-end-region-basic "a new message\n" (#$ . 7220))#@36 Define the evil-mu4e Basic region. (defvar evil-collection-mu4e-new-region-basic (byte-code "\300\301\302\"\300\303\304\"\300\305\306\"Q\207" [evil-collection-mu4e--main-action-str " * [J]ump to some maildir\n" mu4e-jump-to-maildir " * enter a [s]earch query\n" mu4e-search " * [C]ompose a new message\n" mu4e-compose-new] 5) (#$ . 7351))#@51 The place where to start overriding Misc section. (defvar evil-collection-mu4e-begin-region-misc "\n Misc" (#$ . 7695))#@49 The place where to end overriding Misc section. (defvar evil-collection-mu4e-end-region-misc "q]uit" (#$ . 7821))#@35 Define the evil-mu4e Misc region. (defalias 'evil-collection-mu4e-new-region-misc #[0 "\301\302\303\"\301\304\305\"\306!\203\307 \202\310\311\301\312\313\"\301\314\315\"\301\316\317\"\301\320\321\"\260\207" [smtpmail-queue-dir evil-collection-mu4e--main-action-str " * [;]Switch focus\n" mu4e-context-switch " * [u]pdate email & database\n" mu4e-update-mail-and-index file-directory-p evil-collection-mu4e--main-view-queue "" "\n" " * [N]ews\n" mu4e-news " * [A]bout mu4e\n" mu4e-about " * [H]elp\n" mu4e-display-manual " * [q]uit\n" mu4e-quit] 10 (#$ . 7940)])#@53 The place where to end overriding Maildirs section. (defvar evil-collection-mu4e-begin-region-maildir "\n Maildirs" (#$ . 8513))#@53 The place where to end overriding Maildirs section. (defvar evil-collection-mu4e-end-region-maildir "\n\n Misc" (#$ . 8648))#@39 Define the evil-mu4e Maildirs region. (defalias 'evil-collection-mu4e-new-region-maildir #[0 "\302 \303 \304\305\"\306\211\211\211\211\211\307\306:\203\314@\262\310\304 \311\"!\262\304\312\"\262\304\313\"\262;\205c \306\211:\203_@\262\314\304\313\"\315\316#\230\203XB\262A\262\202<\211\237\266\203\262\205n\304@\317\"\262\304\320\"\204\301 \203\202\321=\204\301\322\323 \324\nR\325\nP\"\203\273\304@\317\"\304@\326\"\327\330\331\332!Z\333\"\334\335!\336\337#$\266\202\202\274\307\340QP\262A\262 \306\262\202\266\214\334\341\336\342#P\207" [mu4e--server-props mu4e-main-hide-fully-read mu4e--maildirs-with-query mu4e--longest-of-maildirs-and-bookmarks plist-get :queries nil "" string :key :name :query decode-coding-string utf-8 t :unread :hide 0 evil-collection-mu4e--main-action-str " * [J" "] " "J" :count format "%s (%s/%s)" make-string string-width 32 propertize number-to-string face mu4e-header-key-face "\n" "\n Misc" mu4e-title-face] 23 (#$ . 8779)])#@125 Replace region between START and END with NEW-REGION. START end END end are regular expressions. (fn NEW-REGION START END) (defalias 'evil-collection-mu4e-replace-region #[771 "eb\210\300!\210\301c\210c\210`\300!|\207" [re-search-forward "\n\n"] 7 (#$ . 9815)])#@79 Update `Basic', `Maildir', and `Misc' regions to reflect the new keybindings. (defalias 'evil-collection-mu4e-update-main-view #[0 "\306 \n#\210\306\307 \f#\210\306\310  #\207" [evil-collection-mu4e-new-region-basic evil-collection-mu4e-begin-region-basic evil-collection-mu4e-end-region-basic evil-collection-mu4e-begin-region-misc evil-collection-mu4e-end-region-misc evil-collection-mu4e-begin-region-maildir evil-collection-mu4e-replace-region evil-collection-mu4e-new-region-misc evil-collection-mu4e-new-region-maildir evil-collection-mu4e-end-region-maildir] 4 (#$ . 10088)])#@125 Initialize evil-mu4e if necessary. If mu4e-main-mode is in evil-state-motion-modes, initialization is already done earlier. (defalias 'evil-collection-mu4e-setup #[0 "\300 \210\301 \210\302\303\304\305#\210\306\307\310\"\210\306\311\312\"\210\306\313\314\"\207" [evil-collection-mu4e-set-state evil-collection-mu4e-set-bindings evil-collection-bind mu4e-headers-mode-map jump mu4e~headers-jump-to-maildir add-hook mu4e-main-mode-hook evil-collection-mu4e-update-main-view org-mode-hook evil-collection-mu4e-org-set-header-to-normal-mode mu4e-compose-pre-hook evil-collection-mu4e-org-set-header-to-insert-mode] 4 (#$ . 10681)]) (provide 'evil-collection-mu4e)