;; -*- lexical-binding: t -*- (defvar default-file-name-handler-alist file-name-handler-alist) (setq file-name-handler-alist nil) (setq gc-cons-threshold (expt 2 32)) (add-hook 'emacs-startup-hook (lambda () "Restore defaults values after init." (setq file-name-handler-alist default-file-name-handler-alist) (if (boundp 'after-focus-change-function) (add-function :after after-focus-change-function (lambda () (unless (frame-focus-state) (garbage-collect)))) (add-hook 'focus-out-hook 'garbage-collect)))) (setq native-comp-async-report-warnings-errors nil) (setq native-comp-deferred-compilation t) (setq max-specpdl-size 1200) (setq max-lisp-eval-depth 800) (scroll-bar-mode -1) (tool-bar-mode -1) (menu-bar-mode -1) (tooltip-mode -1) (setq package-enable-at-startup nil) (setq load-prefer-newer nil) (setq default-input-method nil) (setq utf-translate-cjk-mode nil) ; disable CJK coding/encoding (Chinese/Japanese/Korean characters) (set-language-environment 'utf-8) (set-keyboard-coding-system 'utf-8-mac) ; For old Carbon emacs on OS X only (setq locale-coding-system 'utf-8) (set-default-coding-systems 'utf-8) (set-terminal-coding-system 'utf-8) (set-selection-coding-system 'utf-8) (prefer-coding-system 'utf-8)