master 63c8a60: Add package management to tutorial and startup screen

[Stefan Kangas]

branch: master
commit 63c8a6066a203d872df89338c86a9fea34c36141
Author: Daniel Fleischer <danflscr@gmail.com>
Commit: Stefan Kangas <stefan@marxist.se>

    Add package management to tutorial and startup screen
    
    * etc/tutorials/TUTORIAL: Add section about package installation.
    * lisp/startup.el (fancy-startup-tail): Add button for
    package-list-packages.
    
    This was discussed in:
    https://lists.gnu.org/r/emacs-devel/2021-12/msg00079.html
---
 etc/tutorials/TUTORIAL | 14 ++++++++++++++
 lisp/startup.el        | 10 +++++++---
 2 files changed, 21 insertions(+), 3 deletions(-)

diff --git a/etc/tutorials/TUTORIAL b/etc/tutorials/TUTORIAL
index dcdb61f..d7a298e 100644
--- a/etc/tutorials/TUTORIAL
+++ b/etc/tutorials/TUTORIAL
@@ -1099,6 +1099,20 @@ manual in the node called "Dired".
 The manual also describes many other Emacs features.
 
 
+* INSTALLING PACKAGES
+---------------------
+
+Emacs has a rich set of packages written by the community, which
+extends Emacs' capabilities.  These features include support for new
+languages, additional themes, plugins for integrating with external
+applications and much much more.
+
+To see a list of all available packages, type M-x list-packages.  In
+this mode, you can install or uninstall packages, as well as read
+packages' descriptions.  For more information about package
+management, consult the manual.
+
+
 * CONCLUSION
 ------------
 
diff --git a/lisp/startup.el b/lisp/startup.el
index e5e6b07..3ac7532 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -1840,18 +1840,22 @@ a face or button specification."
   (unless concise
     (fancy-splash-insert
      :face 'variable-pitch
-     "\nTo start...     "
+     "\nTo start...\t"
      :link `("Open a File"
             ,(lambda (_button) (call-interactively 'find-file))
             "Specify a new file's name, to edit the file")
-     "     "
+     "\t\t"
      :link `("Open Home Directory"
             ,(lambda (_button) (dired "~"))
             "Open your home directory, to operate on its files")
-     "     "
+     "\n\t"
      :link `("Customize Startup"
             ,(lambda (_button) (customize-group 'initialization))
             "Change initialization settings including this screen")
+     "\t"
+     :link `("Explore Packages"
+            ,(lambda (_button) (call-interactively 'package-list-packages))
+            "Explore, install and remove Emacs packages (requires Internet 
connection)")
      "\n"))
   (fancy-splash-insert
    :face 'variable-pitch "To quit a partially entered command, type "