Simplify text and setting up `which-key' with "lst:setup-which-key"

README.org

@@ -223,7 +223,6 @@ of [[info:emacs#Saving Customizations][saving customizations (info)]].
  lazy-count-prefix-format nil
  lazy-count-suffix-format " (%s/%s)"
  lazy-highlight-initial-delay 1.0
- max-mini-window-height 20 ; Prevent `which-key-mode' paging (try `C-x')!
  mode-line-compact t
  next-error-message-highlight t
  recentf-max-saved-items 100
@@ -1028,20 +1027,15 @@ looks for files.
 :END:
 
 Table [[tab:basic-key-bindings]] lists basic key bindings.  Enabling
-=which-key-mode= is another way of associating key bindings with commands.
-Execute src_emacs-lisp[:results none]{(find-library "which-key")} to check
-whether this library is builtin.  Notes:
+=which-key-mode= is another way of associating key bindings with commands.  This
+setup assumes that =which-key= is a builtin package or an installed external
+package.  Notes:
 1. This setup does not enable =which-key-mode= because of rare interference with
    for instance a process that the =compile= command launches.
-2. ChatGPT bullshits on "How to page in =which-key-mode= on Emacs".
-3. Execute src_emacs-lisp[:results none]{(setopt max-mini-window-height 0.5)} to
-   make =which-key-mode= display all keys without paging (try "C-x").
-4. Execute src_emacs-lisp[:results none]{(which-key-setup-side-window-right)} to
- *enable* =which-key= paging support (use fn-F1 on Darwin).  Setting
- =max-mini-window-height= is the easiest solution.
-5. Execute src_emacs-lisp[:results none]{(which-key-setup-minibuffer)} to
- *disable* =which-key= paging support (and display the first =which-key-mode=
-   page in the minibuffer).
+2. ChatGPT bullshits on "How to page in =which-key-mode= on Emacs".  Anyhow, it
+   is easier to bypass paging.
+3. The *easiest* solution to bypass paging in =which-key-mode= as listing
+   [[lst:setup-which-key]] implements.
 
 #+attr_latex: :booktabs yes :float table
 #+caption[Basic key bindings]:
@@ -1060,6 +1054,15 @@ whether this library is builtin.  Notes:
 | *forward-sentence*   | global-map | {{{kbd(M-e)}}}         |
 |----------------------+------------+------------------------|
 
+#+caption[Setup =which-key=]:
+#+caption: Setup =which-key=.
+#+name: lst:setup-which-key
+#+begin_src emacs-lisp -n :results silent
+(when (package-installed-p 'which-key)
+  (setopt max-mini-window-height 20)
+  (which-key-setup-minibuffer))
+#+end_src
+
 ** [[https://github.com/michael-heerdegen/interaction-log.el#readme][Interaction-log]]
 :PROPERTIES:
 :CUSTOM_ID: sec:interaction-log