branch: scratch/hyperbole
commit 60cf4b3ab0ba7f73202c7f8f3ff8689c7af18218
Author: Stefan Monnier <monn...@iro.umontreal.ca>
Commit: Stefan Monnier <monn...@iro.umontreal.ca>
* hact.el: Fix broken lexical-binding cookie
---
hact.el | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/hact.el b/hact.el
index 39e468c62d..3d215beaf0 100644
--- a/hact.el
+++ b/hact.el
@@ -1,4 +1,4 @@
-;;; hact.el --- GNU Hyperbole button action handling -*- lexical-binding: t;
-let*-
+;;; hact.el --- GNU Hyperbole button action handling -*- lexical-binding: t;
-*-
;;
;; Author: Bob Weiner
;;
@@ -467,6 +467,7 @@ The type uses PARAMS to perform DEFAULT-ACTION (list of the
rest of the
arguments). A call to this function is syntactically the same as for
`defun', but a doc string is required.
Return symbol created when successful, else nil."
+ (declare (doc-string 3))
`(progn
(symtable:add ',type symtable:actypes)
(htype:create ,type actypes ,doc ,params ,default-action nil)))
