Remove el-get-installation-test

This commit is contained in:
Takafumi Arakaki 2012-11-25 02:24:16 +01:00
parent 91dab8b1e6
commit 5d34a7afb8

View File

@ -6,29 +6,6 @@
(defconst testing-destination-dir "/tmp/emacs.d.testing")
(ert-deftest el-get-installation-test ()
(let ((el-get-default-process-sync 'wait)
(user-emacs-directory testing-destination-dir)
(el-get-dir (concat (file-name-as-directory user-emacs-directory)
"el-get"))
(el-get-status-file
(concat (file-name-as-directory el-get-dir) ".status.el")))
(make-directory el-get-dir t)
;; Extract the instructions directly from the documentation
(with-temp-buffer
(insert-file-contents "../README.asciidoc")
(goto-char (point-min))
(search-forward-regexp "^-\\{9,\\}
\\(\\(?:.\\|
\\)+?\\)-\\{9,\\}")
(let ((install-string (match-string 1)))
(should install-string)
(message "evaluating %s" install-string)
(should (eval (read (match-string 1)))))))
(should (featurep 'el-get))
;; (should (el-get-compiled))
(should-not el-get-outdated-autoloads))
(ert-deftest el-get-recipe-dirs-test ()
(require 'el-get)
(let ((el-get-recipe-path