From f3783205f3fd62968c3471320152cd8afea1e5e7 Mon Sep 17 00:00:00 2001 From: BardofSprites <89086143+BardofSprites@users.noreply.github.com> Date: Thu, 23 Apr 2026 00:04:58 -0400 Subject: formatting --- config.org | 76 +++++++++++++++++++++++++++++++++----------------------------- 1 file changed, 40 insertions(+), 36 deletions(-) (limited to 'config.org') diff --git a/config.org b/config.org index f0ca2d9..524b845 100644 --- a/config.org +++ b/config.org @@ -12,53 +12,57 @@ The ~early-init.el~ removes all the visual fluff like scrollbars and sets up very fundamental Emacs settings that need to be loaded before everything else. #+begin_src emacs-lisp :tangle early-init.el -(setq inhibit-startup-message t) -(setq inhibit-startup-screen t) + (setq inhibit-startup-message t) + (setq inhibit-startup-screen t) -(setq frame-resize-pixelwise t - frame-inhibit-implied-resize t - use-dialog-box t ; only for mouse events, which I seldom use - use-file-dialog nil - use-short-answers t - inhibit-x-resources t - inhibit-startup-echo-area-message user-login-name - inhibit-startup-buffer-menu t) + (setq frame-resize-pixelwise t + frame-inhibit-implied-resize t + use-dialog-box t ; only for mouse events, which I seldom use + use-file-dialog nil + use-short-answers t + inhibit-x-resources t + inhibit-startup-echo-area-message user-login-name + inhibit-startup-buffer-menu t) -(setq mode-line-misc-info - (delete (assoc 'minor-mode-alist mode-line-misc-info) mode-line-misc-info)) + (setq mode-line-misc-info + (delete (assoc 'minor-mode-alist mode-line-misc-info) mode-line-misc-info)) -(add-hook 'after-init-hook (lambda () (set-frame-name "home"))) + (add-hook 'after-init-hook (lambda () (set-frame-name "home"))) -;; Modes -(scroll-bar-mode -1) -(tool-bar-mode -1) -(tooltip-mode -1) -(set-fringe-mode 10) -(menu-bar-mode -1) -(tool-bar-mode 0) + ;; Modes + (scroll-bar-mode -1) + (tool-bar-mode -1) + (tooltip-mode -1) + (set-fringe-mode 10) + (menu-bar-mode -1) + (tool-bar-mode 0) -;; settings for windows -(setq focus-follows-mouse t) + ;; settings for windows + (setq focus-follows-mouse t) -(add-to-list 'default-frame-alist '(alpha . (95 . 95))) + (add-to-list 'default-frame-alist '(alpha . (95 . 95))) -;; garbage collection -(setq gc-cons-threshold most-positive-fixnum - gc-cons-percentage 0.5) + (setq initial-frame-alist default-frame-alist) -(defvar bard-emacs--file-name-handler-alist file-name-handler-alist) -(defvar bard-emacs--vc-handled-backends vc-handled-backends) + ;; garbage collection + (setq gc-cons-threshold most-positive-fixnum + gc-cons-percentage 0.5) -(add-hook 'emacs-startup-hook - (lambda () - (setq gc-cons-threshold (* 1000 1000 8) - gc-cons-percentage 0.1 - file-name-handler-alist bard-emacs--file-name-handler-alist - vc-handled-backends bard-emacs--vc-handled-backends))) + (defvar bard-emacs--file-name-handler-alist file-name-handler-alist) + (defvar bard-emacs--vc-handled-backends vc-handled-backends) + + (add-hook 'emacs-startup-hook + (lambda () + (setq gc-cons-threshold (* 1000 1000 8) + gc-cons-percentage 0.1 + file-name-handler-alist bard-emacs--file-name-handler-alist + vc-handled-backends bard-emacs--vc-handled-backends))) -;; Package cache -(setq package-enable-at-startup t) + ;; Package cache + (setq package-enable-at-startup t) + (unless package-archive-contents + (package-refresh-contents)) #+end_src ** Initialization -- cgit v1.2.3