Skip to content

Commit

Permalink
update the run file to do what we want.
Browse files Browse the repository at this point in the history
  • Loading branch information
nicferrier committed Oct 27, 2014
1 parent 95dd996 commit 6083062
Showing 1 changed file with 8 additions and 19 deletions.
27 changes: 8 additions & 19 deletions elpakit-run.el
Expand Up @@ -2,30 +2,19 @@

;; run with:
;;
;; MARMALADE=1 emacs -batch -l elpakit-run.el package-to-install
;;
;; or:
;;
;; MELPA=1 emacs -batch -l elpakit-run.el package-to-install
;;
;; emacs -batch -l elpakit-run.el

(when (member
"elpakit-run.el"
(mapcar 'file-name-nondirectory command-line-args))
(let ((package-name (car-safe (reverse command-line-args)))
(package-user-dir (make-temp-name "elpakit-run")))
(let ((elpakit-command (car-safe (reverse command-line-args)))
(package-user-dir (make-temp-name "/tmp/elpakit-run")))
(package-initialize)
(when (getenv "MARMALADE")
(add-to-list
'package-archives
'("marmalade" . "http://marmalade-repo.org/packages/")))
(when (getenv "MELPA")
(add-to-list
'package-archives
'("melpa" . "http://melpa.org/packages/")))
(add-to-list
'package-archives
'("marmalade" . "http://marmalade-repo.org/packages/"))
(package-refresh-contents)
(if (assoc (intern package-name) package-archive-contents)
(package-install (intern package-name))
(error "no package found: %s" package-name))))
(package-install 'elpakit)
(elpakit-make-multi ".")))

;;; elpakit-run.el ends here

0 comments on commit 6083062

Please sign in to comment.