* 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.

diff --git a/test/ChangeLog b/test/ChangeLog
index f86084739affd88d1814ce3230d6e30698c38f5c..3bd41a2296422be72e2cb3a24def6433703823e0 100644 (file)
--- a/test/ChangeLog
+++ b/test/ChangeLog
@@ -1,3 +1,9 @@
+2014-06-25  Stefan Monnier  <monnier@iro.umontreal.ca>
+
+       * 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  <fgallina@gnu.org>
 
        * 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 ee1920b5ef44d585f5d0e68450673e85073be6b3..65e13438ea14edab72e23021a3817e103f48814d 100644 (file)
--- 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))