; Fix test resulting from 5744519e

* lisp/emacs-lisp/package.el (package-install): Delete dead code
resulting from previous change.
* test/lisp/emacs-lisp/package-tests.el
(package-test-install-single): Adjust code to expect
'user-error'

1 files changed, 3 insertions, 1 deletions

diff --git a/test/lisp/emacs-lisp/package-tests.el b/test/lisp/emacs-lisp/package-tests.el
index 55f69d888b8..1f0a8f73a5c 100644
--- a/test/lisp/emacs-lisp/package-tests.el
+++ b/test/lisp/emacs-lisp/package-tests.el
@@ -241,7 +241,9 @@ Must called from within a `tar-mode' buffer."
     (package-initialize)
     (should (package-installed-p 'simple-single))
     ;; Check if we properly report an "already installed".
-    (should-error (package-install 'simple-single) :type 'user-error)
+    (should (condition-case nil
+                (progn (package-install 'simple-single) nil)
+              (user-error t)))
     (should (package-installed-p 'simple-single))
     (let* ((simple-pkg-dir (file-name-as-directory
                             (expand-file-name