branch: externals/hyperbole
commit 1c373cf5c7e60f8f0bc9f01ef6600458023d6aea
Author: Bob Weiner <r...@gnu.org>
Commit: Bob Weiner <r...@gnu.org>
Remove 'interactive-only property from kotl-mode cmds to silence
byte-compiler warnings
Eliminate a few other byte-compiler warnings
---
ChangeLog | 16 ++++++++++++++++
hui.el | 8 +++++++-
hycontrol.el | 3 ++-
kotl/kotl-mode.el | 6 ++++--
4 files changed, 29 insertions(+), 4 deletions(-)
diff --git a/ChangeLog b/ChangeLog
index d47b42a..d1a0b6b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,19 @@
+2021-05-15 Bob Weiner <r...@gnu.org>
+
+* hyperbole.el (make-directory-autoloads): Fix definition for Emacs 27.
+
+* hmouse-drv.el (hkey-ace-window-setup): Change global key setting
+ to use hkey-set-key instead to set in Hyperbole's minor mode map.
+
+* Makefile (autoloads): Change to use make-directory-autoloads.
+
+* kotl/kotl-mode.el (kotl-mode-map): Remove 'interactive-only property
+ from kotl-mode commands that overload standard editing commands
+ to suppress byte-compiler warnings that these are for interactive
+ use only.
+
+* hycontrol.el (hycontrol-windows-mode): Add to :group 'hyperbole-screen.
+
2021-05-14 Mats Lidell <ma...@gnu.org>
* hsmail.el (mail-reply-buffer): Declare variable.
diff --git a/hui.el b/hui.el
index 4cb49d0..ccac786 100644
--- a/hui.el
+++ b/hui.el
@@ -23,6 +23,12 @@
(eval-when-compile (require 'hactypes))
;;; ************************************************************************
+;;; Public declarations
+;;; ************************************************************************
+
+(declare-function texinfo-copy-node-name "texnfo-upd")
+
+;;; ************************************************************************
;;; Public variables
;;; ************************************************************************
@@ -32,7 +38,7 @@
:group 'hyperbole-buttons)
(defcustom hui:ebut-prompt-for-action nil
- "*Non-nil means prompt for a button-specific action when creating explicit
buttons."
+ "*Non-nil prompts for a button-specific action on explicit button creation."
:type 'boolean
:group 'hyperbole-buttons)
diff --git a/hycontrol.el b/hycontrol.el
index 074461a..18dc3a6 100644
--- a/hycontrol.el
+++ b/hycontrol.el
@@ -904,7 +904,8 @@ instead of quitting HyControl."
;;;###autoload
(define-global-minor-mode hycontrol-windows-mode hycontrol-local-windows-mode
- (lambda () (hycontrol-local-windows-mode 1)))
+ (lambda () (hycontrol-local-windows-mode 1))
+ :group 'hyperbole-screen)
;; These hooks run by the generated `hycontrol-windows-mode' function
;; do the global work of turning on and off the mode.
diff --git a/kotl/kotl-mode.el b/kotl/kotl-mode.el
index a5f8db0..f9eed0a 100644
--- a/kotl/kotl-mode.el
+++ b/kotl/kotl-mode.el
@@ -3095,8 +3095,10 @@ Leave point at end of line now residing at START."
;; been defined and cmd is a valid function.
(when (and local-cmd (fboundp cmd))
;; Make local-cmd have the same property list as cmd,
- ;; e.g. so pending-delete property is the same.
- (setplist local-cmd (symbol-plist cmd))
+ ;; e.g. so pending-delete property is the same, but delete
+ ;; interactive-only property to suppress byte-compiler warnings.
+ (setplist local-cmd (copy-list (symbol-plist cmd)))
+ (remprop local-cmd 'interactive-only)
(substitute-key-definition
cmd local-cmd kotl-mode-map global-map)))
'(
