Commit 3a5e6aca authored by Ryan C. Thompson's avatar Ryan C. Thompson

Update all el-get methods to declare using keywords

parent e2db4e6e
......@@ -150,8 +150,11 @@ password prompt."
(add-hook 'el-get-apt-get-remove-hook 'el-get-dpkg-remove-symlink)
(el-get-register-method
:apt-get #'el-get-apt-get-install #'el-get-apt-get-install #'el-get-apt-get-remove
#'el-get-apt-get-install-hook #'el-get-apt-get-remove-hook)
(el-get-register-method :apt-get
:install #'el-get-apt-get-install
:update #'el-get-apt-get-install
:remove #'el-get-apt-get-remove
:install-hook #'el-get-apt-get-install-hook
:remove-hook #'el-get-apt-get-remove-hook)
(provide 'el-get-apt-get)
......@@ -89,8 +89,11 @@
(add-hook 'el-get-brew-remove-hook 'el-get-dpkg-remove-symlink)
(el-get-register-method
:brew
#'el-get-brew-install #'el-get-brew-update #'el-get-brew-remove #'el-get-brew-install-hook #'el-get-brew-remove-hook)
(el-get-register-method :brew
:install #'el-get-brew-install
:update #'el-get-brew-update
:remove #'el-get-brew-remove
:install-hook #'el-get-brew-install-hook
:remove-hook #'el-get-brew-remove-hook)
(provide 'el-get-brew)
......@@ -25,8 +25,10 @@
(make-directory pdir))
(funcall post-install-fun package)))
(el-get-register-method
:builtin #'el-get-builtin-install #'el-get-builtin-install #'el-get-rmdir
#'el-get-builtin-install-hook)
(el-get-register-method :builtin
:install #'el-get-builtin-install
:update #'el-get-builtin-install
:remove #'el-get-rmdir
:install-hook #'el-get-builtin-install-hook)
(provide 'el-get-builtin)
......@@ -56,8 +56,10 @@
:error ,ko))
post-update-fun)))
(el-get-register-method
:bzr #'el-get-bzr-branch #'el-get-bzr-pull #'el-get-rmdir
el-get-bzr-branch-hook)
(el-get-register-method :bzr
:install #'el-get-bzr-branch
:update #'el-get-bzr-pull
:remove #'el-get-rmdir
:install-hook el-get-bzr-branch-hook)
(provide 'el-get-bzr)
......@@ -73,8 +73,10 @@
:error ,ko))
post-update-fun)))
(el-get-register-method
:cvs #'el-get-cvs-checkout #'el-get-cvs-update #'el-get-rmdir
#'el-get-cvs-checkout-hook)
(el-get-register-method :cvs
:install #'el-get-cvs-checkout
:update #'el-get-cvs-update
:remove #'el-get-rmdir
:install-hook #'el-get-cvs-checkout-hook)
(provide 'el-get-cvs)
......@@ -56,8 +56,10 @@
:error ,ko))
post-update-fun)))
(el-get-register-method
:darcs #'el-get-darcs-get #'el-get-darcs-pull #'el-get-rmdir
#'el-get-darcs-get-hook)
(el-get-register-method :darcs
:install #'el-get-darcs-get
:update #'el-get-darcs-pull
:remove #'el-get-rmdir
:install-hook #'el-get-darcs-get-hook)
(provide 'el-get-darcs)
......@@ -134,8 +134,11 @@ the recipe, then return nil."
(add-hook 'el-get-elpa-remove-hook 'el-get-elpa-post-remove)
(el-get-register-method
:elpa #'el-get-elpa-install #'el-get-elpa-update #'el-get-elpa-remove
#'el-get-elpa-install-hook #'el-get-elpa-remove-hook)
(el-get-register-method :elpa
:install #'el-get-elpa-install
:update #'el-get-elpa-update
:remove #'el-get-elpa-remove
:install-hook #'el-get-elpa-install-hook
:remove-hook #'el-get-elpa-remove-hook)
(provide 'el-get-elpa)
......@@ -33,7 +33,7 @@
(url (or url (format el-get-emacsmirror-base-url pkgname))))
(el-get-git-clone package url post-install-fun)))
(el-get-register-derived-method
:emacsmirror :git #'el-get-emacsmirror-clone)
(el-get-register-derived-method :emacsmirror :git
:install #'el-get-emacsmirror-clone)
(provide 'el-get-emacsmirror)
......@@ -36,8 +36,9 @@ filename.el ;;; filename.el --- description"
(let ((url (or url (format "%s%s.el" el-get-emacswiki-base-url package))))
(el-get-http-install package url post-install-fun)))
(el-get-register-derived-method
:emacswiki :http #'el-get-emacswiki-install #'el-get-emacswiki-install)
(el-get-register-derived-method :emacswiki :http
:install #'el-get-emacswiki-install
:update #'el-get-emacswiki-install)
;;;
;;; Functions to maintain a local recipe list from EmacsWiki
......
......@@ -76,9 +76,11 @@
(add-hook 'el-get-fink-remove-hook 'el-get-dpkg-remove-symlink)
(el-get-register-method
:fink
#'el-get-fink-install #'el-get-fink-install #'el-get-fink-remove
#'el-get-fink-install-hook #'el-get-fink-remove-hook)
(el-get-register-method :fink
:install #'el-get-fink-install
:update #'el-get-fink-install
:remove #'el-get-fink-remove
:install-hook #'el-get-fink-install-hook
:remove-hook #'el-get-fink-remove-hook)
(provide 'el-get-fink)
......@@ -68,9 +68,9 @@
:error ,r-ko))
post-update-fun)))
(el-get-register-derived-method
:git-svn :git
#'el-get-git-svn-clone #'el-get-git-svn-update #'el-get-rmdir
#'el-get-git-svn-clone-hook)
(el-get-register-derived-method :git-svn :git
:install #'el-get-git-svn-clone
:update #'el-get-git-svn-update
:install-hook #'el-get-git-svn-clone-hook)
(provide 'el-get-git-svn)
......@@ -100,8 +100,11 @@ found."
(match-string 0 output))))
hash)))
(el-get-register-method
:git #'el-get-git-clone #'el-get-git-pull #'el-get-rmdir
#'el-get-git-clone-hook nil #'el-get-git-compute-checksum)
(el-get-register-method :git
:install #'el-get-git-clone
:update #'el-get-git-pull
:remove #'el-get-rmdir
:install-hook #'el-get-git-clone-hook
:compute-checksum #'el-get-git-compute-checksum)
(provide 'el-get-git)
......@@ -69,8 +69,11 @@
(match-string 0 output))))
hash)))
(el-get-register-method
:hg #'el-get-hg-clone #'el-get-hg-pull #'el-get-rmdir
#'el-get-hg-clone-hook nil #'el-get-hg-compute-checksum)
(el-get-register-method :hg
:install #'el-get-hg-clone
:update #'el-get-hg-pull
:remove #'el-get-rmdir
:install-hook #'el-get-hg-clone-hook
:compute-checksum #'el-get-hg-compute-checksum)
(provide 'el-get-hg)
......@@ -63,8 +63,10 @@ the files up."
(add-hook 'el-get-http-tar-install-hook 'el-get-http-tar-cleanup-extract-hook)
(el-get-register-method
:http-tar #'el-get-http-tar-install #'el-get-http-tar-install #'el-get-rmdir
#'el-get-http-tar-install-hook)
(el-get-register-method :http-tar
:install #'el-get-http-tar-install
:update #'el-get-http-tar-install
:remove #'el-get-rmdir
:install-hook #'el-get-http-tar-install-hook)
(provide 'el-get-http-tar)
......@@ -90,9 +90,12 @@ into the package :localname option or its `file-name-nondirectory' part."
(puthash package checksum el-get-http-checksums))
checksum))
(el-get-register-method
:http #'el-get-http-install #'el-get-http-install #'el-get-rmdir
#'el-get-http-install-hook nil #'el-get-http-compute-checksum)
(el-get-register-method :http
:install #'el-get-http-install
:update #'el-get-http-install
:remove #'el-get-rmdir
:install-hook #'el-get-http-install-hook
:compute-checksum #'el-get-http-compute-checksum)
(el-get-register-method-alias :ftp :http)
......
......@@ -63,9 +63,11 @@
(add-hook 'el-get-pacman-remove-hook 'el-get-dpkg-remove-symlink)
(el-get-register-method
:pacman
#'el-get-pacman-install #'el-get-pacman-install #'el-get-pacman-remove
#'el-get-pacman-install-hook #'el-get-pacman-remove-hook)
(el-get-register-method :pacman
:install #'el-get-pacman-install
:update #'el-get-pacman-install
:remove #'el-get-pacman-remove
:install-hook #'el-get-pacman-install-hook
:remove-hook #'el-get-pacman-remove-hook)
(provide 'el-get-pacman)
......@@ -66,8 +66,10 @@
:error ,ko))
post-update-fun)))
(el-get-register-method
:svn #'el-get-svn-checkout #'el-get-svn-update #'el-get-rmdir
#'el-get-svn-checkout-hook)
(el-get-register-method :svn
:install #'el-get-svn-checkout
:update #'el-get-svn-update
:remove #'el-get-rmdir
:install-hook #'el-get-svn-checkout-hook)
(provide 'el-get-svn)
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