Init

1 files changed, 59 insertions, 0 deletions

diff --git a/emacs/init.el b/emacs/init.el
new file mode 100644
index 0000000..8395564
--- /dev/null
+++ b/emacs/init.el
@@ -0,0 +1,59 @@
+;; Time-stamp: <2019-04-15 16:22:30 (tslil@basingstoke)>
+
+;; Faster startup
+(setq gc-cons-threshold 100000000
+      old-file-name-handler-alist file-name-handler-alist
+      file-name-handler-alist nil)
+
+(setq user-full-name "tslil")
+
+(setq network-security-level 'high
+      tls-connection-command "gnutls-cli -p %p %h"
+      tls-checktrust t
+      tls-program '("gnutls-cli --x509cafile %t -p %p %h")
+      gnutls-verify-error t
+      gnutls-log-level 0
+      gnutls-min-prime-bits 2048
+      gnutls-trustfiles '("/etc/ssl/certs/ca-certificates.crt" "/etc/pki/tls/certs/ca-bundle.crt" "/etc/ssl/ca-bundle.pem" "/usr/ssl/certs/ca-bundle.crt")
+      ;;imap-ssl-program '("gnutls-cli --x509cafile %t -p %p %s")
+      smtpmail-stream-type 'starttls)
+
+
+(require 'package)
+(setq package-enable-at-startup nil
+      load-prefer-newer t
+      package-archives '(("gnu" . "https://elpa.gnu.org/packages/")
+                         ("melpa" . "https://melpa.org/packages/")))
+(package-initialize)
+
+(unless (package-installed-p 'use-package)
+  (package-refresh-contents)
+  (package-install 'use-package))
+
+(eval-when-compile
+  (require 'use-package))
+(use-package bind-key :ensure t :demand)
+
+(use-package pinentry
+  :ensure t
+  :demand
+  :config
+  (setq epa-pinentry-mode 'loopback)
+  (pinentry-start))
+
+(use-package keychain-environment
+  :ensure t
+  :config
+  (keychain-refresh-environment))
+
+(use-package init-loader
+  :ensure t
+  :demand
+  :config
+  (setq init-loader-byte-compile t)
+  (init-loader-load))
+
+(setq custom-file "~/.emacs.d/custom.el")
+(unless (file-exists-p custom-file)
+  (write-region "" nil custom-file))
+(load custom-file)