branch: externals/hyperbole commit 51171bbc52528448e610e55cb54883377fceec48 Author: Bob Weiner <r...@gnu.org> Commit: Bob Weiner <r...@gnu.org>
Remove additional byte-compile warnings --- ChangeLog | 6 ++++++ hactypes.el | 8 ++++++++ hrmail.el | 5 +++-- 3 files changed, 17 insertions(+), 2 deletions(-) diff --git a/ChangeLog b/ChangeLog index c8eeba4..544964a 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,9 @@ +2021-05-18 Bob Weiner <r...@gnu.org> + +* hrmail.el (rmail:msg-to-p): Alias to Rmail-msg-to-p for use in + in hactypes.el. + (require 'hvar): Add, used in Rmail-init. + * hpath.el (hpath:to-markup-anchor): Add support for path#anchor links in programming, text and outlining major modes. diff --git a/hactypes.el b/hactypes.el index 3ef7de2..78c4cdb 100644 --- a/hactypes.el +++ b/hactypes.el @@ -20,6 +20,14 @@ (require 'bookmark) ;;; ************************************************************************ +;;; Public declarations +;;; ************************************************************************ + +(declare-function kotl-mode:goto-cell "kotl-mode") +(declare-function kotl-mode:beginning-of-buffer "kotl-mode") +(declare-function rmail:msg-to-p "hrmail") + +;;; ************************************************************************ ;;; Standard Hyperbole action types ;;; ************************************************************************ diff --git a/hrmail.el b/hrmail.el index b8f7ebe..24a844c 100644 --- a/hrmail.el +++ b/hrmail.el @@ -24,7 +24,7 @@ ;;; Other required Elisp libraries ;;; ************************************************************************ -(eval-and-compile (mapc #'require '(hmail hact rmail rmailsum rmailedit))) +(eval-and-compile (mapc #'require '(hvar hmail hact rmail rmailsum rmailedit))) (load "hsmail") ;;; ************************************************************************ @@ -57,10 +57,11 @@ (rmail:init) ;; ;; Setup private abstract interface to mail reader-specific functions - ;; used in "hmail.el". + ;; used in "hmail.el" and "hactypes.el". ;; (defalias 'rmail:get-new 'rmail-get-new-mail) (defalias 'rmail:msg-forward 'rmail-forward) + (defalias 'rmail:msg-to-p 'Rmail-msg-to-p) ;; defined herein (defalias 'rmail:summ-msg-to 'rmail-summary-goto-msg) (defalias 'rmail:summ-new 'rmail-new-summary) (if (called-interactively-p 'interactive)