el-get/test/el-get-issue-619.el

23 lines
752 B
EmacsLisp

;; https://github.com/dimitri/el-get/issues/619
;;
;; :checkout property for hg
(require 'cl)
(let* ((debug-on-error t)
(el-get-verbose t)
;; Just need to install something
(pkg 'qmake-mode)
(checksum "a3f9655f346c6efe54e3ffc000adb3435c99f90b")
(el-get-sources
(list
`(:name ,pkg
:checksum ,checksum))))
(el-get 'sync pkg)
(assert (el-get-package-is-installed pkg))
(let (installed-checksum)
(setq installed-checksum (el-get-checksum pkg))
(message "Installed checksum is %s" installed-checksum)
(assert (string= checksum installed-checksum) nil
"Package %s should have checksum %s but it is actually %s"
pkg checksum installed-checksum)))