diff --git a/early-init.el b/early-init.el index f8985ad..3222b5a 100644 --- a/early-init.el +++ b/early-init.el @@ -32,6 +32,9 @@ (add-hook 'after-init-hook #'restore-gc-cons-percentage-after-init) (setq gc-cons-percentage (get 'gc-cons-percentage 'value-during-init)) +;; Permitir solo la búsqueda de archivos case sentsitive. +(setq auto-mode-case-fold nil) + ;; Recommended by ;; https://github.com/raxod502/straight.el#getting-started to prevent ;; pacakge.el stepping on straight's toes. diff --git a/init.el b/init.el index 6420f78..ff5c683 100644 --- a/init.el +++ b/init.el @@ -9,31 +9,6 @@ ;;; Code: -;; Mejorar el tiempo de carga -(setq auto-mode-case-fold nil) - -(unless (or (daemonp) noninteractive) - (let ((old-file-name-handler-alist file-name-handler-alist)) - ;; If `file-name-handler-alist' is nil, no 256 colors in TUI - ;; @see https://emacs-china.org/t/spacemacs-centaur-emacs/3802/839 - (setq file-name-handler-alist - (unless (display-graphic-p) - '(("\\(?:\\.tzst\\|\\.zst\\|\\.dz\\|\\.txz\\|\\.xz\\|\\.lzma\\|\\.lz\\|\\.g?z\\|\\.\\(?:tgz\\|svgz\\|sifz\\)\\|\\.tbz2?\\|\\.bz2\\|\\.Z\\)\\(?:~\\|\\.~[-[:alnum:]:#@^._]+\\(?:~[[:digit:]]+\\)?~\\)?\\'" . jka-compr-handler)))) - (add-hook 'emacs-startup-hook - (lambda () - "Recover file name handlers." - (setq file-name-handler-alist - (delete-dups (append file-name-handler-alist - old-file-name-handler-alist))))))) - -(setq gc-cons-threshold most-positive-fixnum - gc-cons-percentage 0.5) -(add-hook 'emacs-startup-hook - (lambda () - "Recover GC values after startup." - (setq gc-cons-threshold 800000 - gc-cons-percentage 0.1))) - ;; Cargar configuraciones (add-to-list 'load-path (concat user-emacs-directory "configs"))