Fix whitespace

global.org

@@ -624,7 +624,7 @@
                 :match-func (lambda (msg)
                               (when msg
                                 (string-match-p "^/math" (mu4e-message-field
-                                msg :maildir))))
+                                                          msg :maildir))))
                 :vars '( ( user-mail-address	     . "jacopods@math.utoronto.ca" )
                          ( user-full-name	     . "Jacopo De Simoi" )
                          ( mu4e-sent-folder       . "/math/Sent")
@@ -634,8 +634,8 @@
                          ( smtpmail-stream-type   . starttls )
                          ( smtpmail-smtp-service  . 9587 )
                          ( mu4e-compose-signature . (concat
-                                                    "Jacopo De Simoi \n"
-                                                    "Associate Professor — U Toronto\n"))))))
+                                                     "Jacopo De Simoi\n"
+                                                     "Associate Professor — U Toronto\n"))))))
 
      ;; set `mu4e-context-policy` and `mu4e-compose-policy` to tweak when mu4e should
      ;; guess or ask the correct context, e.g.
@@ -648,20 +648,20 @@
      ;; default is to ask
      (setq mu4e-compose-context-policy 'pick-first)
 
-        (add-hook 'mu4e-headers-mode-hook
-                  #'(lambda () (setq-local show-trailing-whitespace nil)))
-        (add-hook 'mu4e-view-mode-hook
-                  #'(lambda () (setq-local show-trailing-whitespace nil)))
+     (add-hook 'mu4e-headers-mode-hook
+               #'(lambda () (setq-local show-trailing-whitespace nil)))
+     (add-hook 'mu4e-view-mode-hook
+               #'(lambda () (setq-local show-trailing-whitespace nil)))
 
-      ;; Get mail
-        (setq mu4e-get-mail-command "mbsync math-fast"
-              mu4e-change-filenames-when-moving t   ; needed for mbsync
-              mu4e-headers-include-related nil ;do not include threaded
-                                               ;sent messages in inbox queries
-              )
+     ;; Get mail
+     (setq mu4e-get-mail-command "mbsync math-fast"
+           mu4e-change-filenames-when-moving t   ; needed for mbsync
+           mu4e-headers-include-related nil ;do not include threaded
+                                             ;sent messages in inbox queries
+           )
 
-        (define-key mu4e-headers-mode-map (kbd "h") 'mu4e-headers-mark-for-refile)
-        (define-key mu4e-headers-mode-map (kbd "h") 'mu4e-headers-mark-for-refile)
+     (define-key mu4e-headers-mode-map (kbd "h") 'mu4e-headers-mark-for-refile)
+     (define-key mu4e-headers-mode-map (kbd "h") 'mu4e-headers-mark-for-refile)
 
      (define-key mu4e-headers-mode-map (kbd "h") 'mu4e-headers-mark-for-refile)
      (define-key mu4e-view-mode-map (kbd "h") 'mu4e-view-mark-for-refile)
@@ -673,10 +673,14 @@
      (define-key mu4e-headers-mode-map (kbd "C-k") 'mu4e-headers-mark-for-trash)
 
 
-        ;; Send mail
-        (setq message-send-mail-function 'smtpmail-send-it
-              smtpmail-servers-requiring-authorization ".*"
-              smtpmail-smtp-server "127.0.0.1")
+     ;; Send mail
+     (setq message-send-mail-function 'smtpmail-send-it
+           smtpmail-servers-requiring-authorization ".*"
+           smtpmail-smtp-server "127.0.0.1")
+
+     (require 'org-mu4e)
+     ;;store link to message if in header view, not to header query
+     (setq mu4e-org-link-query-in-headers-mode nil)
 
       #+end_src
 ** org-mode