f21abcdcf3
* new function configuration-layer//stable-elpa-disable-repository
* new function configuration-layer//stable-elpa-update-version-file
* new function configuration-layer//stable-elpa-delete-temporary-files
* new function configuration-layer//stable-elpa-ask-to-continue
* new function configuration-layer//stable-elpa-verify-archive
* new function configuration-layer//stable-elpa-disable-repository
* rename function configuration-layer/stable-elpa-download-tarball to
configuration-layer//stable-elpa-download-tarball
* new function configuration-layer/stable-elpa-init
* make the function configuration-layer/stable-elpa-version interactive
configuration-layer/stable-elpa-init is called from init.el.
This function then calls the other new function in more clear fashion than the
previous complicated configuration-layer/stable-elpa-download-tarball
The users are now prompt if they want to install the stable ELPA repository when
the verification of the archive failed.
49 lines
1.8 KiB
EmacsLisp
49 lines
1.8 KiB
EmacsLisp
;;; init.el --- Spacemacs Initialization File
|
|
;;
|
|
;; Copyright (c) 2012-2018 Sylvain Benner & Contributors
|
|
;;
|
|
;; Author: Sylvain Benner <sylvain.benner@gmail.com>
|
|
;; URL: https://github.com/syl20bnr/spacemacs
|
|
;;
|
|
;; This file is not part of GNU Emacs.
|
|
;;
|
|
;;; License: GPLv3
|
|
|
|
;; Without this comment emacs25 adds (package-initialize) here
|
|
;; (package-initialize)
|
|
|
|
;; Avoid garbage collection during startup.
|
|
;; see `SPC h . dotspacemacs-gc-cons' for more info
|
|
(defconst emacs-start-time (current-time))
|
|
(setq gc-cons-threshold 402653184 gc-cons-percentage 0.6)
|
|
(load (concat (file-name-directory load-file-name)
|
|
"core/core-versions.el")
|
|
nil (not init-file-debug))
|
|
(load (concat (file-name-directory load-file-name)
|
|
"core/core-load-paths.el")
|
|
nil (not init-file-debug))
|
|
(load (concat spacemacs-core-directory "core-dumper.el")
|
|
nil (not init-file-debug))
|
|
|
|
(if (not (version<= spacemacs-emacs-min-version emacs-version))
|
|
(error (concat "Your version of Emacs (%s) is too old. "
|
|
"Spacemacs requires Emacs version %s or above.")
|
|
emacs-version spacemacs-emacs-min-version)
|
|
;; Disable file-name-handlers for a speed boost during init
|
|
(let ((file-name-handler-alist nil))
|
|
(require 'core-spacemacs)
|
|
(spacemacs/dump-restore-load-path)
|
|
(configuration-layer/load-lock-file)
|
|
(spacemacs/init)
|
|
(configuration-layer/stable-elpa-init)
|
|
(configuration-layer/load)
|
|
(spacemacs-buffer/display-startup-note)
|
|
(spacemacs/setup-startup-hook)
|
|
(spacemacs/dump-eval-delayed-functions)
|
|
(when (and dotspacemacs-enable-server (not (spacemacs-is-dumping-p)))
|
|
(require 'server)
|
|
(when dotspacemacs-server-socket-dir
|
|
(setq server-socket-dir dotspacemacs-server-socket-dir))
|
|
(unless (server-running-p)
|
|
(message "Starting a server...")
|
|
(server-start)))))
|