From 851919cedae3b984700f5d42d93ce4fb427a39de Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Wed, 21 Jul 2021 17:03:42 +0100
Subject: nits

---
 completion.org | 3 ++-
 email.org      | 3 ++-
 gnus.org       | 2 +-
 init.org       | 8 +++++---
 4 files changed, 10 insertions(+), 6 deletions(-)

diff --git a/completion.org b/completion.org
index 497a1f4..597fcb9 100644
--- a/completion.org
+++ b/completion.org
@@ -17,7 +17,7 @@
       :ensure t
       :init
       (setq completion-styles '(orderless)
-            orderless-skip-highlighting t
+            orderless-skip-highlighting nil
             orderless-component-separator "[ -/]+"
             orderless-matching-styles
             '(orderless-literal orderless-regexp orderless-initialism)))
@@ -70,6 +70,7 @@
       :ensure t
       :init (setq vertico-count 20
                   vertico-cycle t
+                  vertico-group-format nil
                   org-refile-use-outline-path t)
 
       :config
diff --git a/email.org b/email.org
index ca5d0f7..43d97ea 100644
--- a/email.org
+++ b/email.org
@@ -197,7 +197,8 @@
 
       :custom
       ((mailcap-user-mime-data
-        '((jao-icalendar-import-buffer "application/ics")))))
+        '((jao-icalendar-import-buffer "application/ics")
+          ("viewpdf.sh %s" "application/pdf")))))
   #+end_src
 * bbdb
   #+begin_src emacs-lisp
diff --git a/gnus.org b/gnus.org
index 9f1d545..322adf9 100644
--- a/gnus.org
+++ b/gnus.org
@@ -437,7 +437,7 @@
              (expiry-wait . 7)
              (expiry-target . delete)
              (jao-gnus--archiving-group "nnimap:feeds/trove"))
-            ("^nnimap:feeds/news$" (expiry-wait . 1))
+            ("^nnimap:feeds/\\(news\\|emacs\\)$" (expiry-wait . 1))
             ("^nnimap:feeds/trove"
              (auto-expire . nil)
              (total-expire . nil))
diff --git a/init.org b/init.org
index 440f914..c4bb76a 100644
--- a/init.org
+++ b/init.org
@@ -812,6 +812,7 @@
       (setq ls-lisp-dirs-first t)
       (setq dired-dwim-target t)
       (setq wdired-create-parent-directories t)
+      (setq dired-kill-when-opening-new-dired-buffer t)
 
       (use-package find-dired
         :init
@@ -1042,9 +1043,10 @@
         (other-window -1))
 
       (defun jao--nth-window (n)
-        (let ((jao-minibuffer-enabled-p nil))
+        (let ((jao-minibuffer-enabled-p nil)
+              (ignore-window-parameters t))
           (select-window (frame-first-window))
-          (dotimes (x n) (other-window 1)))
+          (other-window n))
         (jao-minibuffer-refresh))
 
       (defalias 'jao-other-window 'other-window)
@@ -1057,7 +1059,7 @@
       (global-set-key (kbd "C-c 0") #'jao-first-window)
       (dolist (n '(0 1 2 3 4 5 6 7 8))
         (global-set-key (format "\C-c%s" (1+ n))
-                        `(lambda () (interactive) (jao--nth-window ,n))))
+                        (lambda () (interactive) (jao--nth-window n))))
 
     #+end_src
 *** winner mode
-- 
cgit v1.2.3