Skip to content

Commit bb9723b

Browse files
committed
Don't use obsolete function in package-tests.el
* test/lisp/emacs-lisp/package-tests.el (package-test-update-archives, package-test-signed): Use 'revert-buffer' instead of obsolete 'package-menu-refresh'.
1 parent aea12d4 commit bb9723b

File tree

1 file changed

+4
-4
lines changed

1 file changed

+4
-4
lines changed

test/lisp/emacs-lisp/package-tests.el

Lines changed: 4 additions & 4 deletions
Original file line numberDiff line numberDiff line change
@@ -450,15 +450,15 @@ Must called from within a `tar-mode' buffer."
450450
"Test updating package archives."
451451
(with-package-test ()
452452
(let ((buf (package-list-packages)))
453-
(package-menu-refresh)
453+
(revert-buffer)
454454
(search-forward-regexp "^ +simple-single")
455455
(package-menu-mark-install)
456456
(package-menu-execute)
457457
(should (package-installed-p 'simple-single))
458458
(let ((package-test-data-dir
459459
(expand-file-name "package-resources/newer-versions" package-test-file-dir)))
460460
(setq package-archives `(("gnu" . ,package-test-data-dir)))
461-
(package-menu-refresh)
461+
(revert-buffer)
462462

463463
;; New version should be available and old version should be installed
464464
(goto-char (point-min))
@@ -470,7 +470,7 @@ Must called from within a `tar-mode' buffer."
470470

471471
(package-menu-mark-upgrades)
472472
(package-menu-execute)
473-
(package-menu-refresh)
473+
(revert-buffer)
474474
(should (package-installed-p 'simple-single '(1 4)))))))
475475

476476
(ert-deftest package-test-update-archives-async ()
@@ -632,7 +632,7 @@ Must called from within a `tar-mode' buffer."
632632
(should (progn (package-install 'signed-bad) 'noerror)))
633633
;; Check if the installed package status is updated.
634634
(let ((buf (package-list-packages)))
635-
(package-menu-refresh)
635+
(revert-buffer)
636636
(should (re-search-forward
637637
"^\\s-+signed-good\\s-+\\(\\S-+\\)\\s-+\\(\\S-+\\)\\s-"
638638
nil t))

0 commit comments

Comments
 (0)