branch: externals/hyperbole
commit 3c6dcafe4fa7fc2a68733b16d5c819a5a1c3bf57
Author: Mats Lidell <[email protected]>
Commit: Mats Lidell <[email protected]>
Revert hunk, will be applied elsewhere
https://github.com/rswgnu/hyperbole/pull/343/files#r1237896903
---
hbut.el | 6 +-----
1 file changed, 1 insertion(+), 5 deletions(-)
diff --git a/hbut.el b/hbut.el
index a04cb21f64..048dc73ca0 100644
--- a/hbut.el
+++ b/hbut.el
@@ -1625,12 +1625,8 @@ associated arguments from the button."
(unless (string-match "::" type-name)
(setq ibut-type-symbol (intern-soft (concat "ibtypes::" type-name))))
(when ibut-type-symbol
- (let (;; (types (htype:category 'ibtypes))
+ (let ((types (htype:category 'ibtypes))
;; 'types' is a global var used in (hact) function, don't delete.
- ;; FIXME: I can't see where `types' is used as a global var
- ;; "in (hact) function", and the above binding was treated
- ;; by Emacs as lexically-scoped so it wasn't affecting any
- ;; other global `types' definition anyway.
(hrule:action 'actype:identity))
(funcall ibut-type-symbol))))))
