gitback/el-get
1
0
Fork 0
mirror of https://github.com/dimitri/el-get.git synced 2024-09-29 13:08:51 +08:00
Code Issues Packages Projects Releases Wiki Activity

Took out testing function. Should address Issue #386

Browse Source
This commit is contained in:
Matthew L. Fidler 2012-02-14 19:40:55 -06:00 committed by Ryan C. Thompson
parent de7a55713d
commit 9c2143d172
1 changed files with 0 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
methods/el-get-cvs.el
View File

@ -83,21 +83,6 @@ Enable this if you want el-get to honor these settings"
(setq ret (replace-match (concat ":pserver" cvs-proxy ":") t t ret)))))
(symbol-value 'ret)))
(defun el-get-cvs-checkout-proxy-url-test ()
"Tests the function for cvs proxy urls."
(interactive)
(let ((el-get-cvs-http-proxy-url "")
(el-get-cvs-http-proxy-url-use-user-name nil)
(url ":pserver:anonymous@cvs.namazu.org:/storage/cvsroot"))
(message "Proxy:%s\nURL:%s\n" el-get-cvs-http-proxy-url (el-get-cvs-checkout-proxy-url url))
(setq el-get-cvs-http-proxy-url "http://proxy.corporate.net:8080")
(message "Proxy:%s\nURL:%s\n" el-get-cvs-http-proxy-url (el-get-cvs-checkout-proxy-url url))
(setq el-get-cvs-http-proxy-url "http://user@proxy.corporate.net:8080")
(message "Proxy:%s\nURL:%s\n" el-get-cvs-http-proxy-url (el-get-cvs-checkout-proxy-url url))
(setq el-get-cvs-http-proxy-url "http://user:password@proxy.corporate.net:8080")
(message "Proxy:%s\nURL:%s\n" el-get-cvs-http-proxy-url (el-get-cvs-checkout-proxy-url url))))
(defun el-get-cvs-checkout (package urlp post-install-fun)
"cvs checkout the package."
(let* ((cvs-executable (el-get-executable-find "cvs"))