diff options
| -rw-r--r-- | attic/misc.org | 56 | ||||
| -rw-r--r-- | completion.org | 29 | ||||
| -rw-r--r-- | gnus.org | 28 |
3 files changed, 56 insertions, 57 deletions
diff --git a/attic/misc.org b/attic/misc.org index c10b1c6..9dd6b24 100644 --- a/attic/misc.org +++ b/attic/misc.org @@ -1,5 +1,33 @@ #+title: Miscellaneous config bits that i don't use anymore +* spam + #+begin_src emacs-lisp :tangle no + (setq jao-gnus-ham-groups ".*\\(bigml\\|jao\\|feeds\\)\\..*" + gnus-spam-process-destinations `((,jao-gnus-ham-groups "nnml:spam")) + gnus-spam-newsgroup-contents + `((".*spam.*" gnus-group-spam-classification-spam) + (,jao-gnus-ham-groups gnus-group-spam-classification-ham)) + gnus-ham-process-destinations + '((".*\\(jao\\|feeds\\)\\..*" "jao.inbox") + (".*bigml\\..*" "bigml.inbox")) + gnus-spam-process-newsgroups + `((,jao-gnus-ham-groups ((spam spam-use-bogofilter) + (ham spam-use-bogofilter) + (spam spam-use-spamassassin) + (ham spam-use-spamassassin) + (spam spam-use-blacklist))) + ("nnml:spam" ((ham spam-use-blacklist) + (spam spam-use-bogofilter) + (ham spam-use-bogofilter)))) + spam-use-blacklist t + spam-use-BBDB nil + spam-use-bogofilter t + spam-use-spamassassin nil + spam-spamassassin-program "spamc" + spam-split-group "spam") + + ;; (spam-initialize) + #+end_src * portability macros #+begin_src emacs-lisp (defmacro jao-syscase (clauses) @@ -849,6 +877,34 @@ (setq vertico-buffer-display-action '(display-buffer-at-bottom (window-height . ,(+ 3 vertico-count)))) (vertico-buffer-mode -1)) + + (use-package vertico + :ensure t + :init + (setq vertico-count 10 + vertico-cycle t + vertico-resize t + org-refile-use-outline-path t + resize-mini-windows t) + + :config + + (defun jao-vertico--display-candidates (lines) + (move-overlay vertico--candidates-ov (point-min) (point-min)) + (overlay-put vertico--candidates-ov 'after-string (apply #'concat lines)) + (vertico--resize-window (length lines))) + + (advice-add 'vertico--display-candidates + :override #'jao-vertico--display-candidates)) + + (use-package vertico-directory + :after vertico + :bind (:map vertico-map (("RET" . vertico-directory-enter) + ("M-<backspace>" . vertico-directory-delete-word) + ("<backspace>" . vertico-directory-delete-char)))) + + ;; (vertico-mode) + #+end_src * orderless #+begin_src emacs-lisp diff --git a/completion.org b/completion.org index f437d9d..c44d3e8 100644 --- a/completion.org +++ b/completion.org @@ -65,35 +65,6 @@ (command (styles orderless+initialism))) orderless-matching-styles '(orderless-literal orderless-regexp orderless-prefixes))) - #+end_src -* vertico - #+begin_src emacs-lisp - (use-package vertico - :ensure t - :init - (setq vertico-count 10 - vertico-cycle t - vertico-resize t - org-refile-use-outline-path t - resize-mini-windows t) - - :config - - (defun jao-vertico--display-candidates (lines) - (move-overlay vertico--candidates-ov (point-min) (point-min)) - (overlay-put vertico--candidates-ov 'after-string (apply #'concat lines)) - (vertico--resize-window (length lines))) - - (advice-add 'vertico--display-candidates - :override #'jao-vertico--display-candidates)) - - (use-package vertico-directory - :after vertico - :bind (:map vertico-map (("RET" . vertico-directory-enter) - ("M-<backspace>" . vertico-directory-delete-word) - ("<backspace>" . vertico-directory-delete-char)))) - - ;; (vertico-mode) #+end_src * mct @@ -308,34 +308,6 @@ (eval-after-load "message" '(setq message-draft-headers (remove 'Date message-draft-headers))) #+END_SRC -* Spam - #+begin_src emacs-lisp - (setq jao-gnus-ham-groups ".*\\(bigml\\|jao\\|feeds\\)\\..*" - gnus-spam-process-destinations `((,jao-gnus-ham-groups "nnml:spam")) - gnus-spam-newsgroup-contents - `((".*spam.*" gnus-group-spam-classification-spam) - (,jao-gnus-ham-groups gnus-group-spam-classification-ham)) - gnus-ham-process-destinations - '((".*\\(jao\\|feeds\\)\\..*" "jao.inbox") - (".*bigml\\..*" "bigml.inbox")) - gnus-spam-process-newsgroups - `((,jao-gnus-ham-groups ((spam spam-use-bogofilter) - (ham spam-use-bogofilter) - (spam spam-use-spamassassin) - (ham spam-use-spamassassin) - (spam spam-use-blacklist))) - ("nnml:spam" ((ham spam-use-blacklist) - (spam spam-use-bogofilter) - (ham spam-use-bogofilter)))) - spam-use-blacklist t - spam-use-BBDB nil - spam-use-bogofilter t - spam-use-spamassassin nil - spam-spamassassin-program "spamc" - spam-split-group "spam") - - ;; (spam-initialize) - #+end_src * Add-ons *** icalendar/org #+begin_src emacs-lisp |