Commit 37833f68 authored by Ryan C. Thompson's avatar Ryan C. Thompson

Add github-zip method

parent 41992d10
......@@ -39,6 +39,7 @@
(require 'el-get-http-tar)
(require 'el-get-http-zip)
(require 'el-get-github-tar)
(require 'el-get-github-zip)
(require 'el-get-pacman)
(require 'el-get-svn)
;;; el-get --- Manage the external elisp bits and pieces you depend upon
;; Copyright (C) 2010-2011 Dimitri Fontaine
;; Author: Dimitri Fontaine <>
;; URL:
;; GIT:
;; Licence: WTFPL, grab your copy here:
;; This file is NOT part of GNU Emacs.
;; Install
;; Please see the README.asciidoc file from the same distribution
(require 'el-get-http-zip)
(defun el-get-github-zip-url (package)
(let* ((source (el-get-package-def package)))
;; Use :url if provided
(plist-get source :url)
;; Else generate URL from username, and reponame
(let* ((username (el-get-as-string
(or (plist-get source :username)
(error "Recipe for Github zip package %s needs a username" package))))
(reponame (el-get-as-string
(or (plist-get source :reponame)
(branch (or (plist-get source :branch)
(format ""
username reponame branch)))))
(defun el-get-github-zip-install (package url post-install-fun)
"Clone the given package from Github following the URL."
(el-get-http-zip-install package
(or url (el-get-github-zip-url package))
(el-get-register-derived-method :github-zip :http-zip
:install #'el-get-github-zip-install
:update #'el-get-github-zip-install)
(provide 'el-get-github-zip)
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment