branch: scratch/hyperbole
commit 73f076d5ad825d20d961d773436e5f6bcbc62dc6
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 df3faf1380..47cb66599f 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
;;
@@ -465,6 +465,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)))
