branch: scratch/hyperbole
commit 7d7ad7461fc06003dc687bc6118a0f02d0e60622
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 b1910c1b66..046afc16c5 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)))
