From d7afc38756cf73271de0d08d07f59b6e7065b7bf Mon Sep 17 00:00:00 2001 From: Thomas Schneider Date: Thu, 27 Jun 2019 14:50:08 +0200 Subject: Emacs: Don’t install certain packages via package.el MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit --- dot.emacs.d/init.el | 21 ++++++++++++++++++++- 1 file changed, 20 insertions(+), 1 deletion(-) (limited to 'dot.emacs.d/init.el') diff --git a/dot.emacs.d/init.el b/dot.emacs.d/init.el index cdc2593..750cf2e 100644 --- a/dot.emacs.d/init.el +++ b/dot.emacs.d/init.el @@ -4,11 +4,30 @@ '(("melpa" . "https://melpa.org/packages/") ("gnu" . "https://elpa.gnu.org/packages/"))) (package-initialize) + +(defun qsx-use-package-ensure (name args _state &optional _no-refresh) + (dolist (ensure args) + (let ((package + (or (and (eq ensure t) (use-package-as-symbol name)) + ensure))) + (when package + (if (memq package + '(auctex + bison-mode + company + crontab-mode + magit + markdown-mode + rust-mode + yaml-mode)) + t + (use-package-ensure-elpa name args _state _no-refresh)))))) (unless (package-installed-p 'use-package) (package-refresh-contents) (package-install 'use-package t)) (require 'use-package) -(setq use-package-always-ensure t) +(setq use-package-ensure-function #'qsx-use-package-ensure + use-package-always-ensure t) (defvar --backup-directory (concat user-emacs-directory "backups")) (if (not (file-exists-p --backup-directory)) -- cgit v1.2.3