From 206528120d8d08d89a4b0f82bee086b3fa7748a0 Mon Sep 17 00:00:00 2001
From: bw <rsw@gnu.org>
Date: Tue, 6 Oct 2026 00:59:02 -0400
Subject: [PATCH 1/2] org-mode, kotl-mode - Replace Action/Assist Key behavior
 in cells with func variables

INCOMPATIBLE CHANGE: These variables:
  kotl-mode:action-key-default-function, kotl-mode:assist-key-default-function
  smart-org-action-key-heading-function, smart-org-assist-key-heading-function
by default are set to no-ops and outline visibility cycling will now be
handled by TAB/S-TAB rather than the Smart Keys.

hsys-org-cycle-global - Change all `org-global-cycle' references to
`org-cycle-global' and set this command to `org-cycle-global'.

kcell-data:create - Signal an error if buffer-local `kotl-kview' is not a
valid kview.

hywiki-word-action-key-creation-allowed-p,
hywiki-word-create-exclude-action-key-modes - Add and use in ibtype, `hwyiki-word'
to control which major modes disable Action Key WikiWord creation (none, by default).

hyrolo-yank - Interactively, indicate whether yanking an entry or a tree (sub-entries).
---
 ChangeLog               |  49 +++++++++++--
 hibtypes.el             |  19 +++--
 hsys-org.el             |  10 +--
 hui-mouse.el            |  41 ++++++++---
 hypb-maintenance.el     |   4 +-
 hyperbole.el            |   9 +--
 hyrolo.el               |  22 +++---
 hywiki.el               |  55 +++++++++------
 kotl/EXAMPLE.kotl       |  21 ++++--
 kotl/kcell.el           |  18 ++---
 kotl/kotl-mode.el       | 134 ++++++++++++++++++++---------------
 man/hyperbole.info      | Bin 708270 -> 711159 bytes
 man/hyperbole.texi      | 150 +++++++++++++++++++++++++---------------
 man/use-package         |  21 +++++-
 test/kotl-mode-tests.el |   5 +-
 15 files changed, 370 insertions(+), 188 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index a5247c8b..0a81c6e8 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,17 +1,58 @@
 2026-10-05  Bob Weiner  <rsw@gnu.org>
 
+* hui-mouse.el (smart-org-action-key-heading-function,
+                smart-org-assist-key-heading-function): Add to allow user-settable
+    behavior when point is anywhere within a heading line (not at the end).
+               (smart-org-cycle): Add as a possible setting for the above variables.
+  man/hyperbole.texi (Smart Key - Org Mode):
+                     (Implicit Button Types): smart-org update doc.
+
+* hsys-org.el (hsys-org-cycle-global): Change all 'org-global-cycle' references
+    to 'org-cycle-global' and set this command to 'org-cycle-global'.
+
+* kotl/kotl-mode.el (kotl-mode:action-key-default-function): Add this defcustom.
+                    (kotl-mode:action-key): INCOMPATIBLE CHANGE: Replace default
+    action in a kcell of show/hide tree with a call to the function specified by
+    the new action defcustom above, which defaults to a no-op, since we have added
+    tree cycling on the TAB key.
+                    (kotl-mode:show-or-hide-tree): Encode prior Action Key
+    behavior in this function if user wants to set it as the defcustom value.
+  man/use-package (kotl-mode): Add comment on how to utilize the above function.
+  man/hyperbole.texi (Hiding and Showing): Update Action Key behavior doc.
+                    (kotl-mode:assist-key-default-function): Add this defcustom.
+                    (kotl-mode:assist-key): INCOMPATIBLE CHANGE: Replace default
+    action in a kcell of 'smart-scroll-down' with a call to the function specified
+    by the new assist defcustom above, which defaults to a no-op, for symmetry with
+    the Action Key.
+  test/kotl-mode-tests.el (kotl-mode-hide-cell): Add needed 'let' binding of
+    'kotl-mode:action-key-default-function'.
+
+* kotl/kcell.el (kcell-data:create): Signal an error if buffer-local 'kotl-kview'
+    is not a valid kview.
+
 * hywiki.el (hywiki-init): Add to move HyWiki initializations from load-time
     to after system and user init time.  This fixes bug gh#1023 where
     a directory given by the default value of 'hywiki-directory' was created
     though the value was changed prior to loading HyWiki.
 
+2026-10-04  Bob Weiner  <rsw@gnu.org>
+
+* hywiki.el (hywiki-word-action-key-creation-allowed-p,
+             hywiki-word-create-exclude-action-key-modes): Add.
+  hibtypes.el (hywiki-word): Use the above in ibtype, 'hywiki-word, to control
+    which major modes disable Action Key WikiWord creation, by default, none.
+  man/hyperbole.texi (Creating HyWikiWords): Doc above variable.
+                     (Implicit Button Types): Update doc for 'hywiki-word'
+    and 'hywiki-existing-word' ibtypes.
+
 * man/use-package (hyperbole): Add 'hywiki-directory' to :custom section.
 
 2026-10-03  Bob Weiner  <rsw@gnu.org>
 
 * hyrolo.el (hyrolo-yank): INCOMPATIBLE CHANGE: Interactively, 'regexp-flag'
     is set only if prefix arg is not C-u, as C-u now disables the 3rd arg,
-    'exclude-sub-entries'.
+    'exclude-sub-entries'.  Interactively, indicate whether yanking an
+    entry or a tree (sub-entries).
   man/hyperbole.texi (HyRolo Menu): Remove referent to 'helm' package no
     longer supported by HyRolo.
                      (HyRolo Menu): Add prefix arg handling details for the
@@ -8803,7 +8844,7 @@ V9.0.1 changes ^^^^:
   hyrolo.el (hyrolo-verify): Allow buffers associated with files from
     'hsys-org-cycle-bob-file-list' as well.
   hui-mouse.el (smart-org-bob-and-non-heading-p): Check whether {TAB} or
-    {M-RET} should org-global-cycle at point."
+    {M-RET} should org-cycle-global at point."
                (smart-eolp): Allow for org global cycling at start of
     buffer on a non-heading line in Hyperbole doc files when displayed from
     Hyperbole menu items.
@@ -10441,7 +10482,7 @@ V9.0.1 changes ^^^^:
                 (assist-key, assist-key-internal): FIX: Set 'assist-key-depressed-flag'
     to t when executing keyboard assist-key actions.
 
-* hsys-org.el (hsys-org-global-cycle, hsys-org-cycle): FIX: Temp move point to beginning
+* hsys-org.el (hsys-org-cycle-global, hsys-org-cycle): FIX: Temp move point to beginning
     of heading so TAB invocations cycle through all states properly.
 
 2023-07-24  Mats Lidell  <matsl@gnu.org>
@@ -13032,7 +13073,7 @@ name with 'name' and 'name-key'.
 
 * man/hyperbole.texi (Implicit Button Types, Smart Key - Org Mode): Add Org
     mode Action Key todo cycling and Assist Key todo set cycling.
-  hsys-org.el (hsys-org-cycle, hsys-org-global-cycle): FIX: Remove setting of
+  hsys-org.el (hsys-org-cycle, hsys-org-cycle-global): FIX: Remove setting of
     last-command which causes cursor to jump around somewhere else in the
     buffer when unfolding a headline rather than just unfolding it
               (hsys-org-todo-at-p, hsys-org-todo-cycle, hsys-org-todo-set-cycle):
diff --git a/hibtypes.el b/hibtypes.el
index a12ec193..51fc9857 100644
--- a/hibtypes.el
+++ b/hibtypes.el
@@ -3,7 +3,7 @@
 ;; Author:       Bob Weiner
 ;;
 ;; Orig-Date:    19-Sep-91 at 20:45:31
-;; Last-Mod:     30-Sep-26 at 17:04:10 by Bob Weiner
+;; Last-Mod:      5-Oct-26 at 10:27:23 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -53,6 +53,7 @@
 ;;; ************************************************************************
 
 (defvar cscope-output-line-regexp)
+(defvar hywiki-word-create-exclude-action-key-modes)
 (defvar id-cflow-repeated-indicator)
 (defvar markdown-regex-link-reference)
 (defvar markdown-regex-reference-definition)
@@ -74,6 +75,7 @@
 (declare-function hywiki-highlight-word-get-range "hywiki")
 (declare-function hywiki-message-spec wikiword "hywiki")
 (declare-function hywiki-referent-exists-p "hywiki")
+(declare-function hywiki-word-action-key-creation-allowed-p "hywiki")
 (declare-function hywiki-word-create-and-display "hywiki")
 (declare-function hywiki-word-from-reference "hywiki")
 (declare-function hywiki-non-hook-context-p "hywiki")
@@ -140,9 +142,10 @@
 
 (defib hywiki-word ()
   "When on a non-existing HyWikiWord, create it and display its referent.
-This is the Action Key function that activates HyWikiWords.  A call
-to (hywiki-active-in-current-buffer-p) must return non-nil for this to
-activate.
+This is the Action Key function that creates HyWikiWords.  Calls
+to (hywiki-word-action-key-creation-allowed-p),
+(hywiki-active-in-current-buffer-p) and (not (hywiki-non-hook-context-p))
+must return non-nil for this to activate.
 
 If the associated HyWiki referent is a page, create it automatically
 unless it is the first HyWiki page to be created, in which case,
@@ -151,7 +154,8 @@ use.
 
 Existing HyWikiWords are handled by the implicit button type
 `hywiki-existing-word'."
-  (when (and (hywiki-active-in-current-buffer-p)
+  (when (and (hywiki-word-action-key-creation-allowed-p)
+             (hywiki-active-in-current-buffer-p)
              (not (hywiki-non-hook-context-p)))
     (let* ((wikiword-start-end (hywiki-highlight-word-get-range))
 	   (wikiword (nth 0 wikiword-start-end))
@@ -1868,8 +1872,9 @@ e.g. <ilink: my series of keys: ${hyperb:dir}/HYPB>."
 
 (defib hywiki-existing-word ()
   "On a HyWikiWord with an existing referent, display the referent.
-A call to (hywiki-active-in-current-buffer-p) must return non-nil
-for this to activate.
+This is the Action Key function that activates existing HyWikiWords.
+Calls to (hywiki-active-in-current-buffer-p) and (not
+(hywiki-non-hook-context-p)) must return non-nil for this to activate.
 
 See the implicit button type `hywiki-word' for creation of referents to
 not yet existing HyWikiWords."
diff --git a/hsys-org.el b/hsys-org.el
index f0693fc4..65581704 100644
--- a/hsys-org.el
+++ b/hsys-org.el
@@ -3,7 +3,7 @@
 ;; Author:       Bob Weiner
 ;;
 ;; Orig-Date:     2-Jul-16 at 14:54:14
-;; Last-Mod:     28-Sep-26 at 08:09:55 by Bob Weiner
+;; Last-Mod:      5-Oct-26 at 22:23:15 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -490,12 +490,12 @@ omit any trailing colon and space in the prompt."
 	  (car src-block-info)
 	(cdr (assq attribute (caddr src-block-info)))))))
 
-(defun hsys-org-global-cycle ()
-  "Call `org-global-cycle' and set as `this-command' to cycle through all states."
-  (setq this-command 'org-cycle)
+(defun hsys-org-cycle-global ()
+  "Call `org-cycle-global' and set as `this-command' to cycle through all states."
+  (setq this-command 'org-cycle-global)
   (save-excursion
     (org-back-to-heading)
-    (org-global-cycle nil)))
+    (org-cycle-global nil)))
 
 (defun hsys-org-todo-cycle ()
   "Call `org-todo' and set as `this-command' to cycle through all states."
diff --git a/hui-mouse.el b/hui-mouse.el
index 4465ca0a..51bfa682 100644
--- a/hui-mouse.el
+++ b/hui-mouse.el
@@ -3,7 +3,7 @@
 ;; Author:       Bob Weiner
 ;;
 ;; Orig-Date:    04-Feb-89
-;; Last-Mod:     29-Sep-26 at 17:08:43 by Bob Weiner
+;; Last-Mod:      6-Oct-26 at 00:08:26 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -171,6 +171,18 @@ Its default value is `smart-scroll-down'.  To disable it, set it to
   :type 'function
   :group 'hyperbole-keys)
 
+(defcustom smart-org-action-key-heading-function #'ignore
+  "Function run by the Action Key in `org-mode' when within a heading.
+Set it to `smart-org-cycle' if you want the old `smart-org' behavior."
+  :type 'function
+  :group 'hyperbole-keys)
+
+(defcustom smart-org-assist-key-heading-function #'ignore
+  "Function run by the Assist Key in `org-mode' when within a heading.
+Set it to `smart-org-cycle' if you want the old `smart-org-assist' behavior."
+  :type 'function
+  :group 'hyperbole-keys)
+
 ;;; ************************************************************************
 ;;; Public declarations
 ;;; ************************************************************************
@@ -1900,8 +1912,9 @@ either t or `:buttons':
      or #+end_example header, execute the code block via the Org mode
      standard binding of {\\`C-c' \\`C-c'}, (`org-ctrl-c-ctrl-c').
 
- 10. With point on an Org mode heading, cycle the view of the subtree at
-     point.
+ 10. With point on an Org mode heading but not a Hyperbole button, call the
+     function given by the `smart-org-action-key-heading-function' variable,
+     which defaults to doing nothing.
 
  11. In any other context besides the end of a line, invoke the Org mode
      standard binding of {M-RET}, (`org-meta-return').
@@ -1929,8 +1942,8 @@ in these contexts:
   6. With point on any #+BEGIN_SRC, #+END_SRC, #+RESULTS, #+begin_example
      or #+end_example header, remove source block results.
 
-  7. Not on a Hyperbole button but on an Org mode heading, cycle
-     through views of the whole buffer outline.
+  7. With point on an Org mode heading but not a Hyperbole button, call the
+     function given by the `smart-org-assist-key-heading-function' variable,
 
 To disable ALL Hyperbole support within Org major and minor modes, set the
 custom option `hsys-org-enable-smart-keys' to nil.  Then in Org modes, this
@@ -2001,9 +2014,11 @@ handled by the separate implicit button type, `org-link-outside-org-mode'."
 				    (t (message "No results to remove for this code block."))))))
 		    t)
 		   ((hsys-org-heading-at-p)
-		    (if (not assist-flag)
-			(hact 'hsys-org-cycle)
-		      (hact 'hsys-org-global-cycle))
+		    (if assist-flag
+                        (when (fboundp smart-org-assist-key-heading-function)
+                          (funcall smart-org-assist-key-heading-function))
+                      (when (fboundp smart-org-action-key-heading-function)
+                        (funcall smart-org-action-key-heading-function)))
 		    t)
 		   ((equal (hsys-org-get-value :language) "python")
 		    (setq hkey-value (smart-python-at-tag-p))
@@ -2048,8 +2063,8 @@ handled by the separate implicit button type, `org-link-outside-org-mode'."
 		   ;; Ignore any further Smart Key non-Org contexts
 		   (t)))
 	    (t
-	     ;; hsys-org-enable-smart-keys is set to t, so try other Smart
-	     ;; contexts
+	     ;; hsys-org-enable-smart-keys is set to t, so try other
+             ;; Smart contexts
 	     nil)))))
 
 (defun smart-org-bob-and-non-heading-p ()
@@ -2061,6 +2076,12 @@ handled by the separate implicit button type, `org-link-outside-org-mode'."
        (member (hypb:buffer-file-name)
 	       (hpath:expand-list hsys-org-cycle-bob-file-list))))
 
+(defun smart-org-cycle ()
+  "Cycle Org tree unless `assist-flag' is non-nil, then cycle whole outline."
+  (if assist-flag
+      (hact 'hsys-org-cycle-global)
+    (hact 'hsys-org-cycle)))
+
 ;;; ************************************************************************
 ;;; smart-outline functions
 ;;; ************************************************************************
diff --git a/hypb-maintenance.el b/hypb-maintenance.el
index a4e6b563..d22be359 100644
--- a/hypb-maintenance.el
+++ b/hypb-maintenance.el
@@ -1,9 +1,9 @@
-;;; hypb-maintenance.el --- functions for maintenance tasks  -*- lexical-binding: t; -*-
+;;; hypb-maintenance.el --- Support for updating Hyperbole web pages  -*- lexical-binding: t; -*-
 ;;
 ;; Author:       Mats Lidell <matsl@gnu.org>
 ;;
 ;; Orig-Date:    31-Mar-21 at 21:11:00
-;; Last-Mod:     12-Mar-24 at 22:36:34 by Bob Weiner
+;; Last-Mod:      5-Oct-26 at 18:07:45 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
diff --git a/hyperbole.el b/hyperbole.el
index 72bcb942..9b0190e1 100644
--- a/hyperbole.el
+++ b/hyperbole.el
@@ -8,7 +8,7 @@
 ;; Maintainer:   Robert Weiner <rsw@gnu.org>
 ;;               Mats Lidell <matsl@gnu.org>
 ;; Created:      06-Oct-92 at 11:52:51
-;; Last-Mod:     27-Sep-26 at 02:24:35 by Bob Weiner
+;; Last-Mod:      5-Oct-26 at 12:11:48 by Bob Weiner
 ;; Released:     27-Jul-26
 ;; Version:      9.2.0
 ;; Keywords:     comm, convenience, files, frames, hypermedia, languages, mail, matching, mouse, multimedia, outlines, tools, wp
@@ -580,9 +580,10 @@ frame, those functions by default still return the prior frame."
 	       #'hattr:save))
 
 ;; This next expression initializes the Hyperbole keymap but does not
-;; activate Hyperbole, (hyperbole-mode 1) does that.  The only user-visible
-;; change it should make is to globally bind {C-h h} to 'hyperbole' which
-;; when invoked will both activate Hyperbole and show its minibuffer menu.
+;; activate Hyperbole, (hyperbole-mode 1) does that.  The only
+;; user-visible change it should make is to globally bind {C-h h} to
+;; 'hyperbole' which when invoked will both activate Hyperbole and show
+;; its minibuffer menu.
 (if after-init-time
     ;; Initialize Hyperbole key bindings and hooks.
     (hyperb:init)
diff --git a/hyrolo.el b/hyrolo.el
index 5a0497b7..3e78c580 100644
--- a/hyrolo.el
+++ b/hyrolo.el
@@ -3,7 +3,7 @@
 ;; Author:       Bob Weiner
 ;;
 ;; Orig-Date:     7-Jun-89 at 22:08:29
-;; Last-Mod:      3-Oct-26 at 12:00:28 by Bob Weiner
+;; Last-Mod:      4-Oct-26 at 18:24:04 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -1707,15 +1707,17 @@ string.
 
 With optional EXCLUDE-SUB-ENTRIES non-nil, exclude all sub-entry records
 below the yanked one (default when called interactively)."
-  (interactive (list
-		(hsys-consult-grep-headlines-read-regexp
-		 #'hyrolo-consult-grep "Yank rolo headline matching")
-                ;; Enable `regexp-flag' if any prefix arg other the
-                ;; universal argument
-		(and current-prefix-arg (not (equal '(4) current-prefix-arg)))
-                ;; Exclude-sub-entries if no prefix arg or any prefix arg
-                ;; other than the universal argument
-                (or (null current-prefix-arg) (not (equal '(4) current-prefix-arg)))))
+  (interactive
+   ;; Exclude-sub-entries if no prefix arg or any prefix arg
+   ;; other than the universal argument
+   (let ((exclude-sub-entries (or (null current-prefix-arg) (not (equal '(4) current-prefix-arg)))))
+     (list (hsys-consult-grep-headlines-read-regexp
+            #'hyrolo-consult-grep
+            (format "Yank HyRolo %s matching regexp"
+                    (if exclude-sub-entries "entry" "tree")))
+           ;; Enable `regexp-flag' if any prefix arg other the universal argument
+           (and current-prefix-arg (not (equal '(4) current-prefix-arg)))
+           exclude-sub-entries)))
   (push-mark)
   (let ((entry (hyrolo-get-entry name regexp-flag exclude-sub-entries)))
     (when entry
diff --git a/hywiki.el b/hywiki.el
index b089cda0..29074410 100644
--- a/hywiki.el
+++ b/hywiki.el
@@ -3,7 +3,7 @@
 ;; Author:       Bob Weiner
 ;;
 ;; Orig-Date:    21-Apr-24 at 22:41:13
-;; Last-Mod:     30-Sep-26 at 12:03:56 by Bob Weiner
+;; Last-Mod:      5-Oct-26 at 18:35:00 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -534,6 +534,10 @@ Nil by default."
 (defvar hywiki-file-extension ".org"
   "File suffix string (including period) to use when creating HyWiki pages.")
 
+(defvar hywiki-word-create-exclude-action-key-modes '(org-mode)
+  "Suppress WikiWord creation from Action Key presses in this major mode list.
+Typically used in any modes where the Action Key shows/hides sections.")
+
 (defconst hywiki-word-regexp
   (format "\\<\\([[:upper:]][[:alpha:]]+\\)\\>\\(?:%s\\)?"
           (regexp-quote hywiki-file-extension))
@@ -940,21 +944,21 @@ valid values."
 ;;;###autoload
 (define-minor-mode hywiki-mode
   "Toggle HyWiki global minor mode with \\[hywiki-mode].
-HyWiki minor mode automatically highlights and turns HyWikiWord references
-into Hyperbole implicit buttons that either link to HyWiki pages or activate
-typed referents such as bookmarks.
+HyWiki minor mode automatically highlights and turns HyWikiWord
+references into Hyperbole implicit buttons that either link to HyWiki
+pages or activate typed referents such as bookmarks.
 
-HyWiki minor mode has three states as tracked by the `hywiki-mode' variable,
-with the default state when interactively enabled set by the value of
-`hywiki-default-mode':
+HyWiki minor mode has three states as tracked by the `hywiki-mode'
+variable, with the default state when interactively enabled set by the
+value of `hywiki-default-mode':
 
   - :all   - highlight HyWikiWords in all editable buffers except those
              with a major mode in `hypb:exclude-major-modes'; also
              enable `hyperbole-mode' minor mode if off.
 
   - :pages - highlight HyWikiWords in HyWiki pages only (Org files in
-             `hywiki-directory'); also enable `hyperbole-mode' minor mode
-             if off. (default)
+             `hywiki-directory'); also enable `hyperbole-mode' minor
+             mode if off. (default)
 
   - nil    - no highlighting, the `hywiki-mode' is disabled.
 
@@ -964,10 +968,10 @@ HyWikiWord references may also include optional suffixes:
     other outline file.  Spaces in the headline must be converted
     to dash characters for proper recognition;
 
-  - optionally followed by :L<line-number>:C<column-number>
-    where the column part is also optional.  If a section is
-    given, the line number is relative to the section and the
-    section headline is line 1.
+  - optionally followed by :L<line-number>:C<column-number> where the
+    column part is also optional.  If a section is given, the line
+    number is relative to the section and the section headline is line
+    1.
 
 See the Info documentation at \"(hyperbole)HyWiki\".
 
@@ -984,24 +988,27 @@ See the Info documentation at \"(hyperbole)HyWiki\".
     (pcase arg
      (:all (progn
              ;; Enable across all editable buffers
-             ;; Need hyperbole-mode
+             ;; Need `hyperbole-mode'
              (unless hyperbole-mode
 	       (hyperbole-mode 1))
              (hywiki-word-set-auto-highlighting hywiki--prior-mode arg)
              (setq hywiki-mode arg)))
      ('nil (progn
-            ;; Disable across all editable buffers.
-            ;; Dehighlight HyWikiWords in this buffer when 'hywiki-mode' is
-            ;; disabled and this is not a HyWiki page buffer. If this is a
-            ;; HyWiki page buffer, then dehighlight when `hywiki-mode' is nil.
+             ;; Disable across all editable buffers.
+
+             ;; Dehighlight HyWikiWords in this buffer when
+             ;; 'hywiki-mode' is disabled and this is not a HyWiki page
+             ;; buffer. If this is a HyWiki page buffer, then
+             ;; dehighlight when `hywiki-mode' is nil.
             (hywiki-word-set-auto-highlighting hywiki--prior-mode arg)
             (setq hywiki-mode arg)))
      (:pages (progn
                ;; Enable in HyWiki page buffers only
-               ;; Need hyperbole-mode
+               ;; Need `hyperbole-mode'
                (unless hyperbole-mode
 	         (hyperbole-mode 1))
-               (hywiki-word-set-auto-highlighting hywiki--prior-mode arg)
+               (hywiki-word-set-auto-highlighting
+                hywiki--prior-mode arg)
                (setq hywiki-mode arg))))))
 
 (defun hywiki-mode-around-advice (hywiki-mode-fn &optional to-mode)
@@ -4321,6 +4328,14 @@ For example, BASEBall would become, base-ball but BASE would become base."
     (string-trim (downcase str) "[ \t\n\r]+" (format "[%s \t\n\r]+"
                                                      separator))))
 
+;;;###autoload
+(defun hywiki-word-action-key-creation-allowed-p ()
+  "Return non-nil iff current major mode allows Action Key WikiWord creation.
+The variable, `hywiki-word-create-exclude-action-key-modes', is a list of
+modes where Action Key WikiWord creation is disabled, typically in outlining
+modes where the Action Key shows/hides nodes."
+  (not (apply #'derived-mode-p hywiki-word-create-exclude-action-key-modes)))
+
 (defun hywiki-word-activate (&optional arg)
   "Display HyWiki referent for wikiword at point.
 If referent is a non-existent HyWiki page, create it.  When this
diff --git a/kotl/EXAMPLE.kotl b/kotl/EXAMPLE.kotl
index 54391c36..37a4f06a 100644
--- a/kotl/EXAMPLE.kotl
+++ b/kotl/EXAMPLE.kotl
@@ -259,9 +259,18 @@
                toggle display of blank lines between cells as well,
                e.g. {C-u C-c C-o}.  Try it now.
 
-        3b14b. A click or press of the Action Key within a cell's body, but
-               not on a button, toggles between hiding and showing the tree
-               rooted at point.
+        3b14b. If you have enabled `hywiki-mode' with a setting of ':all'
+               buffers, then a click or a press of the Action Key on a
+               potential HyWikiWord creates and opens a blank wiki page for
+               the word.  If it already exists, then the existing page is
+               opened.
+
+        3b14c. A click or press of the Action Key anywhere else within a
+               cell's body, but not on a button, calls the value of the
+               `kotl-mode:action-key-default-function' variable, which
+               defaults to doing nothing, to avoid confusion with HyWikiWord
+               activation.  Set it to ‘kotl-mode:show-or-hide-tree’ if you
+               want the old Koutliner behavior.
 
       3b15. Cell Identifiers: Permanent ids are associated with each cell
             and can be used in hyperlinks that are maintained as cells are
@@ -489,7 +498,7 @@
 
 
 "ben" ;; kvspec:current
-78 ;; id-counter
+79 ;; id-counter
 alpha ;; label-type
 4 ;; label-min-width
 ". " ;; label-separator
@@ -497,7 +506,7 @@ alpha ;; label-type
 
 ;; depth-first kcell attributes
 [[0
-  (creator "rsw@gnu.org" create-time "20231105:21:29:07" id-counter 78)]
+  (creator "rsw@gnu.org" create-time "20231105:21:29:07" id-counter 79)]
  [2
   (creator "rsw@gnu.org" create-time "20231105:21:29:07")]
  [3
@@ -558,6 +567,8 @@ alpha ;; label-type
   (creator "rsw@gnu.org" create-time "20231105:21:29:07")]
  [24
   (creator "rsw@gnu.org" create-time "20231105:21:29:07")]
+ [79
+  (creator "rsw@gnu.org" create-time "20261006:04:24:06")]
  [25
   (creator "rsw@gnu.org" create-time "20231105:21:29:07")]
  [26
diff --git a/kotl/kcell.el b/kotl/kcell.el
index 0e9c67b8..9ff318f1 100644
--- a/kotl/kcell.el
+++ b/kotl/kcell.el
@@ -3,7 +3,7 @@
 ;; Author:       Bob Weiner
 ;;
 ;; Orig-Date:     1-May-93
-;; Last-Mod:     31-Jul-25 at 20:35:20 by Mats Lidell
+;; Last-Mod:      5-Oct-26 at 15:40:43 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -198,7 +198,7 @@ Augment capabilities not yet implemented and ignored for now:
 		     (concat idstamp-string kviewspec)
 		   (string-to-number idstamp-string))
 	       kviewspec)))))
-	
+
 (defun kcell:remove-attr (kcell attribute)
   "Remove KCELL's ATTRIBUTE, if any, and return modified KCELL."
   (let ((tail kcell)
@@ -237,12 +237,14 @@ Augment capabilities not yet implemented and ignored for now:
   "Given a kotl CELL and IDSTAMP (an integer), return a kcell-data structure.
 If CELL, its idstamp, or its property list are nil, this repairs the cell by
 assuming it is the cell at point and filling in the missing information."
-   (let ((plist (kcell:plist cell)))
-     (if (and cell idstamp plist)
-	 (vector idstamp plist)
-       (kcell-data:create
-	(kcell:create plist)
-	(or idstamp (kview:id-increment kotl-kview))))))
+  (if (kview:is-p kotl-kview)
+      (let ((plist (kcell:plist cell)))
+        (if (and cell idstamp plist)
+	    (vector idstamp plist)
+          (kcell-data:create
+	   (kcell:create plist)
+	   (or idstamp (kview:id-increment kotl-kview)))))
+    (error "(kcell-data:create): Invalid `kotl-kview': %S" kotl-kview)))
 
 (defun kcell-data:idstamp (kcell-data)
   (aref kcell-data 0))
diff --git a/kotl/kotl-mode.el b/kotl/kotl-mode.el
index 107a59bd..5a327a35 100644
--- a/kotl/kotl-mode.el
+++ b/kotl/kotl-mode.el
@@ -3,7 +3,7 @@
 ;; Author:       Bob Weiner
 ;;
 ;; Orig-Date:    6/30/93
-;; Last-Mod:      1-Oct-26 at 18:31:22 by Bob Weiner
+;; Last-Mod:      5-Oct-26 at 23:36:48 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -41,6 +41,17 @@
 ;;; Public variables
 ;;; ************************************************************************
 
+(defcustom kotl-mode:action-key-default-function #'ignore
+  "Function run by the Action Key in `kotl-mode' when no other context matches.
+Set it to `kotl-mode:show-or-hide-tree' if you want the old Koutliner behavior."
+  :type 'function
+  :group 'hyperbole-koutliner)
+
+(defcustom kotl-mode:assist-key-default-function #'ignore
+  "Function run by the Assist Key in `kotl-mode' when no other context matches.
+Set it to `smart-scroll-down' if you want the old Koutliner behavior."
+  :type 'function
+  :group 'hyperbole-koutliner)
 
 ;; Derived from `org-cycle-emulate-tab'
 (defcustom kotl-mode:emulate-tab nil
@@ -53,12 +64,12 @@ t           - Everywhere except in headlines
 exc-hl-bol  - Everywhere except at the start of a headline
 If <tab> is used in a place where it does not emulate global <tab>, the
 value of `kotl-mode:tab-flag' determines what it does."
-  :group 'hyperbole-koutliner
   :type '(choice (const :tag "Never" nil)
 		 (const :tag "Only in completely white lines" white)
 		 (const :tag "Before first char in a line" whitestart)
 		 (const :tag "Everywhere except in headlines" t)
-		 (const :tag "Everywhere except at bol in headlines" exc-hl-bol)))
+		 (const :tag "Everywhere except at bol in headlines" exc-hl-bol))
+  :group 'hyperbole-koutliner)
 
 (defcustom kotl-mode:indent-tabs-mode t
   "Non-nil means {\\[kotl-mode:tab-command]} may insert literal tab characters.
@@ -2660,46 +2671,47 @@ With optional NEXT-CHAR-VISIBLE, return t only if the following char is visible.
 ;;; ------------------------------------------------------------------------
 
 (defun kotl-mode:action-key ()
-  "Collapses, expands, links to, and scrolls through koutline cells.
-Invoked via a key press when in kotl-mode.  It assumes that its caller has
-already checked that the key was pressed in an appropriate buffer and has
-moved the cursor to the selected buffer.
+  "Collapse, expand, link to, or scroll through koutline cells.
+Invoke via a key press when in kotl-mode.  Assume that caller has
+checked that the key was pressed in an appropriate buffer and has moved
+the cursor to the selected buffer.
 
 If key is pressed:
  (1) at the end of buffer, uncollapse and unhide all cells in view;
  (2) at the end of a visible line, call the `action-key-eol-function';
- (3) between cells or within the read-only indentation region to the left of
-     a cell, then move point to prior location and begin creation of a
-     klink to some other outline cell; press the Action Key twice to select the
-     link referent cell;
+ (3) between cells or within the read-only indentation region to the
+     left of a cell, then move point to prior location and begin
+     creation of a klink to some other outline cell; press the Action
+     Key twice to select the link referent cell;
  (4) on a | character within an Org-style table, toggle Org Table minor mode;
  (5) in an Org-style table, wrap the table cell or region;
- (6) within a cell, if its subtree is hidden then show it, otherwise hide it."
+ (6) within a kcell, call the value of `kotl-mode:action-key-default-function',
+     which defaults to doing nothing."
   (interactive)
-  (cond	((kotl-mode:eobp) (kotl-mode:show-all))
-	((kotl-mode:eolp t) (funcall action-key-eol-function))
-	((not (kview:valid-position-p))
-	 (if (markerp action-key-depress-prev-point)
-	     (progn (select-window
-		     (get-buffer-window
-		      (marker-buffer action-key-depress-prev-point)))
-		    (goto-char (marker-position action-key-depress-prev-point))
-		    (call-interactively 'klink:create))
-	   (kotl-mode:to-valid-position)
-	   (error "(kotl-mode:action-key): Action Key released at invalid position")))
-	((and (/= (point) (point-max)) (= (following-char) ?|)
-	      (or (org-at-table-p t) (looking-at "[| \t]+$")))
-	 ;; On a | separator in a table, toggle Org table minor mode
-	 (orgtbl-mode 'toggle)
-	 (message "Org table minor mode %s" (if orgtbl-mode "enabled" "disabled")))
-	((org-at-table-p t)
-	 ;; Wrap the table cell or region
-	 (org-table-wrap-region current-prefix-arg))
-	(t ;; On a cell line (not at the end of line).
-	 (if (kotl-mode:tree-collapsed-p)
-	     (kotl-mode:show-tree)
-	   (kotl-mode:hide-tree))))
-  (kotl-mode:to-valid-position))
+  (unwind-protect
+      (cond ((kotl-mode:eobp) (kotl-mode:show-all))
+	    ((kotl-mode:eolp t) (funcall action-key-eol-function))
+	    ((not (kview:valid-position-p))
+	     (if (markerp action-key-depress-prev-point)
+	         (progn (select-window
+		         (get-buffer-window
+		          (marker-buffer action-key-depress-prev-point)))
+		        (goto-char (marker-position action-key-depress-prev-point))
+		        (call-interactively 'klink:create))
+	       (kotl-mode:to-valid-position)
+	       (error "(kotl-mode:action-key): Action Key released at invalid position")))
+	    ((and (/= (point) (point-max)) (= (following-char) ?|)
+	          (or (org-at-table-p t) (looking-at "[| \t]+$")))
+	     ;; On a | separator in a table, toggle Org table minor mode
+	     (orgtbl-mode 'toggle)
+	     (message "Org table minor mode %s" (if orgtbl-mode "enabled" "disabled")))
+	    ((org-at-table-p t)
+	     ;; Wrap the table cell or region
+	     (org-table-wrap-region current-prefix-arg))
+	    (t ;; Within a cell line (not at the end of line).
+             (when (fboundp kotl-mode:action-key-default-function)
+	       (funcall kotl-mode:action-key-default-function))))
+    (kotl-mode:to-valid-position)))
 
 (defun kotl-mode:assist-key ()
   "Displays properties of koutline cells, collapses all cells, and scrolls back.
@@ -2717,27 +2729,30 @@ If assist-key is pressed:
      a cell, then move point to prior location and prompt to move one tree to
      a new location in the outline; press the Action Key twice to select the
      tree to move and where to move it;
- (5) anywhere else, invoke `smart-scroll-down', typically to scroll down a
-     windowful."
+ (5) anywhere else within a kcell, call the value of
+     `kotl-mode:assist-key-default-function', which defaults to doing nothing."
   (interactive)
-  (cond ((kotl-mode:eobp) (kotl-mode:overview))
-	((kotl-mode:eolp t) (funcall assist-key-eol-function))
-	((not (kview:valid-position-p))
-	 (if (markerp assist-key-depress-prev-point)
-	     (progn (select-window
-		     (get-buffer-window
-		      (marker-buffer assist-key-depress-prev-point)))
-		    (goto-char (marker-position
-				assist-key-depress-prev-point))
-		    (call-interactively 'kotl-mode:move-after))
-	   (kotl-mode:to-valid-position)
-	   (error "(kotl-mode:assist-key): Help Key released at invalid position")))
-	((not (bolp))
-	 ;; On an outline header line but not at the start/end of line,
-	 ;; show attributes for tree at point.
-	 (kotl-mode:cell-help (kcell-view:label) (or current-prefix-arg 2)))
-	((smart-scroll-down)))
-  (kotl-mode:to-valid-position))
+  (unwind-protect
+      (cond ((kotl-mode:eobp) (kotl-mode:overview))
+	    ((kotl-mode:eolp t) (funcall assist-key-eol-function))
+	    ((not (kview:valid-position-p))
+	     (if (markerp assist-key-depress-prev-point)
+	         (progn (select-window
+		         (get-buffer-window
+		          (marker-buffer assist-key-depress-prev-point)))
+		        (goto-char (marker-position
+				    assist-key-depress-prev-point))
+		        (call-interactively 'kotl-mode:move-after))
+	       (kotl-mode:to-valid-position)
+	       (error "(kotl-mode:assist-key): Help Key released at invalid position")))
+	    ((not (bolp))
+	     ;; On an outline header line but not at the start/end of line,
+	     ;; show attributes for tree at point.
+	     (kotl-mode:cell-help (kcell-view:label) (or current-prefix-arg 2)))
+	    (t ;; Within a cell line (not at the end of line).
+             (when (fboundp kotl-mode:assist-key-default-function)
+	       (funcall kotl-mode:assist-key-default-function))))
+    (kotl-mode:to-valid-position)))
 
 ;;; ------------------------------------------------------------------------
 ;;; Structure Editing
@@ -3869,6 +3884,13 @@ With optional SHOW-FLAG, expand the tree instead."
 	   (setq start (1- (point))))
       (outline-flag-region start end (not show-flag)))))
 
+;;;###autoload
+(defun kotl-mode:show-or-hide-tree ()
+  "Show all of the tree at point when collapsed, else collapse it to one line."
+  (if (kotl-mode:tree-collapsed-p)
+      (kotl-mode:show-tree)
+    (kotl-mode:hide-tree)))
+
 ;;;###autoload
 (defun kotl-mode:show-tree (&optional cell-ref)
   "Display fully expanded tree rooted at CELL-REF."
diff --git a/man/hyperbole.info b/man/hyperbole.info
index 760c0eeaed49fef31388845d56e12a78f3288903..e3b7653ef702ab7f1ca2238acffc39fea4848759 100644
GIT binary patch
delta 9544
zcmb_ieRLG%xj(bn*_nBhkWdm5LP9113;`B)c4lXHA}WaTDJp8^^cE$XWRk2TyUXr|
z5cRtFaVl895gvOF+7DZ`YEeWP@e5EyYVqq9>qq@Ut6ptY?D4ie_Nw>y&ddhtJ?-ru
z<s6;e=Y8JyeV*U*Jiq6iceCx58Gqg}<NBKfbNl9;ESQ(eiX$t+=I_o>yM_vCI#W=S
z>Y|aXo$JaB*j!e~q-Qd9^j~*!V1TOkigl?%zkQ6nEkBsd6~dWZUpU!aNM+LD)%HlZ
z-%j?V(tY9Hp|mS(Q`aVQsbtrHJyRX-Pj&YnvqF#En;aS_<kdn(?a5#kx27LY=lLGt
zh9F(sBeeW0t<2|B`NF@_%9QYfatdw?)Y5M^22N^K?RD4y_Io}q8d;HAom!E}_2g%%
z>U_YMr^v>@^kOpI<7u=_<M2=G9~p*XI1LE<Gnv)l?o7I1uPcPJ?d@&q;84Dx=Ip{y
zE)96n;dE+1?aky=0L6jx7UBU|n=II~nD_n6Ou<eUQptgt9MbTJT?m(KQx`QKwM$Lr
zY_%Wu4A?zt*9aE1)f6>95v;GBsZPgKjC#fm!;Ov(=jI_Hc>?`>W1xRkch1I+`M>My
zsBvv22l*Pu=8C%lPaHs#8Mb@iaGRfbZPTdg0imS}0Khuc1<Kp0wAjA_Emd9IOU4c%
zM!&i$FpjRdD)7-XH}6mN1Bt>Ijo~-2qT(mQ_$t(m50q;it>4aS1Hfr`hcI*BWHpsm
z2a{>wig3D)WOJFmTyk)bC&^%@$IjDj!+{n-rKg4is=(;|;lO0NaK!yQV_jehM$TLp
zXi*tQVV;}7>QZ||^;0CT4x=g&HhTQgz(l%dU7!++JiHF`Rr)P|Fw!m%TFMG-DybuZ
z)>f9y*=vy-dG(B3pUO>8dvlpVHJ=?w6?pEd)H4#8ig{O!1RAl*9V3Bue0y;uP$#I)
zha-WGs&X$9(@#f!xE@dF=s@PR9g`|;p2`{YvyB0>1^L@+=dkOnV`d(kSu}59*%X?c
z3xu4l-w!<gJ0V9c4~HhwoH=C^sCieYvFNi0Pg0*YKpA$v#28-UFHWo3TnfdpG&58f
zNTuzZy4KF+kz)CoUcn4!h6Z|&nSFhn>+Hg?ZKu_Ie`c6_&g-&2#p%l}ghI}?)nq}<
zf|`nj<5g$@y4=ikW>_7`45{78v^tcxU0r|~&KE|oD4)gFrt+z-6c9zEM!I21pPEUl
z7tJ|m-pMEaJF+5Q08N4v7WcX<Atu1bUC6bcb=m#NwQyvn3L4D}4%)?Z!5z-qUXVNn
zfN>>uRnvCTTcIlh1|L*2y?g>Y%Is~(#M!VnoK1GGPWIVtrKofx1yZnlxF1+>$C5og
zY6|;h__rKGYseSV$pP36DOZK%JoYn3A;DI#CDp5za)2jRn+k@4!JG)%I#A<n+@iF%
z4+j-9@*I~Wpv<NU$$`{`pdro@yl|4EQJkqJSEki@Za-l>`+--Ur~bfz>ah@%)Aq1m
zt!ftDVGih#Th)&b{i(iw0PKQ`pfC)iG3wb@pw47)>Xjd6%kW>&`7kT~GDDkJ2~j$*
zN?1TuokF6@%UjM3g=AlTCavfcj-xx?6UWl_x5Wztof;2|3j#(vZBGgb+Im?0E=c7s
zhs7m|*{&|gaDJohT|!-XzC_W};xzb<*bzvyQ%g7I9DHAt>BD!#s9;g!yW&e_TBMyW
z>JeI7{!yO>a_G+U9ud_GICuY(J^83NrSvJ4*WYc)qh@PbJH6f`98cH(PJEKXR7JnH
zg?5fr1-0}F9kjAnII&z!j&4G?_rkwyr%>r37VHyd)1~i;ZIa&3D<DIieZqYDX`e7D
zFwG$KeQ^!deE?`9-GV}Qzb_65CWj<Nmwq5lp*!Be&{aLcxPKCu^S=qqKR5=A+B{lU
z|1U7k`2P|&oZQ6Yz|$KO2Zn53eQm2Vg@G_HgbtU&=+$DVywN=al_=~RCm*_WyI4m@
znnIJDaWg_jfW~eJ)zJ^H2`S;#-Sz;Q`TyDFsKLi>cf!M=#tDDda$56X$lR1}t#FFr
zQ0uD!&7!BiCogl3grrat6<<|E=dY8c+t-COtDQ|(Y5Nz#MCXaE(gz{Ibnd!MVp2el
zI6Lo>&MQN%)@+kD2)c92Hc2d_O9olUxpTX8jSP|bu%s}-aOUoly2^yObKBF>f(m-|
zHK~HGJS0_8?eFCp>byy6bfSl(Uk2O}M|xR$PryDOzan)DTvS6nuSr9wu;s5w<D8FQ
zlhy=;IQ`~zNfp&O+KC<X<90boa~qV9)BT3DFF?1xg|$BovnIOrLzL7Wi7h1cR4L?4
zdRsbIaQ!3U9qhXKurx9T9#kEXHiRtQ^>yyuLOt!ABUh37DOBD*A|0#^L=9(KNd8RX
zAAUSWZWigj!%B$ukCQJ87!g`hBX2~4AF7eBMA5ITl{e7hS@IaVXuMoOU)9PP`qOxM
zEL}2QUI$M3^LTlKV9@$HJakg(p&dy|A)<Quaw=YnPwE8ua%lW?g1iAh)2s%pYtqgJ
zOt9#riFm~60DnYjc_SV%dW}C!>TbefUoT}L`m6~{MClJray?x$Nq&erRYjuHnmvPG
zXok8)t6St|TBpjXfEA;G7I_j~@E|LviWd2NEQZky@al6s=<6rt5M9<PUml1>>5^7i
zrMAiPy)>f%IIWy4m(!8S@-A3)*A&+deJbW`JA^rVr^2c0FNRY~j>D%hoAK$__=JU5
zv_UsUZ{tDt-3&O>(_Hx<r$KOHH=J1C4s*=}T{B&tO6}9-F4%naboojytDON*bh>2*
z7KzevGhJKnohe^Qw~mn|Iw6d;EZQ4(<x6H^$+xoD`;}Sp6_B4d8?)o|-fVYvIwEh7
zjTn!As*6@_mZs7XK{?M^ugNc0kh&|>08$fTQd6~IaHYSk>xuL=VdeR4p$YV4kS(L^
zN|`z5o+u9rggTr^^V;w~j4Y(i3OTgpJh937%}Mf`ZC<7A>XUD*@bYPSK|bhxdP$Vd
zcGeEb#WG%;b4TPFr+h@-FP6t#E8XKVy=5z{cYJk;JQg{)^LqJv0nspF9%8RFQMDkI
z)9!A-deS3Or!!%bd{`7T=dU-*tyOM{IFs*`Z!N1dH15%Sk65VX9M()HZIjLeI7{yV
zIB`0}A2B-b7w+SI{)ju7ZL(C06disNU(KESWHW$o@%>!K*|T4sAP5QPwWsBBUiR-l
zBOg!@q<as!OC(-$m)QG~{Hb4zGhddgNoi(vbl(@!M9N&GNX}O;%T5q$?tEQ-Q81ki
zZ^)S-HJ=B6zC4UX;-5l2sbpU!O>dr{G}FN&@`cXScjbpe9<0CnP_8I*3rp<D40R3A
zURi0{lnsegJx*e@eu45GXZ^?WO=I9&?f=LxN~X(oHbqWXTA>%D>$fQ@-FkF}zLZZ7
z1`Lf(4=DBYhM;7GsIx4fYz%PW89}9i{uopSVP>bO93Suu_>rVM5`f-HrmO-Q^k})V
zLD3@|Z97+>&#q<lR9yxtR4<S#>Fc}MxwPkNWbSV(l*@S4uc}l~_09*CN|Mvz;wq(q
zKYOZ`hBD8rE5<2z%h(~(sC>zvv!+7T%^zp;amoroFr1Iuly3=wwWVF*^}Z1g#pAiY
zRDs6oYzpnUmbE&a)0J8Qky<-L>E_SZW-3nvvEnV7vQhv*UqltJeu8~DJL}or+0FW3
zPlcg$fRCMprqU9^l++yM59kWcxpS4z%Q#=2c8YR-nM*&;_JvA~5HcchH%tE-tfNzR
zffplDsgcz0Dl)BKqR3A3V&xs!>;#r7cZ)9bI6KZ%G9gfpGi8NRqm;!WCOuy%&!873
z$Sbi2)sMj!<c>^Ly-JNs_H=Irz`SRSJk6P#R6eSPsWWoQbAf;vrML4+jZ-zGBttGq
zIcqOMh`hdV<6na4F&8U)%7NFm4S+4-#5V$Zm&Bx09*6Aie$qm$g^E`x?~5958}!*`
zxzUT}ea8dO2fnWy2zX?7*|iGD&Iw(ov?!h=e6!*ap|kU5<tJqr{LWV8K(H#2;JLBd
ze{oT1-WX*f{V2<VTP7;q&iy}Db_-Q_Ik9K+w-xs-ql4BoN$mk6;dI@m+#!V$Zg!P2
zSfnGz!>a59!1UklR@Nggd2@OD7s}<8akuL6TCy5vb6TEPR5#rL(#P9)o<&K%&-ML=
z`;_Hn2<y8$lvgB|rk%ZyDBnh!amH?ZOgRYqKYUENi>Jv=yZtnw);;jrbZ+0Hd?a#U
z73T;0m3L2Y>(RL^$bKSJn6A709dz+2bi<9n6P&x!BmNyBc2KZry~JFuS7f%q3(ppr
zJ?oWMzrxZ1SKE2LoRLt;lS;*1l)5%$57U}w<T_NbOx5e;l{9+^4hO;*Hc;(N&P`&=
zMM0;1lNoQt%cigw>5i#v49%R%E`t2dsgNf~JC1GeId%EYV6F4(<Jes?^e>t1PLm?c
z>o(5j2>UvK#OA2dJzHG@32nJcZgk$%*_R?*dELU4sAG4qD+2iX(Hy>klRts&4)_&$
z)`I!e5|F0Q+-=fI&KGmxH1Ao$StQ&j)$#PIqV+qZR@yWV@Wh<XliBgO&vUjeVfTk%
z))~t&gLhaVPnw3~4`wKI#<MU(J&TR-g8q+l*(RRZv$`1Xe>=NiMx0LScKtcvKAhz}
z>=SSY&F#f<Xx$P$-^(s_+p3r^;2o0=zk__4G^}*ekxn_}ywk_FikMIwWE%nrjn)sc
zI!8^jXTewWNd~L9N0N)P3^}o74d2q)xQ3lCh%OycRUEdya7gYA7$&XB1M>vuVrpK(
zR5ylhnS&CqD8TBdQ!&KCXbn!s2)l*n<|`MoL(I#~`>$lRg5n)pzkSwe9-!5EAW*%L
zh0u(s?rPY>PjAl8u7;lhOQ-C0tk${fTJ}brpwWxB<I63#vr|gTtXQ$)=rZ)e?M!mC
zI~n8bI_KxCMxGHj4R)5@+o9$M?OdN-v|^f-@FaM1&kor9Y7|maGwGu3tm!*(BjOF?
zejvTNXqj3(>IwRMLCo?6wl7G;VxGooPY{oqzJ_=6TD0PZX3%Hb*|?$^vpn7Yk!%=m
z^88h~XeA;E%@Z$9_hxX_*aJ(ktZzzRdMF>x4(0p9-u*Ae5)pp_?ygdN4(=!*wshaQ
zY_ibZA0Ev26)nq%`$BtwF2A3R>o<{rE+{>A*HB-doeSr2lhBPlt%Mf$hIlV==WCIO
zW|$?TbD4n*u2P1&SC<B(rPXt(?6H%KXq^6fKWiv6tq9fcV2wd7g7ax&2Wu&6x~_XG
z;?^Ua#I;*ClP_u!EpGbqTyHo3o{0P3S9kUBt6|8ZTFkcw*2DaK81T3+a(oa-kGeKG
zxMs-C@u_;$gSptD_N3tS&>-%}`G65I{IIw;yM+wj+|Z-Gush$K$=VRbA_?Cfn_o0=
z2^yxiVRuPlmco|m33vD6YJsaIOkWL-g_*a333Dm=0BcsvXv9lXs+ul0NSI*i7`y8M
z*3@7c5kGv%G_HKZU8ycUo`{-s_yJabeq1YsY<PG$Jd_*2C}2FA2mR?JZm1x%bRV0+
zWNKhE`LqaX!q)~vhf_V!wJgiCmkysTj^l40l_J7{dc62SR?h&A=3&FfYbuHw{`o+-
zGvI=z>1Kppd62dA#u9!aA9DrC6%sKY&HfR1W{3IZ733%%-%y;z!f2?t6y)LrY&xC4
zu=|%y>dEe}Aqaz}#{k!=oosxwX~eX@)j9{az+5L01IV;n2sFw_z^I87q(`NIx)9$C
z%{2X4^ZCU&Ck05&xaCVv9#NOs=^+SXrlB7dp2kT+)8kq+O3e;yK0h9Xv!0chb4o7R
z*N6K>sGzb8f8Z<|A#tS!42k;EQ*57&G$R@VrFe^++LPk<zC{h`XvS%)!zQ=r36zPy
zhX(<_kz0nSLM;}xEPC5v6Y4AtJmjfy+krt0fi<Z5A=VT`6~#z<h}GA__0nqIeR@$d
zBSs9V`4DReYEdIW#fMm}s2QLQdTS`q0Q}6TZsObW3j^a3eN&GCO}-VSFAPjX^i3nG
z>GbtOY+}$z=y95~i`BQFSo}ouHgYeyIf5|FjG0hdv5Pe|VfPYJzTPrUh?*IXMKro$
z7i*jpk3{qmLM0tHJaNsyssC5ISi`D><<qjSuy7!g&%5;=k4H-^&sRR%F3c`!aZ8Jq
z@@vruzd$W&2^4NAnu|u}<A)#cAH<pwkI*R(GqnL_=tDeusa@18!!UKa<Y6|Un1~!3
z0(Cxai*b()e=Rc-_w7p!;zqQiG~drND;`gjlFv&?+)|(6-JA32@kG3|^SmMaCO9<M
zW#`;Pv8+fm;Tu)GxCf_#!EC-5<>ZQpeNt04UdFem2}YtZ4Q2I}_@-N>OsB((aGY8H
z2nz-+-DI?MR#~eA4J1>9wm-sDQHyD)oU7-QHJ)3HqADXLGnZx7!T@z%E;E$w!BFfd
zcnfeD%#Dj8+2W=8JSUe-=Ry45K%7&zo2`^wCUL7!v8L|`3CpGWW{3b=$?a3uWivUq
zHlopJT#qn1slRMIY>n!cWzyb9(Q*tOef{vGtft<KgSx$9SjyWp5Q$nmM=Kv=6GQ_P
z&FGDr%IYQ-qk7D;O1g_i&O*n7%uFP3GXdS>;|a7wZzXTki&zwE;AHSO182K0B(8sk
zVIg_9KgMd?;=CDrL(l!)05-*<{CMFGZc5hhNX0DELL8ceU^9F}kwj3pkF$Ew(80J{
z#szBt71}|<uNfNqJ%yuSS_m>-{WzPZ=o;#duSt)`f(@Y}x@6p<x9-C`{qIi>mScWA
z9>FH=wzU06(qurLh!_dKXQjFd;83;S9>_v&=oVhKce8217<i8^+|8yavACb-q^$_H
zVE05^Gc9_4H#<&5`CE)y`h(zws1=FC<J7o^H7>FuM{yXfO~gbWt!xzLP`0RR@yIB3
zF2;{DxM1-Z8Y4Kk(fU0srX(V|2P)n0Qn0162wsJuK9Z59DM?5`ETzcJ$M3e8!PJHR
zLI7a2YrEB08n?aRq8nR@QgCr}a(^yUPf6i-x#S2|wvb-5W-l@cLD5aRZZDfEMp46z
zZmkx_!yH|YYCe_F?Arxkq3Z^CoW9zNJT)~OjV3(-wBi7c(Jxv>L|fO9v^r&;V9lb1
z#>2L>i%sPaTVQ$a8jXEQX@s7EayIDAC)oIMBVxu%MWbD()bUZ&M~s@DWNj=8=JUgR
zL%GC_FmwY!%s$Cl8}x);;@xv>_m^@ETX7sOsPo&r%j-D*XdVi5<|Con8AT)jqUf!t
zp3VQ_KwXyMzq;Xfpgcyw8-A+Onjg6Pp->H-X6<7Wf^b8prTgG?4Ee+89>;Y$9<$;m
zZQaLaC{_Z;cQ<jj9~5gSdr+)`6|lkQ1#-oo{-;<iLmcG?9J=*4;sp4W&=VFy@)R3K
z=Rd`&f-y8^{&i9r4qMdn469*_*CKQY%ZNlgy-Qve<q($ukQbjqep_gllsv#{=-$u8
zu^6(VSi}{C|0IsXE*5CCw96M_1($$5qTYJf?Po1P#KZr3WIt|AkI0I`wa{OWipP|h
zT7-nBp&pMQp<S!LJR~u`Wdif}J`Ecle?_d8im(>+?x|c~8-i7kpc`?IXjXkl;Q};m
zK4%ht>%|L=r~TF4%$={J4RcA&rdh3H`GQ8m@NGGxEmX<p$1opmP7a!ACf@AEj!+F(
zM$G)(-?T!23#<o<#b$N%$pKa_YB+)T3UlX%%DDpCsAt}u`JqY?0vug0{S~XF^M1+d
zf~X5$KmD5cEv~O8VjTY(`kymHmDp1=EcA32lzYz%RdI<K0bs7=#FegHyj90M$u$qj
z+)oXJ?MqfY!^V~2-Nv<IQ{@!UBaSC%E_^}_?aqeAW8Ww@#NBr=8yW{Y!RXX^0Cql}
z3)OH112J<$(Z1HjDH=mhTyu~$(yb#QnJ;P@c*XWC{ag%D)#afIJ~58dp&OvbblDXo
z61pci{dJKej-t?b0@P5|K{ht1YcSo-v$rXPtU{5ZD|rh)|3i0g-2{qUWz(%wkx>Tv
zg63-s+#>P7=y6!*E;8d$ncI)TF}z)m+!?BN1<>Gjja`@-%&Z<#7bfwh!1-PCCT8vl
zjp1usMyZxE&$2P-mWfh~EB;&J0l|qCRdn~WU_Bj&S4JQ24^31dH=}sncKeFDU<iLD
zW2^X!o7F`e(z$ij&#{_`CV0?S;lCa)PWRaBiU#^TFgocuR^QCa&R4(@tlQ2Od?lQc
L<A7!Db1d<{ocg=<

delta 8135
zcmb7J3zQV)l|I$as-J-wU|;}en3{o6P+IEURro|jL3t@E#|Vi%Gd(jMX1bexh!Y--
zVgzH1B04uwNg!FW>zY+LBve#H2t=dun)r@HAtuqNpo!UavwOt-{;Fyqo}4|qo`cnO
z|NGzPcklh{pU<|P^Vr67?!8~ow?0r11$~VuxuPUIaHBRw?&$C6P0OX8w0v_Wy-dz^
z@!w27`CqZzUMi&1a;hZfbD3<(otYNaM})a_&rgLh*URnYlAO!RsjNJ&&@K1nI@5Ab
zI@OuUb_b$Q6IJRd<jUPWo}yx)NnX~IgZ}n%S68|q=gOttOg8Oq`MU7EAxb{got`3h
zW{UaVRKJ`l6=hC=u1;TQE?>&zvZ-FVnC{@e+((uPsSB)`{R=ZoG7EEs&VRgF{_?(a
zWqDQ?9eGk1MV;G)wqbIrT*~#ON|}ySZ*RZ*fh$beOU{Z=i@@l{6(L!WX~l}r1iWop
z5o!*}GVNLsnuymwa2}cBE5XBP(#p`8c$??H<@rOV^((!NKU*1U#oHVH+TT`&+UT(r
zq2V-jRj3AA&tDaqJeGT&YWI?pDRQsnLb_BgWSP5aRcKmmoh(oH<G{_7OF620Aas`2
zS1y(UMmd|yCeF%cde8Ftx^e|17qUt@IfaPboGPWyWsG)jiHschnNT>hN-X;Prvh0-
zh^EV@>zT^+_-wvar<BS6NDn={UHE|7M#Y-x(8iGHmcA3(@%z3~uDiQ8U6k9?rDf@K
zR_@7g<aoXodveS8Z;nh4fQ4MHl<s6z9Kxb&3mg^lvP`K*PUC+7P=Bsm01C^+v<zpx
zmF061=U+49+6z~15N>W=d!ii1zleLH9DN~2JO3EX&>J5`>nQnNG#Sz-)7F$=)4#kI
zy-_eI@_zJ6!K8WbM<>Uv$@0RUbe7fw^+fMS8$-#-)Y1XwWA8_&(YE)a!|93R(HjOj
zg*w{&r|6;%$KT;sjf|-OuVwP(3Y3Go^Fz$5@ucI-r%h57+V?^93+}{Fx~p4gp@w78
zvwU~v9*auDrpU7{0~AnL>1;=uKI|5nfUR4nNh7JLM;ITT1b;8;5t`{&$D&t<49}l2
zw66z};FL&<jz=%0vB!PSRz?s4zv{31|5W||z34yrIJ)kVP^ODMSrHz6HV;Tv<|rs4
z$x}|nA;%NFEQ1UKEx=BOHoqDjMVr>eqI9q=Hr5@g$BYmy_$)ew4qg<ibww-I{HCC|
zlWODFHqq+&Eb87mCH~`ED8D5>!M$=z{0}j~bd{gPSv;gz?)lr|i^It4gWKcl1kIh`
z#-m|8CqEUxPsDS_FX9ptboaS^@%Av)>0-=1_fUL#ji9>u!|~x^Ja2m^{)rGZlatxm
zw3$VlXyuW3+<oY1{5(NW>Gj{m*HP|pyvAMfZoEG<aCtoHF8yPCZ^(V-Pw_c|Z(!|*
z@dt*%h%JAE5w?5of5q!Z#}ow;Wg7gM(Bfw5#C<SVA=WGDH2)*1p5zzeajNZ=YN+_K
zIBuXvYIL6;Bi<9CL#yI3TGS-o7SbI$(j?wVn-0dKlpQawsWogaGt*w`&m)!{G&n(A
zPRpCcbs<Hk70u!pYLdkqg=KL#ZIs1Z1f52=hzJb*0FRKCq{*$~TEU{Nt>QYWohrrX
zq6y*}>Pv{j=n#aVfM!p`2Af{RgD(Dt7^99haSbBzUK{8J<<G>!q`%=YR5eaBhwdp$
zGTpSCEu#Gv#EqFG?g^<5{dSVLmb=n5*^?`rBR12pv&BrvHtCbe;&>vwKq3~_2}$}E
z9yGp;7;K&*Hqx=OG=wgiA}*qy@eumR6bLmO$|l4?I+22PGtPzm&F%2y0RL6dv2)>6
zSZvW-Qz7cv*-|VXM2rT13=``_X)zsBJa2ARJ*8jZL5Ez3yIaFnlZNZ!T57%mvc9j2
zYeKd{59(qY%{0W6Pk!7G*9_G-XsYR;BU717n;sMwAy_+12z>h??7z}NCSmab%X5EW
z5(@`buo$gw7DYOi^kSZ|#XF((QyW?V(qXjD5toaq<%_3>H^$pYnFh%^-91fQ#}vn3
zDVONaZ^c_FH(mO=`{;S%B{lBzGsRxP-F2n-=d*lpZZC-U)%d8ITM_s9zovf`fw=er
zvCf^pTKr+S#uqr<8_cw8gLs*H$?f8|qk`ccyi=Sq9QkuUe^9(56xF#+bbON3G$6%?
zxKC^puZW>q|MN#;Yi&q1+{SGX=Ob(HcI3m$(Hyt>>oxoWh`#c3FZ%D|;c>W2pA<u*
z;9cne7EJf^1ELl3r8t9phx^Q+I9Bi~!F}u3Vm!<XG2W5O7R$XQN{wU9)Vwd=NE?@m
zaaVawTrMFAKY7Q~VjjW6a(5mPKlbaD?tT|Xs;7S^einhsZSRSLQ2EXG#asj(h5q9s
z;1!*va!gzt_d|H}uVPIY)#HBr8Qg^ZBjVCv-1L%=rmLS4TQ}rm5xQ4FhAg*FlomvM
z<DaXMP&)3FL!~<dcjnhhqv_*XsShd_*GcDvd<`2%NKc1Cs!4<O(pa}RN}3^{7M>g}
zt&<cF1?fVGj=m_KLCPaxiJmBmL#ZMG$8R)9w{fc%jgi(u<nPBwDFM&R$4TS(Gj)bE
zE*!EPN;OIK?)vf4Ln7=+oF#oO##EDoh_2ooA49SnuchYOQE<CnkYaAXB8?P0q`3E~
z(n29f`_ykqqd4oxfjv?O_3LoXrq6YW_lr9W{%~tesYCGl#<@>Q&4`OQumxgQ?LzC_
zZAqj2MfY%0dL{x>9z0)KB*YBeGbJApn+Fuu5z<UreIewTu5^(!E#x=uS<|J)7`Aj>
zA$=5Pwzs9Hf0|5x?iB0Y{8iHH;i%ViY3pA^nQNwtE{LDu-ZM`c6GkU;AGt;vD{v_9
zT>zml_KWMJN26Y|ai6$R%Edy4?Y6W_^%5`G<Pr&ORdIJOk-CO^9mY+plwJt=&1S}G
zsm`rgEu~^!%W;c$NM8%4!Ru?KmxmxCk8Y6sQg@yE;Wv;m?*W80s&LC`*ge23Pv$@u
zaGTqV@N6BBeiiZ>7FE87*e2cZgHns+Q_lX8w8s18Zu^n+!!S#FqhJXR;1BE;$CBI-
zXEg5ysnz|bf0n)x!QSSdNb^Fj`<V3IxYvo?>$XcTh0qpTo`hXqXMg-j$mG4#wV&b^
zsx<d$tnt3(9)4Py&Bx>9XQemdEa_pr4<8P6b-mb#;KoUL2!`h$2Jigmr5cXc#lMmU
zy*BC^FGyPi!Jyx~$g@ZtFL}xQ=q2fcs0VmzJSq)w|2QZezCiN3=)8Fe%6=hvP^{qq
zuW|pomgNM$-R6fg-j@G5oDK43eBlT-mX3^Ieg5i#k?eL~?BS7YzyGVPp4Gd*sApdZ
z0Yyy>>|w#1-8;vyf3Ndv?&p)))lrN_HkGX#rhBbCpDOjt&SaNRizYRbJcUi9cc-#j
z5ty{XymLT|K2_KnFGNC~zSzcY6ZGvG+k@{k+B=P{!(+~QZ0!)k@y7qsa;8Mn@8`n4
z5pSmXbELRC@qD&D#9?^&LN+4?ptR1wKGl762D=@oBxNR4@e$$foXMWzl>Vy%O01B{
zcNfrd+TtyA)1bK6y=yibhx+kL`N&tKHv0Z+;zakabJ(%C=y#}Mil$%ACeYjOOXKOL
zcaUx6de#|(r4KBETs|P(35(edUXDjnY{L))y41(KNfaX?3wQa!iN1wj*fcE1y>uzZ
zjth9bV<}!Osx7d!s2caX1vVuX(s2&&XASh*TUegEBD&Z0v$q9idUlpl-7=~7Vp`s`
zMEV-02JKwV)}C4{()78o*Bf}2dvFE&s=!;^)Kv^Ej@(sHn52s<4CQIjixswZs6Q#M
zP2ZBqcI5^ZNaNiVt63P`-Ccb<+sI)&ejR&-p(;MT5Anjl8g@UM>mLZIo!}uqb-5oB
z_sMpD^F8)y1DFnMWj6?tKN}Y=Tu6f##wXGf8(E{9-^PZ+d-t}VvU>3x(^S|s>8@#V
zu`gZdPFEbmu??Tnk?YI%rup}7#W4*<quo1LQ^nLQe>sEtU4j+M(0xL;Pp}j#Afy9=
zUfse=9$T!W9&qsQKrY_0ZPORh)1OZi@om)sQ<AD47{{rp&dx%**jWVKG&P@l7Gjpj
z;x3@#*ovkGc4W)NM7~_?N#M?)#KqfMGT2b^<D9_93dn}y_*+ms9X*M@VmFA00PTK;
zoe@@Sjox{NjcL$qJCIyR=Y1~6Qj=7>lQlSwlQaS;KEkUUwsZQfB0e#D(}}K3Z@Qu?
zifXBp+Q}LtimB;z>rU3PSh1BL@aR>ERKAeQ=ZfG}H9epgx;pr~ZUpa3+B*|V(*2xf
zX-VJ2&UAZwxx1L?&XyDWk_3yIrfT%XPByNhC98q!%oGyEa$jGnz_;tB76cmcDJ4od
zu1B|(fY?#&$mO{t!!!fcX%qrC&ajh#mmLAcRI7Q&bS65wdUMObX6icFMsS?Li9mq~
zsL{VZ%bFvml{9Jpv#hmZCQn8!Q%V4VeR!PwvgDHNWDxCCHk&IY+B5B-TACC1&ymto
z>g!D)h~-o-Uo)%eTefUjqFms#q<UKBd$OrM?p@MQ&{A`|*r*2NF3^%IbSE;MSal4`
zriXU1wv^&nRuG0_t|OD`{W}A(^Au>)g?3yzB?{$iqLeO{5HWaAjTlV*(mG$Zb(LCn
zvzA$k8Q{66e;KZs63cMU1O`>t0_8pZ2tXB5s%qE)#&O<C;B&Uz>#--zffpIRT6eRE
zt?3BGT%cl_e2G^Y^5wuIx60I2Em-kS((<+ZI}IyI-7@L$ZYD=m!!ZVa!6weq6`;)*
zb7>)s>nqfls_W<xRpI^eoOHGfqG1BmfyRD$HZOlwHyzurf7;Y2G$4Pvr5frfw#y2s
z?rziz7Lvebuy9QpdGe@+qC$W#^|Ex(q9DOgt$;eCGgI<efqk1%ofc}2S5yOiz@VBv
zY^(v^lh%5n!1sMto||3<pAGbqs(kJTCporh(hYl9lc5;Zc9!YGE#b7wGq^DG-8E6o
zRd@Y6t%_<ox(b-@VdI(<jym7$({8*fumpC|(LHQ@tEy?$Je*>Y7v$3&Fv8MwOQDv%
zY(i955NtZJCe&~-==w=Op0=qc-J8dnp&^1^hxgaK>r<WxF3>P6gEsADO%W8bO1t;6
zQBf<IG#SnQZfNWU;BfRW*&Mi<L=FADT<GBUKOE#q4I4@QB^z^@WvT&O=KyyL(xs_b
zM&qrfduIP!fEY9c_*CdF&1Fl494ggDRT^~nFPVHbx@Hi(tAg9xLPd4-q#jhhpN-Sk
zOeI+b1kaCrDcT8cH({V->ge((e#x4`m{v6YIo23fO@%Iajx~(4f$u=mtj=O7)t4_;
zG~^B^gY0u`TtsyYmA?HPf~J`|qs?--F%AYp!#&xd=h&IdHqf!XJX1?!xB-i3E_RZ}
zKhIj`puhv+b8<HWqw;jzRcAZFW1NZr$`Yfp8${DFss(UuA(bs+Cin|U1@Wh&*M*z7
ze1ue^Cm{a}+qSE5nsG}$SMcfps8SSzK6;*=fir8cPD^iQBP$gR071+0ad|zzn)l(R
zX(n$eKK&{_xe*2}>6~m7m!@$WJiSyZWH4vZD>Pl>BP`fZ&5=AaQ!M2$W-!Jqrz&q|
z|24VZ9B5IKw`ZEVIXtQbua<ezU7y8=o2ENZ%xLG1@aPLFnt?i~S{$%lmF|ZHhGkmS
zlm`od91j5&F_|2dlowdDWb2L}RoW>=&X`frEDd!Xm_9R?TOwbdDrESbIQCh(qEv<Y
z{SI04+oNV#yq8sT9T_cxJ?Q}5bnNWNL}Vt(Axy%HtThVA!P8r(MPyFLq{B(`MRraj
zJhQ83D(`v>f7n3jYQUjG$DYPnw6Z8t3&|)O<c^vbc@k^`RYV`Y$R;z>wt~LC;nv2c
zq2NS$1{9hudS=;n64gMn^O3O%7;tW@`gBEau2|#;0fa}XB3DM-%K3_}n#rV2kH5r5
zM=cF4ld`{ws3Pb%#6jGq4<l{yimqWS*)(+@OGJ#MVbV?eSVIKe#i8Z<P$!mUtMu?b
zHm=pylhx5ND_cqz_#ag`=F){Cq&Nm@?2Ub_Educt3H!ZjLlm0#vx!mNv@}L)OLPo0
z>Zlf#y7#j)p$C@_>-Vz>5zEvy`uTpGC~O7o`mOz}C1R_lI&grso~hdo4yHajgXwoE
zFvu0_j&25K(R3%;0RM0_L@TG?PK!=}Hp~_r)7Bqg6C<cKg`R{!6V+dpcP)lHFH2Z;
zY6zWdMY0D@q~BCksyoOUqn4Az6{30&{wYbvqIn15pPDq_-=UvIM-8p$Ne!Jl0M@Nf
zM4Mm|mMsT=MA;F=EW;Z=G_^d%Mp9)kick5qVl5}zCK_6mJc?5s9Jo(XV${4fT31ui
zZHx`ShUjQG#u;tRbdogqG9-TW-DnM`7?_wo<-`akdK3pA0v^xDhgd8GY#e+U$BUJJ
ziHcEdNG561Yj{^`V=>zFmuL+q+79IhLA>WK5N{e}!@?MNv~-Z29pR@lU)<Cao=QhG
zaqRXKc<gnN7*DsOVYK?>x?i&q=)BgcSKI{unu!slEHD<@8Q+9?toobgkMb#&g=<|;
zdTvy#j`P?!Oi;@!te%cH1r!WDpXb}nF)0Qf2g#RTK_M!yh%t`<zYo2PJ(WqZx>yB;
zX!?W=iPjNuyrXyn`|f>%MQB%o3o;ZPg5Y;O|9b%fjGkjFp8sculejqYmX5z2MWj*c
z4n_tHYl#4gUbyP%J6FVp@HNNM0>>(^usVE1;A;e4)zjDBiH?LKoFfB8bFYhWgH#lh
zZ_vQ2*nsvEgkk3mF~G(^`D#HT=D&*C#W6dG!Kzo;$cTkcF+U_f=;T2%FmTX(yg<Iw
z6B```1wr$&oXv|Ec?Jef6)BaaF>aKGu}hm@gOxYE1{D}DLAoAa6&uQT=!WLoxZ(S4
zB0cjO8xq1)TmK56^A122!C5lUIr}azd}zPb1ozz)8ybNOo7TV1MpK1iwOpkGKzb^7
zJTLNq>%dXq$<CwEp<qF!+nl9QEb<py50;O=Ac}n1gbAL6$Nnu=&n1}n_VYbIvDJ%(
zj!F$EOWpvuIefewNd53|66bj@uZf+p8ZMAmqepmrR}5VpT^t8QM)&TCwLrXqqk>LN
zZ=#3sq|wE1vic?H9MyI%2gj@qOeVubv#EA*^cZ<owljST$hLX%e06y_>wRNa*Bo@2
Y>gdENt0SE+1xxs-b`bw(-(>dx07Y5^uK)l5

diff --git a/man/hyperbole.texi b/man/hyperbole.texi
index 2c665d02..6a88b341 100644
--- a/man/hyperbole.texi
+++ b/man/hyperbole.texi
@@ -7,7 +7,7 @@
 @c Author:       Bob Weiner
 @c
 @c Orig-Date:     6-Nov-91 at 11:18:03
-@c Last-Mod:      3-Oct-26 at 12:17:59 by Bob Weiner
+@c Last-Mod:      6-Oct-26 at 00:08:28 by Bob Weiner
 
 @c %**start of header (This is for running Texinfo on a region.)
 @setfilename hyperbole.info
@@ -30,7 +30,7 @@
 @set txicodequoteundirected
 @set txicodequotebacktick
 
-@set UPDATED October 3, 2026
+@set UPDATED October 6, 2026
 @set UPDATED-MONTH October 2026
 @set EDITION 9.2.0
 @set VERSION 9.2.0
@@ -171,7 +171,7 @@ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.</P>
 
 <PRE>
 Edition 9.1.0
-Printed October 3, 2026.
+Printed October 6, 2026.
 
   Published by the Free Software Foundation, Inc.
   Author:    Bob Weiner
@@ -213,7 +213,7 @@ MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.
 
 @example
 Edition 9.1.0
-October 3, 2026 @c AUTO-REPLACE-ON-SAVE
+October 6, 2026 @c AUTO-REPLACE-ON-SAVE
 
 
   Published by the Free Software Foundation, Inc.
@@ -2430,8 +2430,8 @@ priority).
 @cindex Action Key, Org Mode
 @cindex Assist Key, Org Mode
 @item smart-org
-@code{smart-org} is not an actual implicit button type, just an Elisp function,
-but it behaves similarly, so it is documented here.
+@code{smart-org} is not an actual implicit button type, just an Elisp
+function, but it behaves similarly, so it is documented here.
 
 Hyperbole recognizes Org mode constructs in any of these modes:
 @code{org-mode}, @code{org-agenda-mode}, @code{outshine-mode}
@@ -2486,8 +2486,9 @@ or #+end_example header, execute the code block via the Org mode
 standard binding of @bkbd{C-c C-c}, @code{org-ctrl-c-ctrl-c}.
 
 @item
-With point on an Org mode heading, cycle the view of the subtree at
-point.
+With point on an Org mode heading but not a Hyperbole button, call the
+function given by the @code{smart-org-action-key-heading-function}
+variable, which defaults to doing nothing.
 
 @item
 In any other context besides the end of a line, invoke the Org mode
@@ -2529,8 +2530,9 @@ With point on any #+BEGIN_SRC, #+END_SRC, #+RESULTS, #+begin_example
 or #+end_example header, remove any associated results.
 
 @item
-Not on a Hyperbole button but on an Org mode heading, cycle
-through views of the whole buffer outline.
+With point on an Org mode heading but not a Hyperbole button, call the
+function given by the @code{smart-org-assist-key-heading-function}
+variable, which defaults to doing nothing.
 @end enumerate
 
 @vindex hsys-org-enable-smart-keys
@@ -2621,8 +2623,13 @@ minibuffer or the other window.
 @cindex hywiki existing word
 @anchor{hywiki-existing-word}
 @item hywiki-existing-word
-When on a HyWikiWord with an existing page, display its page and
-optional section.
+When on a HyWikiWord with an existing referent, display the referent.
+This is the Action Key function that activates existing HyWikiWords.
+Calls to @code{(hywiki-active-in-current-buffer-p)} and @code{(not
+(hywiki-non-hook-context-p))} must return non-nil for this to activate.
+
+Potential, not-yet-existing HyWikiWords are handled by the implicit
+button type, @pxref{hywiki-word}.
 
 @findex ibtypes ilink
 @cindex implicit button link
@@ -3212,8 +3219,21 @@ source reference line again.
 @cindex hywiki word
 @anchor{hywiki-word}
 @item hywiki-word
-When on a HyWikiWord, display its page and optional section.  If the
-associated HyWiki page does not exist, create it automatically.
+When on a non-existing HyWikiWord, create it and display its referent.
+This is the Action Key function that creates HyWikiWords.  Calls to
+@code{(hywiki-word-action-key-creation-allowed-p)},
+@code{(hywiki-active-in-current-buffer-p)} and
+@code{(not (hywiki-non-hook-context-p))} must return non-nil for this to
+activate.  If the associated HyWiki page does not exist, create it
+automatically.
+
+If the associated HyWiki referent is a page, create it automatically
+unless it is the first HyWiki page to be created, in which case,
+prompt the user whether to create it, to prevent any unexpected HyWiki
+use.
+
+Existing HyWikiWords are handled by the implicit button type,
+@pxref{hywiki-existing-word}.
 
 @findex ibtypes hynote-file
 @findex hywiki-active-in-current-buffer-p
@@ -4703,10 +4723,11 @@ editing.
 @cindex HyWiki Action Key
 @cindex Action Key, HyWiki
 The Action Key, @bkbd{M-@key{RET}}, provides a faster way to create
-HyWikiWords to speed your note-taking, if you let HyWiki have priority
-over this key rather than having Org mode split lines and create new
-headlines when on a HyWikiWord.  Simply have Hyperbole override Org's
-control of that key in all Action and Assist Key contexts with the
+HyWikiWords to speed your note-taking in many text and programming
+modes, if you let HyWiki have priority over this key rather than
+having Org mode split lines and create new headlines when on a
+HyWikiWord.  Simply have Hyperbole override Org's control of that key
+in all Action and Assist Key contexts with the
 @samp{All-Hyperbole-Contexts} setting bound to @bkbd{C-h h h o a}.
 This sets the persistent customization option,
 @code{hsys-org-enable-smart-keys} to @samp{t} across all your Emacs
@@ -4816,20 +4837,12 @@ that they trigger only when other types are not recognized first.
 
 @table @code
 @item hywiki-existing-word
-On a HyWikiWord with an existing referent, display the referent.  A
-call to @code{(hywiki-active-in-current-buffer-p)} must return
-non-@samp{nil} for this to activate.
+On a HyWikiWord with an existing referent, display the referent.
+@xref{hywiki-existing-word}.
 
 @item hywiki-word
-When on a non-existing HyWikiWord, create it and display its referent.
-This is the Action Key function that activates HyWikiWords.  A call to
-@code{(hywiki-active-in-current-buffer-p)} must return non-@samp{nil}
-for this to activate.
-
-If the associated HyWiki referent is a page, create it automatically
-unless it is the first HyWiki page to be created, in which case,
-prompt the user whether to create it, to prevent any unexpected HyWiki
-use.
+On a non-existing HyWikiWord, create it and display its referent.
+@xref{hywiki-word}.
 @end table
 
 @node HyWiki Mode, Publishing a HyWiki, HyWikiWords, HyWiki
@@ -6814,10 +6827,21 @@ between cells.
 @cindex cell, collapse
 @cindex cell, expand
 @kindex koutliner, M-@key{RET}
+@vindex kotl-mode:action-key-default-function
 A click or a press of the Action Key within a cell's body, but not on a
-Hyperbole button, toggles between hiding and showing the tree rooted at
-point.  Try it with either your mouse or with @bkbd{M-@key{RET}}.
-
+Hyperbole button, runs the function stored in the variable, 
+@code{kotl-mode:action-key-default-function}, which by default does nothing.
+
+@cindex koutliner, hide/show tree
+In prior Koutliner versions, this would toggle between showing and
+hiding the tree at point; however,now you can use the Org-style tree
+visibility cycling on @bkbd{@key{TAB}} instead.  If you prefer the
+prior behavior, uncomment the setting for that variable near the
+bottom of the Hyperbole @file{man/use-package} reference file when you
+add it to your persnal init file.  Note, however, that if
+@code{hywiki-mode} is set to @samp{:all} then when point is on a
+capitalized word in a Koutline, an Action Key press will create a new
+HyWiki page, as that has higher priority than this setting.
 
 @node View Specs,  , Hiding and Showing, Viewing Outlines
 @subsection  View Specs
@@ -11224,62 +11248,76 @@ When company-mode is active:
 @subsection Smart Key - Org Mode
 
 @vindex hsys-org-enable-smart-keys
+@findex hsys-org-agenda-tags-p
 @cindex Org mode
 @format
 @group
 When in an Org mode context and @code{hsys-org-enable-smart-keys} is non-nil:
   ACTION KEY
-     (1) If on an Org todo keyword, cycle through the keywords in
+     (1) If on an Org tag, call @code{hsys-org-agenda-tags-p} and an
+         appropriate view tags function based on current directory or
+         buffer name, matching to the tag.  If on a colon between
+         tags, match to all tags on the line.
+
+     (2) If on an Org todo keyword, cycle through the keywords in
          that set or if final done keyword, remove it.
 
-     (2) If on an Org agenda view item, jump to the item for editing.
+     (3) If on an Org agenda view item, jump to the item for editing.
 
-     (3) Within a radio or internal target or a link to it, jump between
+     (4) Within a radio or internal target or a link to it, jump between
          the target and the first link to it, allowing two-way navigation.
 
-     (4) Follow other internal links and ID references in Org mode files.
+     (5) Follow other internal links and ID references in Org mode files.
 
-     (5) Follow Org mode external links.
+     (6) Follow Org mode external links.
 
-     (6) When on a Hyperbole button, activate the button.
+     (7) When on a Hyperbole button, activate the button.
 
-     (7) With point on the :dir path of a code block definition, display the
+     (8) With point on the :dir path of a code block definition, display the
          directory given by the path.
 
-     (8) With point on any #+BEGIN_SRC, #+END_SRC, #+RESULTS, #+begin_example
+     (9) With point on any #+BEGIN_SRC, #+END_SRC, #+RESULTS, #+begin_example
          or #+end_example header, execute the code block via the Org mode
          standard binding of @bkbd{C-c C-c}, @code{org-ctrl-c-ctrl-c}.
 
-     (9) When point is on an Org mode heading, cycle the view of the subtree
-         at point.
+     (10) With point on an Org mode heading but not a Hyperbole button, call
+         the function given by the @code{smart-org-action-key-heading-function}
+         variable, which defaults to doing nothing.
 
-     (10) In any other context besides the end of a line, invoke the Org mode
+     (11) In any other context besides the end of a line, invoke the Org mode
           standard binding of @bkbd{M-@key{RET}}, @code{org-meta-return}.
 @end group
 @end format
 
+@findex hsys-consult-org-grep-tags-p
 @format
 @group
    When the ASSIST KEY is pressed, it behaves just like the Action Key except
    in these contexts:
 
-     (1) If on an Org todo keyword, move to the first todo keyword in
+     (1) If on an Org tag, call @code{hsys-consult-org-grep-tags-p} and an
+         appropriate consult grep function based on current directory
+         or buffer name, prompting with and matching to the tag.  If on a
+         colon between tags, prompt and match to all tags on the line.
+
+     (2) If on an Org todo keyword, move to the first todo keyword in
          the next set, if any.
 
-     (2) If on an Org mode link, ID reference or agenda view item, display
-         Hyperbole context-sensitive help.
+     (3) If on an Org mode link or agenda view item, display Hyperbole
+         context-sensitive help.
 
-     (3) On a Hyperbole button, perform the Assist Key function, generally
+     (4) On a Hyperbole button, perform the Assist Key function, generally
          showing help for the button.
 
-     (4) With point on the :dir value of a code block definition, display
+     (5) With point on the :dir value of a code block definition, display
          a help summary of this implicit directory button.
 
-     (5) With point on any #+BEGIN_SRC, #+END_SRC, #+RESULTS, #+begin_example
+     (6) With point on any #+BEGIN_SRC, #+END_SRC, #+RESULTS, #+begin_example
          or #+end_example header, remove source block results.
 
-     (6) Not on a Hyperbole button but on an Org mode heading, cycle
-         through views of the whole buffer outline.
+     (7) With point on an Org mode heading but not a Hyperbole button, call
+         the function given by the @code{smart-org-assist-key-heading-function}
+         variable, which defaults to doing nothing.
 @end group
 @end format
 
@@ -11728,6 +11766,7 @@ When pressed within an occur-mode, moccur-mode or amoccur-mode buffer:
 
 @node Smart Key - The Koutliner, Smart Key - Flymake Mode, Smart Key - Occurrence Matches, Smart Keyboard Keys
 @subsection Smart Key - The Koutliner
+@vindex kotl-mode:action-key-default-function
 @format
 @group
 When pressed within a Hyperbole Koutliner buffer (kotl-mode):
@@ -11742,10 +11781,11 @@ When pressed within a Hyperbole Koutliner buffer (kotl-mode):
      (4) on a | character within an Org-style table, toggle Org Table minor
          mode;
      (5) in an Org-style table, wrap the table cell or region;
-     (6) within a cell, if its subtree is hidden then shows it,
-         otherwise hides it.
+     (6) within a cell, call the value of @code{kotl-mode:action-key-default-function},
+         which defaults to doing nothing.
 @end group
 @end format
+@vindex kotl-mode:assist-key-default-function
 @format
 @group
   ASSIST KEY
@@ -11759,6 +11799,8 @@ When pressed within a Hyperbole Koutliner buffer (kotl-mode):
          left of a cell, prompts to move one tree to a new location in
          the outline; press the Action Key twice to select the tree to
          move and where to move it.
+     (5) anywhere else within a kcell, call the value of
+         @code{kotl-mode:assist-key-default-function}, which defaults to doing nothing.
 @end group
 @end format
 
diff --git a/man/use-package b/man/use-package
index 9dadb164..a1905242 100644
--- a/man/use-package
+++ b/man/use-package
@@ -1,5 +1,11 @@
 ;;; use-package --- Hyperbole use-package reference configuration   -*- mode: emacs-lisp; lexical-binding: t; -*-
 
+;; NOTE: If you use Emacs 28 or earlier, you'll need to install the
+;; `use-package' Emacs package before using this configuration file
+;; since it is not built-in to your Emacs.
+
+;; -----------------------------------------------------------------
+
 ;; Default values herein represent the settings Hyperbole will default
 ;; to if not set within this `use-package' configuration.
 (use-package hyperbole
@@ -93,4 +99,17 @@
   ;;   t   - may insert literal <tab> characters. (default)
   ;;
   ;;   nil - may insert <spc> characters only.
-  (kotl-mode:indent-tabs-mode t))
+  (kotl-mode:indent-tabs-mode t)
+
+  ;; Prior to the addition of Org-style visibility cycling to the
+  ;; Koutliner on the TAB key, a press of the Action Key on a Koutline
+  ;; cell line used to toggle showing/hiding the tree rooted at point.
+  ;; Today, this does nothing.
+  ;;
+  ;; Uncomment the next expression if you prefer the prior behavior
+  ;; but note that if `hywiki-mode' is set to `:all' when point is on
+  ;; a capitalized word, an Action Key press will create a new HyWiki
+  ;; page, as that has higher priority than this setting.
+  ;;
+  ;; (kotl-mode:action-key-default-function 'kotl-mode:show-or-hide-tree)
+  )
diff --git a/test/kotl-mode-tests.el b/test/kotl-mode-tests.el
index a00086d2..4389d719 100644
--- a/test/kotl-mode-tests.el
+++ b/test/kotl-mode-tests.el
@@ -3,7 +3,7 @@
 ;; Author:       Mats Lidell <matsl@gnu.org>
 ;;
 ;; Orig-Date:    18-May-21 at 22:14:10
-;; Last-Mod:     29-Sep-26 at 02:56:59 by Bob Weiner
+;; Last-Mod:      6-Oct-26 at 00:37:17 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -681,7 +681,8 @@
 
 (ert-deftest kotl-mode-hide-cell ()
   "Verify cell is hidden and unhidden on `action-key' press."
-  (let ((kotl-file (make-temp-file "hypb" nil ".kotl")))
+  (let ((kotl-file (make-temp-file "hypb" nil ".kotl"))
+        (kotl-mode:action-key-default-function 'kotl-mode:show-or-hide-tree))
     (unwind-protect
         (progn
           (find-file kotl-file)

From 9d23bac2fdf45ef287a1dd34db45172bd4a808b9 Mon Sep 17 00:00:00 2001
From: bw <rsw@gnu.org>
Date: Tue, 6 Oct 2026 01:17:04 -0400
Subject: [PATCH 2/2] Fix two tests by binding needed smart-org Action Key
 variable

Two tests: demo-org-hide-header-test and
smart-org-mode-on-header-cycles-visibility.
---
 ChangeLog               | 6 ++++++
 test/demo-tests.el      | 5 +++--
 test/smart-org-tests.el | 5 +++--
 3 files changed, 12 insertions(+), 4 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 0a81c6e8..13311ac8 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2026-10-06  Bob Weiner  <rsw@gnu.org>
+
+* test/demo-tests.el (demo-org-hide-header-test):
+  test/smart-org-tests.el (smart-org-mode-on-header-cycles-visibility): Bind Action
+    Key variable needed for the test to restore prior Hyperbole Org mode behavior.
+
 2026-10-05  Bob Weiner  <rsw@gnu.org>
 
 * hui-mouse.el (smart-org-action-key-heading-function,
diff --git a/test/demo-tests.el b/test/demo-tests.el
index 4080b5f9..e8bcb509 100644
--- a/test/demo-tests.el
+++ b/test/demo-tests.el
@@ -3,7 +3,7 @@
 ;; Author:       Mats Lidell <matsl@gnu.org>
 ;;
 ;; Orig-Date:    30-Jan-21 at 12:00:00
-;; Last-Mod:     30-Sep-26 at 17:04:16 by Bob Weiner
+;; Last-Mod:      6-Oct-26 at 01:07:57 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -266,7 +266,8 @@
     ;; Without this next let, default Org behavior may occur which
     ;; inserts a new heading when org-meta-return is called rather
     ;; than collapsing the existing tree of headings.
-    (let ((hsys-org-enable-smart-keys t))
+    (let ((hsys-org-enable-smart-keys t)
+          (smart-org-action-key-heading-function 'org-fold-hide-subtree))
       (insert "* 1\n** 2\n*** 3\n")
       (goto-char 1)
       (should (not (org-check-for-hidden 'headlines)))
diff --git a/test/smart-org-tests.el b/test/smart-org-tests.el
index 816524a1..cca7ad53 100644
--- a/test/smart-org-tests.el
+++ b/test/smart-org-tests.el
@@ -3,7 +3,7 @@
 ;; Author:       Mats Lidell <matsl@gnu.org>
 ;;
 ;; Orig-Date:    23-Apr-21 at 22:21:00
-;; Last-Mod:     14-Jul-26 at 01:12:06 by Bob Weiner
+;; Last-Mod:      6-Oct-26 at 01:15:43 by Bob Weiner
 ;;
 ;; SPDX-License-Identifier: GPL-3.0-or-later
 ;;
@@ -30,7 +30,8 @@
   "With smart keys on an outline header `smart-org' cycles visibility."
   (with-temp-buffer
     (let ((bn (buffer-name))
-          (hsys-org-enable-smart-keys t))
+          (hsys-org-enable-smart-keys t)
+          (smart-org-action-key-heading-function 'org-cycle))
       (org-mode)
       (insert "* 1\n** 2\n*** 3\n")
       (goto-char 1)