summaryrefslogtreecommitdiff
path: root/test
diff options
context:
space:
mode:
authorDmitry Gutov <dgutov@yandex.ru>2014-03-21 08:06:52 +0200
committerDmitry Gutov <dgutov@yandex.ru>2014-03-21 08:06:52 +0200
commitdcf7866712dfa5a0007554c59e54dea91951c746 (patch)
tree34eb57e976e819b6be48905e745bde2fb9626d3d /test
parent1fc8f6559a8ef1df2f55a12d6dd70ee62f34f1f6 (diff)
downloademacs-dcf7866712dfa5a0007554c59e54dea91951c746.tar.gz
Fix bug#16826
* lisp/emacs-lisp/package.el (package-compute-transaction): Use `version-list-<=' to compare the requirement version against the package version already to be installed. Update the error message.
Diffstat (limited to 'test')
-rw-r--r--test/automated/data/package/archive-contents4
-rw-r--r--test/automated/data/package/simple-two-depend-1.1.el17
-rw-r--r--test/automated/package-test.el12
3 files changed, 32 insertions, 1 deletions
diff --git a/test/automated/data/package/archive-contents b/test/automated/data/package/archive-contents
index 8d6f3226ae6..a6df6b8086e 100644
--- a/test/automated/data/package/archive-contents
+++ b/test/automated/data/package/archive-contents
@@ -6,6 +6,10 @@
(simple-depend .
[(1 0)
((simple-single (1 3))) "A single-file package with a dependency." single])
+ (simple-two-depend .
+ [(1 1)
+ ((simple-depend (1 0)) (simple-single (1 3)))
+ "A single-file package with two dependencies." single])
(multi-file .
[(0 2 3)
nil "Example of a multi-file tar package" tar
diff --git a/test/automated/data/package/simple-two-depend-1.1.el b/test/automated/data/package/simple-two-depend-1.1.el
new file mode 100644
index 00000000000..9cfe5c0d4e2
--- /dev/null
+++ b/test/automated/data/package/simple-two-depend-1.1.el
@@ -0,0 +1,17 @@
+;;; simple-two-depend.el --- A single-file package with two dependencies.
+
+;; Author: J. R. Hacker <jrh@example.com>
+;; Version: 1.1
+;; Keywords: frobnicate
+;; Package-Requires: ((simple-depend "1.0") (simple-single "1.3"))
+
+;;; Commentary:
+
+;; Depends on two another packages.
+
+;;; Code:
+
+(defvar simple-two-depend "Value"
+ "Some trivial code")
+
+;;; simple-two-depend.el ends here
diff --git a/test/automated/package-test.el b/test/automated/package-test.el
index 34a3ce25a48..72422a8684b 100644
--- a/test/automated/package-test.el
+++ b/test/automated/package-test.el
@@ -203,12 +203,22 @@ Must called from within a `tar-mode' buffer."
(should (package-installed-p 'simple-single))
(should (package-installed-p 'simple-depend))))
+(ert-deftest package-test-install-two-dependencies ()
+ "Install a package which includes a dependency."
+ (with-package-test ()
+ (package-initialize)
+ (package-refresh-contents)
+ (package-install 'simple-two-depend)
+ (should (package-installed-p 'simple-single))
+ (should (package-installed-p 'simple-depend))
+ (should (package-installed-p 'simple-two-depend))))
+
(ert-deftest package-test-refresh-contents ()
"Parse an \"archive-contents\" file."
(with-package-test ()
(package-initialize)
(package-refresh-contents)
- (should (eq 3 (length package-archive-contents)))))
+ (should (eq 4 (length package-archive-contents)))))
(ert-deftest package-test-install-single-from-archive ()
"Install a single package from a package archive."