diff pers-init.el @ 21:7b2c4ed36302

for new maritain
author ht
date Mon, 30 Nov 2020 16:00:15 +0000
parents cc9c7bc8194a
children 0e5b39d2f8bb
line wrap: on
line diff
--- a/pers-init.el	Mon Nov 30 15:42:47 2020 +0000
+++ b/pers-init.el	Mon Nov 30 16:00:15 2020 +0000
@@ -24,14 +24,7 @@
 						       "ht-mail")))))
 
 ;; sending mail on the road
-(setq send-mail-function 'smtpmail-send-it)
-(setq message-send-mail-function 'smtpmail-send-it)
-(setq smtpmail-default-smtp-server "localhost")
-(setq smtpmail-smtp-service "smtp")
-(setq smtpmail-local-domain "markuptechnology.com")
-(setq smtpmail-debug-info t)
-(load "smtpmail" nil t)
-(setq smtpmail-code-conv-from nil)
+;; [moved to mail-from-m.el, which is required by gnus-init.el
 
 ;; don't know why this is necessary
 (site-caseq ((edin)
@@ -183,12 +176,12 @@
 			   "\C-x\C-y" 'win32-get-clipboard-data-cmd)))
 	    ;; gnus
 ;	    (setq mail-signature t)
-	    (load "gnus-init" nil t)
 
 	    ;; loading gnus postponed to e.g. mail-from-delphix, q.v.
 
 					;	    (require 'gnus-min)
 	    ))
+      (load "gnus-init" nil t)
 
 ;;      (require 'idle)
 ;;      (idle-save 15)
@@ -416,6 +409,10 @@
 		      ;; we're on a _really_ big external monitor
 		      (set-frame-pixel-size (selected-frame) 900 1050)
 		      (set-frame-position (selected-frame) 0 0))
+	      ((= pw 1920)
+		      ;; we're on a 27" curved external monitor
+		      (set-frame-pixel-size (selected-frame) 720 980)
+		      (set-frame-position (selected-frame) -8 2))
 	      ((= pw 1680)
 	       ;; we're on a big external monitor
                (font-menu-set-font nil nil 10)