[elpa] externals/hyperbole 03d26f0 2/3: ebut:program function - use 'actype:action' to generalize actype handling

[ELPA Syncer]

branch: externals/hyperbole
commit 03d26f021f9a17fe6652d795c84936b960af31a0
Author: Bob Weiner <rsw@gnu.org>
Commit: Bob Weiner <rsw@gnu.org>

    ebut:program function - use 'actype:action' to generalize actype handling
---
 ChangeLog | 4 ++++
 hbut.el   | 2 +-
 2 files changed, 5 insertions(+), 1 deletion(-)

diff --git a/ChangeLog b/ChangeLog
index 89d0922..1c420d3 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+2021-07-18  Bob Weiner  <rsw@gnu.org>
+
+* hbut.el (ebut:program): Use 'actype:action' to generalize actype handling.
+
 2021-07-17  Bob Weiner  <rsw@gnu.org>
 
 * hmouse-drv.el (hkey-either): Made prefix arg optional so can call 
programmatically
diff --git a/hbut.el b/hbut.el
index 10d1299..7d9fae5 100644
--- a/hbut.el
+++ b/hbut.el
@@ -421,7 +421,7 @@ the button LABEL which is automatically provided as the 
first argument.
 For interactive creation, use `hui:ebut-create' instead."
   (save-excursion
      (let ((but-buf (current-buffer))
-          (actype-sym (intern-soft (concat "actypes::" (symbol-name actype)))))
+          (actype-sym (actype:action actype)))
       (hui:buf-writable-err but-buf "ebut-create")
       (condition-case err
          (progn