Declare package-archive-priorities using setq and other minor changes
This commit is contained in:
@@ -1381,10 +1381,10 @@ If you prefer MELPA Stable over MELPA, you can add MELPA Stable and prioritize i
|
|||||||
;; This change increases MELPA Stable priority to 70, above MELPA,
|
;; This change increases MELPA Stable priority to 70, above MELPA,
|
||||||
;; ensuring that MELPA is preferred for package installations
|
;; ensuring that MELPA is preferred for package installations
|
||||||
;; over MELPA Stable.
|
;; over MELPA Stable.
|
||||||
(customize-set-variable 'package-archive-priorities '(("gnu" . 99)
|
(setq package-archive-priorities '(("gnu" . 99)
|
||||||
("nongnu" . 80)
|
("nongnu" . 80)
|
||||||
("melpa-stable" . 70)
|
("melpa-stable" . 70)
|
||||||
("melpa" . 0)))
|
("melpa" . 0)))
|
||||||
```
|
```
|
||||||
|
|
||||||
### How to load a local lisp file for machine-specific configurations?
|
### How to load a local lisp file for machine-specific configurations?
|
||||||
|
|||||||
@@ -26,7 +26,7 @@
|
|||||||
|
|
||||||
(defvar minimal-emacs-ui-features '()
|
(defvar minimal-emacs-ui-features '()
|
||||||
"List of user interface features to enable in minimal Emacs setup.
|
"List of user interface features to enable in minimal Emacs setup.
|
||||||
This variable holds a list Emacs UI features that can be enabled:
|
This variable holds a list of Emacs UI features that can be enabled:
|
||||||
- context-menu (Enables the context menu in graphical environments.)
|
- context-menu (Enables the context menu in graphical environments.)
|
||||||
- tool-bar (Enables the tool bar in graphical environments.)
|
- tool-bar (Enables the tool bar in graphical environments.)
|
||||||
- menu-bar (Enables the menu bar in graphical environments.)
|
- menu-bar (Enables the menu bar in graphical environments.)
|
||||||
@@ -39,15 +39,15 @@ This variable holds a list Emacs UI features that can be enabled:
|
|||||||
(defvar minimal-emacs-debug (bound-and-true-p init-file-debug)
|
(defvar minimal-emacs-debug (bound-and-true-p init-file-debug)
|
||||||
"Non-nil to enable debug.")
|
"Non-nil to enable debug.")
|
||||||
|
|
||||||
(defvar minimal-emacs-gc-cons-threshold (* 32 1024 1024)
|
|
||||||
"Value to set `gc-cons-threshold' to after Emacs startup.
|
|
||||||
Ignored if `minimal-emacs-optimize-startup-gc' is nil.")
|
|
||||||
|
|
||||||
(defvar minimal-emacs-optimize-startup-gc t
|
(defvar minimal-emacs-optimize-startup-gc t
|
||||||
"If non-nil, increase `gc-cons-threshold' during startup to reduce pauses.
|
"If non-nil, increase `gc-cons-threshold' during startup to reduce pauses.
|
||||||
After Emacs finishes loading, `gc-cons-threshold' is restored to the value
|
After Emacs finishes loading, `gc-cons-threshold' is restored to the value
|
||||||
stored in `minimal-emacs--restore-gc-cons-threshold'.")
|
stored in `minimal-emacs--restore-gc-cons-threshold'.")
|
||||||
|
|
||||||
|
(defvar minimal-emacs-gc-cons-threshold (* 32 1024 1024)
|
||||||
|
"Value to which `gc-cons-threshold' is set after Emacs startup.
|
||||||
|
Ignored if `minimal-emacs-optimize-startup-gc' is nil.")
|
||||||
|
|
||||||
(defvar minimal-emacs-inhibit-redisplay-during-startup nil
|
(defvar minimal-emacs-inhibit-redisplay-during-startup nil
|
||||||
"Suppress redisplay during startup to improve performance.
|
"Suppress redisplay during startup to improve performance.
|
||||||
This prevents visual updates while Emacs initializes. The tradeoff is that you
|
This prevents visual updates while Emacs initializes. The tradeoff is that you
|
||||||
@@ -432,9 +432,9 @@ this stage of initialization."
|
|||||||
(setq package-archives '(("melpa" . "https://melpa.org/packages/")
|
(setq package-archives '(("melpa" . "https://melpa.org/packages/")
|
||||||
("gnu" . "https://elpa.gnu.org/packages/")
|
("gnu" . "https://elpa.gnu.org/packages/")
|
||||||
("nongnu" . "https://elpa.nongnu.org/nongnu/")))
|
("nongnu" . "https://elpa.nongnu.org/nongnu/")))
|
||||||
(customize-set-variable 'package-archive-priorities '(("gnu" . 99)
|
(setq package-archive-priorities '(("gnu" . 99)
|
||||||
("nongnu" . 80)
|
("nongnu" . 80)
|
||||||
("melpa" . 70)))
|
("melpa" . 70)))
|
||||||
|
|
||||||
;;; Load post-early-init.el
|
;;; Load post-early-init.el
|
||||||
(minimal-emacs-load-user-init "post-early-init.el")
|
(minimal-emacs-load-user-init "post-early-init.el")
|
||||||
|
|||||||
8
init.el
8
init.el
@@ -104,7 +104,7 @@
|
|||||||
|
|
||||||
;;; Misc
|
;;; Misc
|
||||||
|
|
||||||
(setq whitespace-line-column nil) ; whitespace-mode
|
(setq whitespace-line-column nil) ; Use the value of `fill-column'.
|
||||||
|
|
||||||
;; Can be activated with `display-line-numbers-mode'
|
;; Can be activated with `display-line-numbers-mode'
|
||||||
(setq-default display-line-numbers-width 3)
|
(setq-default display-line-numbers-width 3)
|
||||||
@@ -479,9 +479,9 @@
|
|||||||
(setq ibuffer-formats
|
(setq ibuffer-formats
|
||||||
'((mark modified read-only locked
|
'((mark modified read-only locked
|
||||||
" " (name 40 40 :left :elide)
|
" " (name 40 40 :left :elide)
|
||||||
" " (size 8 -1 :right)
|
" " (size 8 -1 :right)
|
||||||
" " (mode 18 18 :left :elide) " " filename-and-process)
|
" " (mode 18 18 :left :elide) " " filename-and-process)
|
||||||
(mark " " (name 16 -1) " " filename)))
|
(mark " " (name 16 -1) " " filename)))
|
||||||
|
|
||||||
;;; xref
|
;;; xref
|
||||||
|
|
||||||
|
|||||||
Reference in New Issue
Block a user