feat: config moved
This commit is contained in:
34
.emacs.rc/rc.el
Normal file
34
.emacs.rc/rc.el
Normal file
@ -0,0 +1,34 @@
|
||||
(add-to-list 'package-archives
|
||||
'("melpa" . "https://melpa.org/packages/") t)
|
||||
;; (add-to-list 'package-archives
|
||||
;; '("melpa-stable" . "https://stable.melpa.org/packages/") t)
|
||||
|
||||
(defvar rc/package-contents-refreshed nil)
|
||||
|
||||
(defun rc/package-refresh-contents-once ()
|
||||
(when (not rc/package-contents-refreshed)
|
||||
(setq rc/package-contents-refreshed t)
|
||||
(package-refresh-contents)))
|
||||
|
||||
(defun rc/require-one-package (package)
|
||||
(when (not (package-installed-p package))
|
||||
(rc/package-refresh-contents-once)
|
||||
(package-install package)))
|
||||
|
||||
(defun rc/require (&rest packages)
|
||||
(dolist (package packages)
|
||||
(rc/require-one-package package)))
|
||||
|
||||
(defun rc/require-theme (theme)
|
||||
(let ((theme-package (->> theme
|
||||
(symbol-name)
|
||||
(funcall (-flip #'concat) "-theme")
|
||||
(intern))))
|
||||
(rc/require theme-package)
|
||||
(load-theme theme t)))
|
||||
|
||||
(rc/require 'dash)
|
||||
(require 'dash)
|
||||
|
||||
(rc/require 'dash-functional)
|
||||
(require 'dash-functional)
|
Reference in New Issue
Block a user