From f99d4b4064250158d9e3bd4d94444f3f19a08b06 Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Wed, 16 Jun 2021 23:42:07 +0100
Subject: wee tweaks

---
 email.org | 13 +++++++------
 exwm.org  |  2 +-
 init.org  | 10 +++++++---
 3 files changed, 15 insertions(+), 10 deletions(-)

diff --git a/email.org b/email.org
index 193a669..76bbbcf 100644
--- a/email.org
+++ b/email.org
@@ -257,7 +257,7 @@
       (seq-mapcat (lambda (base)
                     (mapcar `(lambda (d) (format "%s/%s" ,base d))
                             (apply #'jao-list-mailboxes base excl)))
-                  '("jao" "bigml" "feeds" "trove")))
+                  '("jao" "bigml" "feeds")))
 
     (defvar jao-mailbox-folders (jao-mailbox-folders "trash" "spam"))
     (defvar jao-mailbox-folders-rx (regexp-opt jao-mailbox-folders))
@@ -388,11 +388,12 @@
               ,@(jao-notmuch--mboxes-search "bigml" "inbox" "support")
               ,@(jao-notmuch--mboxes-search "jao")
               ,@(jao-notmuch--mboxes-search "feeds")
-              ,(jao-notmuch--q "gmane" "emacs" "e")
-              ,(jao-notmuch--q "gmane" nil "g"
-                               '("tag:gmane" "tag:new" "not tag:emacs"))
-              ,(jao-notmuch--q "bml/today" nil "tb" '("tag:bigml" "date:1d..") t)
-              ,(jao-notmuch--q "jao/today" nil "tj" '("tag:jao" "date:1d..") t)
+              ,(jao-notmuch--q "local" nil "l" '("tag:local" "tag:new"))
+              ,(jao-notmuch--q "bml" "today" "tb" '("tag:bigml" "date:1d..") t)
+              ,(jao-notmuch--q "jao" "today" "tj"
+                               '("tag:jao" "date:1d.."
+                                 "not tag:\"/(feeds|spam)/\"")
+                               t)
               ,(jao-notmuch--q "flagged" nil "r" '("tag:flagged") t)
               ,(jao-notmuch--q "new" nil "n" '("tag:new"))
               ,(jao-notmuch--q "draft" nil "d" '("tag:draft"))))
diff --git a/exwm.org b/exwm.org
index d60b408..cf84ea3 100644
--- a/exwm.org
+++ b/exwm.org
@@ -470,7 +470,7 @@
        (("S" jao-ssh "ssh")
         ("T" telega "telegram rooster")
         ("b" jao-exwm-bluetooth "bluetooth")
-        ;; ("m" run-proton-bridge "proton bridge")
+        ("m" run-proton-bridge "proton bridge")
         ("v" jao-exwm-proton-vpn "proton vpn"))
        "Chats"
        (("c" (jao-chats t) "connect chats")
diff --git a/init.org b/init.org
index dddd285..64dc419 100644
--- a/init.org
+++ b/init.org
@@ -1533,6 +1533,10 @@
                      doc-view-scroll-down-or-previous-page
                      doc-view-previous-line-or-previous-page
                      doc-view-next-line-or-next-page
+                     image-forward-hscroll
+                     image-backward-hscroll
+                     image-scroll-down
+                     image-scroll-up
                      image-eol
                      image-bol))
           (advice-add f :after #'jao--refresh))
@@ -2888,7 +2892,7 @@
         (when (or p (y-or-n-p "Connect to telegram? "))
           (telega))
         (when (or p (y-or-n-p "Connect to libera? "))
-          (if (y-or-n-p "Circe?") (circe "Libera Chat") (jao-erc))))
+          (circe "Libera Chat")))
 
      (pretty-hydra-define jao-hydra-chats (global-map "s-q" :color blue :quit-key "q")
        ("Connect"
@@ -3099,8 +3103,8 @@
        (("S" jao-ssh "ssh")
         ("T" telega "telegram rooster")
         ;; ("b" jao-exwm-bluetooth "bluetooth")
-        ;; ("m" run-proton-bridge "proton bridge")
-        ;; ("v" jao-exwm-proton-vpn "proton vpn")
+        ("m" run-proton-bridge "proton bridge")
+        ("v" jao-exwm-proton-vpn "proton vpn")
         ("c" (jao-chats t) "connect chats"))
        "Monitors"
        (("p" jao-term-htop "htop")
-- 
cgit v1.2.3