maybe fixed the damn package install
This commit is contained in:
7
init.el
7
init.el
@@ -6,13 +6,6 @@
|
||||
(byte-recompile-directory user-emacs-directory 0))
|
||||
|
||||
(load "~/.emacs.d/my-packages.el")
|
||||
(unless (prelude-packages-installed-p)
|
||||
(message "%s" "Emacs Prelude is now refreshing its package database...")
|
||||
(package-refresh-contents)
|
||||
(message "%s" " done.")
|
||||
(dolist (p prelude-packages)
|
||||
(when (not (package-installed-p p))
|
||||
(package-install p))))
|
||||
(byte-compile-init-dir)
|
||||
(load "~/.emacs.d/my-loadpackages.elc")
|
||||
(add-hook 'after-init-hook
|
||||
|
||||
@@ -1,10 +1,13 @@
|
||||
(require 'package)
|
||||
(add-to-list 'package-archives
|
||||
'("melpa" . "http://melpa.milkbox.net/packages/") t)
|
||||
(add-to-list 'package-archives '("marmalade" . "http://marmalade-repo.org/packages/"))
|
||||
(add-to-list 'package-archives '("marmalade" . "https://marmalade-repo.org/packages/"))
|
||||
(add-to-list 'custom-theme-load-path "~/.emacs.d/themes/") t
|
||||
(add-to-list 'load-path "~/.emacs.d/lisp/" t)
|
||||
|
||||
(unless package-archive-contents
|
||||
(package-refresh-contents))
|
||||
|
||||
(defvar prelude-packages
|
||||
'(all-the-icons async base16-theme bind-chord bind-key counsel dash diminish
|
||||
epl evil evil-magit fill-column-indicator ghc git-commit
|
||||
@@ -13,7 +16,22 @@
|
||||
web-mode with-editor)
|
||||
"A list of packages to ensure are installed at launch.")
|
||||
|
||||
(defun prelude-packages-installed-p ()
|
||||
(if (member nil '(mapcar 'package-installed-p prelude-packages))
|
||||
nil
|
||||
t))
|
||||
|
||||
|
||||
;; (defun prelude-packages-installed-p ()
|
||||
;; (let lst (mapcar 'package-installed-p prelude-packages)
|
||||
;; (if (member nil 'lst)
|
||||
;; nil
|
||||
;; t)))
|
||||
|
||||
;;(unless (prelude-packages-installed-p)
|
||||
;; (message "%s" "Emacs Prelude is now refreshing its package database...")
|
||||
;; (package-refresh-contents)
|
||||
;; (message "%s" " done.")
|
||||
;; (dolist (p prelude-packages)
|
||||
;; (when (not (package-installed-p p))
|
||||
;; (package-install p))))
|
||||
|
||||
(dolist (pkg prelude-packages)
|
||||
(unless (package-installed-p pkg)
|
||||
(package-install pkg)))
|
||||
|
||||
Reference in New Issue
Block a user