diff options
| author | Yann Herklotz <git@yannherklotz.com> | 2023-01-01 17:47:20 +0000 |
|---|---|---|
| committer | Yann Herklotz <git@yannherklotz.com> | 2023-01-01 17:47:20 +0000 |
| commit | 41f155c372a926295f01b2aa523af2c488062dba (patch) | |
| tree | 8cd523eaf714edc827e1140bdda5d06eebdbdd20 | |
| parent | 9ce70486ed9e120dfd3f1a65d827255d873d2a0a (diff) | |
| download | ymh-emacs-41f155c372a926295f01b2aa523af2c488062dba.tar.gz ymh-emacs-41f155c372a926295f01b2aa523af2c488062dba.zip | |
Fix some filters
| -rw-r--r-- | init.el | 14 |
1 files changed, 8 insertions, 6 deletions
@@ -159,10 +159,10 @@ ;; Mac configuration (when (eq system-type 'darwin) - (progn (setq mac-right-option-modifier 'none - mac-command-modifier 'meta - mac-option-modifier nil) - (add-hook 'ns-system-appearance-change-functions #'ymh/apply-theme)))) + (setq mac-right-option-modifier 'hyper) + (setq mac-command-modifier 'meta) + (setq mac-option-modifier 'super) + (add-hook 'ns-system-appearance-change-functions #'ymh/apply-theme))) (use-package ymh-diary :load-path "ymh-emacs") @@ -619,8 +619,10 @@ https://yannherklotz.com")) (:name "flagged" :query "tag:flagged" :key "f") (:name "sent" :query "tag:sent" :key "s") (:name "drafts" :query "tag:draft" :key "d") - (:name "mailbox" :query "date:last_month..this_month and (tag:mailbox and tag:inbox) and not tag:deleted and not tag:sent and tag:unread" :key ,(kbd "m i")) - (:name "imperial" :query "date:last_month..this_month and (tag:imperial and tag:inbox) and not tag:deleted and not tag:sent and tag:unread" :key ,(kbd "i i")) + (:name "mailbox" :query "date:last_month..this_month and (tag:mailbox and tag:inbox) and not tag:deleted and not tag:sent" :key ,(kbd "m i")) + (:name "mailbox-unread" :query "date:last_month..this_month and (tag:mailbox and tag:inbox) and not tag:deleted and not tag:sent and tag:unread" :key ,(kbd "m u")) + (:name "imperial" :query "date:last_month..this_month and (tag:imperial and tag:inbox) and not tag:deleted and not tag:sent" :key ,(kbd "i i")) + (:name "imperial-unread" :query "date:last_month..this_month and (tag:imperial and tag:inbox) and not tag:deleted and not tag:sent and tag:unread" :key ,(kbd "i u")) (:name "mailbox-archive" :query "date:last_month..this_month and (tag:mailbox and tag:archive) and not tag:deleted and not tag:sent" :key ,(kbd "m a")) (:name "imperial-archive" :query "date:last_month..this_month and (tag:imperial and tag:archive) and not tag:deleted and not tag:sent" :key ,(kbd "i a")) (:name "all recent" :query "date:last_month..this_month" :key "r"))) |