Re: [PATCH] Package Installation in Tutorial

[Daniel Fleischer <danflscr@gmail.com>]

[-- Attachment #1: Type: text/plain, Size: 325 bytes --]

Stefan Kangas [2021-12-01 Wed 11:25] wrote:

> LGTM, but I would prefer to put this after the section "Getting more
> help".

Hi, I moved it to be after the getting help section. I also added a
button in the splash screen called "Exploring Packages". There are now 4
buttons so I arrange them in 2x2 format.

Attached patch.

[-- Warning: decoded text below may be mangled, UTF-8 assumed --]
[-- Attachment #2: Patch --]
[-- Type: text/x-patch, Size: 2553 bytes --]

From bbdd615f55398877f7c0162df7a12e5e12cc20f4 Mon Sep 17 00:00:00 2001
From: Daniel Fleischer <danflscr@gmail.com>
Date: Wed, 1 Dec 2021 19:15:27 +0200
Subject: [PATCH] Exposing package management to users

* etc/tutorials/TUTORIAL: section about package installation

* lisp/startup.el: package list button
---
 etc/tutorials/TUTORIAL | 19 +++++++++++++++++++
 lisp/startup.el        |  8 ++++++--
 2 files changed, 25 insertions(+), 2 deletions(-)

diff --git a/etc/tutorials/TUTORIAL b/etc/tutorials/TUTORIAL
index dcdb61f23e..6de81ca08b 100644
--- a/etc/tutorials/TUTORIAL
+++ b/etc/tutorials/TUTORIAL
@@ -1076,6 +1076,25 @@ corresponding command names (such as C-x C-f beside find-file).
 		consult the Emacs Info manual as your primary documentation.
 
 
+* 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 to integrate with external
+applications and much much more.
+
+To install a package type M-x package-install <Return> and choose a
+package. To uninstall, type M-x package-delete <Return> and choose a
+package to remove.
+
+>> Type M-x package-install <Return> which-key <Return> to install
+   the 'which-key' package, for example.
+
+>> Type M-x package-delete <Return> which-key <Return> to delete
+   the package you just installed.
+
+
 * MORE FEATURES
 ---------------
 
diff --git a/lisp/startup.el b/lisp/startup.el
index d4bb338fc0..d78cc6d35d 100644
--- a/lisp/startup.el
+++ b/lisp/startup.el
@@ -1835,7 +1835,7 @@ fancy-startup-tail
   (unless concise
     (fancy-splash-insert
      :face 'variable-pitch
-     "\nTo start...     "
+     "\nTo start...      "
      :link `("Open a File"
 	     ,(lambda (_button) (call-interactively 'find-file))
 	     "Specify a new file's name, to edit the file")
@@ -1843,10 +1843,14 @@ fancy-startup-tail
      :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")
+     "     "
+     :link `("Explore Packages"
+	     ,(lambda (_button) (call-interactively 'package-list-packages))
+	     "Explore, install and remove Emacs packages")
      "\n"))
   (fancy-splash-insert
    :face 'variable-pitch "To quit a partially entered command, type "
-- 
2.33.1


[-- Attachment #3: Type: text/plain, Size: 23 bytes --]


-- 

Daniel Fleischer