[Emacs-diffs] emacs-24 r117300: * test/automated/package-test.el (package-test-update-listing)

[Stefan Monnier]

------------------------------------------------------------
revno: 117300
revision-id: address@hidden
parent: address@hidden
committer: Stefan Monnier <address@hidden>
branch nick: emacs-24
timestamp: Wed 2014-06-25 17:59:28 -0400
message:
  * 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.
modified:
  test/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-8588
  test/automated/package-test.el 
packagetest.el-20130627091655-6mb005jio30t2i3i-1

=== modified file 'test/ChangeLog'
--- a/test/ChangeLog    2014-06-21 14:14:54 +0000
+++ b/test/ChangeLog    2014-06-25 21:59:28 +0000
@@ -1,3 +1,9 @@
+2014-06-25  Stefan Monnier  <address@hidden>
+
+       * 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  <address@hidden>
 
        * automated/python-tests.el (python-util-strip-string-1): New test.

=== modified file 'test/automated/package-test.el'
--- a/test/automated/package-test.el    2014-03-23 03:26:13 +0000
+++ b/test/automated/package-test.el    2014-06-25 21:59:28 +0000
@@ -264,7 +264,7 @@
       (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 @@
         ;; 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 @@
     (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))