From 30a42a5bedfbfaab72da862826f43291fe771ce8 Mon Sep 17 00:00:00 2001 From: Stefan Monnier Date: Wed, 25 Jun 2014 17:59:28 -0400 Subject: [PATCH] * test/automated/package-test.el (package-test-update-listing) (package-test-update-archives, package-test-describe-package): Adjust tests according to new package-list-unsigned. --- test/ChangeLog | 6 ++++++ test/automated/package-test.el | 6 +++--- 2 files changed, 9 insertions(+), 3 deletions(-) diff --git a/test/ChangeLog b/test/ChangeLog index f86084739af..3bd41a22964 100644 --- a/test/ChangeLog +++ b/test/ChangeLog @@ -1,3 +1,9 @@ +2014-06-25 Stefan Monnier + + * automated/package-test.el (package-test-update-listing) + (package-test-update-archives, package-test-describe-package): + Adjust tests according to new package-list-unsigned. + 2014-06-21 Fabián Ezequiel Gallina * automated/python-tests.el (python-util-strip-string-1): New test. diff --git a/test/automated/package-test.el b/test/automated/package-test.el index ee1920b5ef4..65e13438ea1 100644 --- a/test/automated/package-test.el +++ b/test/automated/package-test.el @@ -264,7 +264,7 @@ Must called from within a `tar-mode' buffer." (should (package-installed-p 'simple-single)) (switch-to-buffer "*Packages*") (goto-char (point-min)) - (should (re-search-forward "^\\s-+simple-single\\s-+1.3\\s-+unsigned" nil t)) + (should (re-search-forward "^\\s-+simple-single\\s-+1.3\\s-+installed" nil t)) (goto-char (point-min)) (should-not (re-search-forward "^\\s-+simple-single\\s-+1.3\\s-+\\(available\\|new\\)" nil t)) (kill-buffer buf)))) @@ -286,7 +286,7 @@ Must called from within a `tar-mode' buffer." ;; New version should be available and old version should be installed (goto-char (point-min)) (should (re-search-forward "^\\s-+simple-single\\s-+1.4\\s-+new" nil t)) - (should (re-search-forward "^\\s-+simple-single\\s-+1.3\\s-+unsigned" nil t)) + (should (re-search-forward "^\\s-+simple-single\\s-+1.3\\s-+installed" nil t)) (goto-char (point-min)) (should (re-search-forward "^\\s-+new-pkg\\s-+1.0\\s-+\\(available\\|new\\)" nil t)) @@ -317,7 +317,7 @@ Must called from within a `tar-mode' buffer." (with-fake-help-buffer (describe-package 'simple-single) (goto-char (point-min)) - (should (search-forward "simple-single is an unsigned package." nil t)) + (should (search-forward "simple-single is an installed package." nil t)) (should (search-forward (format "Status: Installed in `%s/' (unsigned)." (expand-file-name "simple-single-1.3" package-user-dir)) -- 2.39.5