complete-computing-environment/emacs_session.org

3.2 KiB

Emacs Session Startup

(provide 'cce/startup)
(setq custom-file "~/.emacs.d/custom.el")

I almost always want Emacs's server running. There's no reason not to, especially when I am using EXWM. The ability to be able to attach to Emacs to edit files from the command line, or to rescue a broken X11 session, or to do batch operations using Emacs's text-processing libraries are all super powerful, and it makes little sense to not use this.

(unless (boundp 'server-process)
  (server-start))

Desktop Save Mode is the session management system for Emacs; it holds state of open buffers and session variables across instantiation of Emacs, which is super useful in mobile setups like laptops which reboot a lot. To make startup sane, I'm choosing to eagerly restore the 10 most recently used buffers on startup, and then in Idle the system will restore the remaining buffers.

(desktop-save-mode 1)
(setq desktop-restore-eager 25)
(setq desktop-load-locked-desktop t)
(setq desktop-files-not-to-save "\\(^/[^/:]*:\\|(ftp)$\\|KILL\\)")
(setq desktop-restore-frames nil)
(setq desktop-lazy-verbose nil)

Emacs should automatically save my state, and does so every five minutes.

(defun cce/desktop-save ()
  "Write the desktop save file to ~/.emacs.d"
  (desktop-save user-emacs-directory))
(if (not (boundp 'cce/desktop-save-timer))
    (setq cce/desktop-save-timer
          (run-with-idle-timer 300 t 'cce/desktop-save)))

The splashscreen is useful if you've never used Emacs before, but I'd rather just drop straight in to the Scratch buffer.

(setq inhibit-splash-screen t)

savehist">savehist mode simply persists the state of a bunch of user-input fields, allowing history of minibuffer input, my kill ring, etc. This is a simple quality of life fix.

(require 'savehist)
(setq savehist-file (concat user-emacs-directory "savehist"))
(setq savehist-save-minibuffer-history 1)
(setq savehist-additional-variables
      '(kill-ring
        search-ring
        regexp-search-ring))
(savehist-mode 1)

recentf gives me a "Recent Files" menu and also some pretty neat Projectile integration. consult-recentf in my Consult configuration benefits from this thing well.

(recentf-mode 1)

Use ibuffer instead of list-buffers; someday I'd like to move this to use sbuffer.el

(global-set-key (kbd "C-x C-b") 'ibuffer)
(with-eval-after-load "ibuffer"
  (add-to-list 'ibuffer-hook #'ibuffer-set-filter-groups-by-mode))