39 lines
1.4 KiB
EmacsLisp
39 lines
1.4 KiB
EmacsLisp
;; -*- 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)
|