diff --git a/.gitignore b/.gitignore index 05befca..e69feae 100755 --- a/.gitignore +++ b/.gitignore @@ -1 +1,2 @@ /users/crumb/programs/emacs/eln-cache +/users/crumb/programs/emacs/auto-save-list diff --git a/users/crumb/programs/emacs/early-init.el b/users/crumb/programs/emacs/early-init.el index 06022ac..7fcb10d 100644 --- a/users/crumb/programs/emacs/early-init.el +++ b/users/crumb/programs/emacs/early-init.el @@ -1,3 +1,4 @@ ;;; early-init.el -*- lexical-binding: t; -*- +;; Disable package.el; we use Straight. (setq package-enable-at-startup nil) diff --git a/users/crumb/programs/emacs/init-straight.el b/users/crumb/programs/emacs/init-straight.el index 83599e1..1ca3392 100644 --- a/users/crumb/programs/emacs/init-straight.el +++ b/users/crumb/programs/emacs/init-straight.el @@ -1,9 +1,18 @@ ;;; init-straight.el -*- lexical-binding: t; -*- +(defun syd-initialise-straight-options () + (setq + ;; Improves Straight's startup time. Instead of checking for modifications + ;; on init, changes will only be detected when the file is saved from within + ;; Emacs (with `save-buffer', specifically!). + straight-check-for-modifications '(check-on-save find-when-checking))) + ;; Bootstrap Straight.el (defun syd-initialise-straight () (defvar bootstrap-version) + (syd-initialise-straight-options) + (setq straight-base-dir (or (getenv "EMACS_STRAIGHT_BASE_DIR") (error "Cannot initialise straight: $EMACS_STRAIGHT_BASE_DIR is undefined!"))) @@ -15,8 +24,7 @@ (unless (file-exists-p bootstrap-file) (message "Could not find Straight's bootstrap file. Attempting to download it now.") (let* ((url "https://raw.githubusercontent.com/radian-software/straight.el/develop/install.el") - (url-buffer (url-retrieve-synchronously - url 'silent 'inhibit-cookies))) + (url-buffer (url-retrieve-synchronously url 'silent 'inhibit-cookies))) (with-current-buffer url-buffer (goto-char (point-max)) (eval-print-last-sexp))))