bug#20584: 25.0.50; [PATCH] (list-packages) do not fail, if no user config file present

[Eduard Wiebe]

* lisp/emacs-lisp/package.el (package--ensure-init-file) Ensure
user-init-file exists.
---
 lisp/emacs-lisp/package.el | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el
index 6156313..55901f5 100644
--- a/lisp/emacs-lisp/package.el
+++ b/lisp/emacs-lisp/package.el
@@ -1810,9 +1810,10 @@ using `package-compute-transaction'."
                       (search-forward "(package-initialize)" nil 'noerror))))
               ;; Don't visit the file if we don't have to.
               (with-temp-buffer
-                (insert-file-contents user-init-file)
-                (goto-char (point-min))
-                (search-forward "(package-initialize)" nil 'noerror)))))
+                (when (file-exists-p user-init-file)
+                  (insert-file-contents user-init-file)
+                  (goto-char (point-min))
+                  (search-forward "(package-initialize)" nil 'noerror))))))
       (unless contains-init
         (with-current-buffer (or buffer
                                  (let ((delay-mode-hooks t))
-- 
Eduard Wiebe