From: Federico Tedin <federicotedin@gmail.com>
Date: Wed, 13 Mar 2019 00:34:31 +0000 (-0300)
Subject: Correctly handle packages without description in describe-package
X-Git-Tag: emacs-27.0.90~3367
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=89fa7c4555f1c44c93ecdca23047bbfe3840cc33;p=emacs.git

Correctly handle packages without description in describe-package

* lisp/emacs-lisp/package.el (describe-package-1): Do not call insert
  if package description is nil (Bug#34147).
---

diff --git a/lisp/emacs-lisp/package.el b/lisp/emacs-lisp/package.el
index 4c75fa1e72e..61cf6906971 100644
--- a/lisp/emacs-lisp/package.el
+++ b/lisp/emacs-lisp/package.el
@@ -2484,7 +2484,8 @@ The description is read from the installed package files."
                 (insert ?\n)))
             (setq readme-string (buffer-string))
             t)
-          (insert readme-string))
+          (insert (or readme-string
+                      "This package does not provide a description.")))
         ))))
 
 (defun package-install-button-action (button)