summaryrefslogtreecommitdiffhomepage
path: root/custom
diff options
context:
space:
mode:
Diffstat (limited to 'custom')
-rw-r--r--custom/jao-custom-browse.el2
-rw-r--r--custom/jao-custom-email.el2
-rw-r--r--custom/jao-custom-gnus.el2
-rw-r--r--custom/jao-custom-notmuch.el2
4 files changed, 4 insertions, 4 deletions
diff --git a/custom/jao-custom-browse.el b/custom/jao-custom-browse.el
index 2787518..5c75f7f 100644
--- a/custom/jao-custom-browse.el
+++ b/custom/jao-custom-browse.el
@@ -108,7 +108,7 @@
;;;; browse-url
(require 'browse-url)
-(setq browse-url-generic-program "firefox")
+(setq browse-url-generic-program (jao-d-l "open" "firefox"))
(defun jao-browse-with-external-browser (&rest url)
"Browse with external hogging"
diff --git a/custom/jao-custom-email.el b/custom/jao-custom-email.el
index 534b342..b9e4ba9 100644
--- a/custom/jao-custom-email.el
+++ b/custom/jao-custom-email.el
@@ -11,7 +11,7 @@
(defvar jao-mails)
(defvar jao-extra-mails nil)
(defvar jao-mails-regexp (regexp-opt jao-mails))
-
+(defvar jao-maildir (jao-d-l "~/Documents/mail" "~/var/mail"))
;;; gnus
(setq gnus-init-file "~/.emacs.d/gnus.el"
gnus-home-directory "~/.emacs.d/gnus"
diff --git a/custom/jao-custom-gnus.el b/custom/jao-custom-gnus.el
index 3165372..4e88d59 100644
--- a/custom/jao-custom-gnus.el
+++ b/custom/jao-custom-gnus.el
@@ -185,7 +185,7 @@
(setq mail-sources
(let* ((pwd (auth-source-pick-first-password :host "proton-bridge"))
(mds (mapcar (lambda (f)
- `(maildir :path ,(expand-file-name f "~/var/mail/")))
+ `(maildir :path ,(expand-file-name f jao-maildir)))
'("local/" "feeds/")))
(ims (mapcar (lambda (b)
`(imap :server "127.0.0.1" :port 1143
diff --git a/custom/jao-custom-notmuch.el b/custom/jao-custom-notmuch.el
index 30b0976..85150fa 100644
--- a/custom/jao-custom-notmuch.el
+++ b/custom/jao-custom-notmuch.el
@@ -245,7 +245,7 @@
(when jao-notmuch-enabled
(define-key message-mode-map (kbd "C-c C-d") #'notmuch-draft-postpone)
- (setq message-directory "~/var/mail/"
+ (setq message-directory (file-name-as-directory jao-maildir)
message-auto-save-directory "/tmp"
mail-user-agent 'message-user-agent))