[elpa] externals/hyperbole 81f44f61f5 1/3: Use defun for hact (#120)

[ELPA Syncer]

branch: externals/hyperbole
commit 81f44f61f5cf4a9bae4baa6e3bed736f8db62ecb
Author: Mats Lidell <mats.lidell@lidells.se>
Commit: GitHub <noreply@github.com>

    Use defun for hact (#120)
    
    * Use defun for hact
    
    * Update Changelog date due to rebase of old branch
---
 ChangeLog | 4 ++++
 hact.el   | 4 ++--
 2 files changed, 6 insertions(+), 2 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index be7da8b6d8..568e15ee3b 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2022-06-18  Mats Lidell  <matsl@gnu.org>
+
+* hact.el (hact): Use defun. Patch from Stefan Monnier. Thanks Stefan.
+
 2022-06-16  Mats Lidell  <matsl@gnu.org>
 
 * Makefile (hyperbole-autoloads.el, kotl/kotl-autoloads.el): Use
diff --git a/hact.el b/hact.el
index aa2c8ca1e0..edc16f2798 100644
--- a/hact.el
+++ b/hact.el
@@ -347,13 +347,13 @@ Autoloads action function if need be to get the parameter 
list."
 ;;; action type class, actype
 ;;; ========================================================================
 
-(defmacro hact (&rest args)
+(defun hact (&rest args)
   "Perform action formed from rest of ARGS and return the result.
 The value of `hrule:action' determines what effect this has.
 Alternatively act as a no-op when testing implicit button type contexts.
 First arg may be a symbol or symbol name for either an action type or a
 function.  Runs `action-act-hook' before performing action."
-  `(funcall hrule:action ,@args))
+  (apply hrule:action args))
 
 (defun    actype:act (actype &rest args)
   "Perform action formed from ACTYPE and rest of ARGS and return value.