home · contact · privacy
Fix emacs mail setup.
[config] / buster / home_files / user / .emacs.d / init.el
index 3452126e77d4a2322bdb0c9ec97661e20369e8c7..fbec98087ddf9dd8813ec5e6f132217a17f53bb8 100644 (file)
@@ -90,7 +90,6 @@
       delete-old-versions 1)  ;; neither t nor nil: never delete
 
 
-
 ;; package management
 ;; ==================
 
 ;; ==========
 
 (setq send-mail-function 'smtpmail-send-it)
-(setq smtpmail-smtp-server "core.plomlompom.com")
+(setq smtpmail-smtp-server "mail.plomlompom.com")
 (setq smtpmail-smtp-service 465)
 (setq smtpmail-stream-type 'ssl)
 (setq smtpmail-smtp-user "plom")
 (setq mml-secure-openpgp-encrypt-to-self t)
 (add-hook 'message-setup-hook 'mml-secure-sign-pgpmime)
 
+;(setq gnutls-log-level 0)
+
+;; if we don't set this, we get this warning:
+;;   gnutls.c: [1] Note that the security level of the Diffie-Hellman key exchange
+;;   has been lowered to 256 bits and this may allow decryption of the session data
+(setq gnutls-min-prime-bits 1024)
+
+;; there is a WEIRD bug somewhere in /network-stream-open-tls/ that disappears the
+;; stream process, seemingly unless the /message/ function is called at the right
+;; place (earliest in /nsm-verify-connection/ right before the "cond" there, latest
+;; in /network-stream-get-response/ right after "(goto-char start)"; this works
+;; unless /inhibit_message/ is set, indicating that writing to the *Messages*
+;; buffer is not relevant, but maybe writing to the echo area is); activing the
+;; gnutls logging is just a hack to achieve such calls to /message/ in the
+;; /network-stream-open-tls/ flow.
+(setq gnutls-log-level 1) ; miraculously makes smtpmail work
+
 ;; constructs From: domain if mail composer directly called (from without
 ;; notmuch), but we don't actually intend to do that
 ;(setq mail-host-address "plomlompom.com")
     (define-key org-mode-map (kbd "TAB") 'org-cycle)
     (define-key org-mode-map (kbd "<backtab>") 'org-shifttab))
 
+;; don't truncate lines by default
+(setq org-startup-truncated nil)
+
 ;; basic org-capture config
 (setq org-capture-templates
       '(("x" "test" plain (file "~/org/notes.org") "%T: %?")))