diff --git a/init.el b/init.el index 0fdcbdf..422ab93 100644 --- a/init.el +++ b/init.el @@ -13,30 +13,6 @@ (let ((gc-cons-threshold most-positive-fixnum)) - ;; -------------------------------------------------------------------------- - ;; Configure garbage collection. - ;; - ;; Based on advice from: - ;; http://bling.github.io/blog/2016/01/18/why-are-you-changing-gc-cons-threshold/ - ;; -------------------------------------------------------------------------- - - (defun my-minibuffer-setup-hook () - (setq gc-cons-threshold most-positive-fixnum)) - - (defun my-minibuffer-exit-hook () - (setq gc-cons-threshold 800000)) - - (add-hook 'minibuffer-setup-hook #'my-minibuffer-setup-hook) - (add-hook 'minibuffer-exit-hook #'my-minibuffer-exit-hook) - - ;; -------------------------------------------------------------------------- - ;; Include MELPA. - ;; -------------------------------------------------------------------------- - - (require 'package) - (add-to-list 'package-archives - '("melpa" . "http://melpa.milkbox.net/packages/") t) - ;; -------------------------------------------------------------------------- ;; Visual configuration. ;; -------------------------------------------------------------------------- @@ -73,5 +49,29 @@ (load-theme 'underwater t) ;; Load personal theme + ;; -------------------------------------------------------------------------- + ;; Package configuration. + ;; -------------------------------------------------------------------------- + + (require 'package) + (add-to-list 'package-archives + '("melpa" . "http://melpa.milkbox.net/packages/") t) + (package-initialize) + + ;; -------------------------------------------------------------------------- + ;; Configure garbage collection. + ;; + ;; Based on advice from: + ;; http://bling.github.io/blog/2016/01/18/why-are-you-changing-gc-cons-threshold/ + ;; -------------------------------------------------------------------------- + + (defun my-minibuffer-setup-hook () + (setq gc-cons-threshold most-positive-fixnum)) + + (defun my-minibuffer-exit-hook () + (setq gc-cons-threshold 800000)) + + (add-hook 'minibuffer-setup-hook #'my-minibuffer-setup-hook) + (add-hook 'minibuffer-exit-hook #'my-minibuffer-exit-hook) ) ;; ((gc-cons-threshold most-positive-fixnum))