X-Git-Url: https://plomlompom.com/repos/foo.html?a=blobdiff_plain;f=buster%2Fhome_files%2Fuser%2F.emacs.d%2Finit.el;h=fbec98087ddf9dd8813ec5e6f132217a17f53bb8;hb=0448ddc6a283619a546556b03024667e6b51201c;hp=3452126e77d4a2322bdb0c9ec97661e20369e8c7;hpb=bc6ae96e2d41be156b45ceef93cfb60967d80c5f;p=config
diff --git a/buster/home_files/user/.emacs.d/init.el b/buster/home_files/user/.emacs.d/init.el
index 3452126..fbec980 100644
--- a/buster/home_files/user/.emacs.d/init.el
+++ b/buster/home_files/user/.emacs.d/init.el
@@ -90,7 +90,6 @@
delete-old-versions 1) ;; neither t nor nil: never delete
-
;; package management
;; ==================
@@ -121,13 +120,30 @@
;; ==========
(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")
@@ -166,6 +182,9 @@
(define-key org-mode-map (kbd "TAB") 'org-cycle)
(define-key org-mode-map (kbd "") '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: %?")))