;;; init.el --- Emacs init file

;;; Commentary:

;; Setup package manager and build configuration file.

;;; Code:

;; Increases garbage collection during startup
(setq gc-cons-threshold most-positive-fixnum)
(add-hook 'emacs-startup-hook (lambda () (setq gc-cons-threshold 8000000)))

; --------------------------------------

(defvar emacs-cache (concat (getenv "XDG_CACHE_HOME") "/emacs")
  "Directory where Emacs cache data is stored.")
(defvar emacs-d (concat (getenv "HOME") "/.emacs.d")
  "Directory where Emacs config files are stored.")

(defvar dot/leader-key "SPC"
  "Leader prefix key.")
(defvar dot/leader-alt-key "M-SPC"
  "Alternative leader prefix key, used for Insert and Emacs states.")
(defvar dot/localleader-key "SPC m"
  "Local leader prefix key, for 'major-mode' specific commands.")
(defvar dot/localleader-alt-key "M-SPC m"
  "Alternative local leader prefix key, used for Insert and Emacs states.")

; --------------------------------------

;; Add the melpa repository to the package manager
(require 'package)
(add-to-list 'package-archives '("melpa" . "https://melpa.org/packages/"))

;; Activate autoloads
(package-initialize)

;; Install the 'use-package' dependency
(unless (package-installed-p 'use-package)
  (package-refresh-contents)
  (package-install 'use-package))

; --------------------------------------

;; Tangle configuration file
(require 'org)
(when (file-readable-p (concat emacs-d "/config.org"))
  (org-babel-load-file (concat emacs-d "/config.org")))

;;; init.el ends here