[elpa] externals/tempel db6847a7f9 56/82: Make temple-key a macro

[ELPA Syncer]

branch: externals/tempel
commit db6847a7f994e9f4d9a5f9f0cb37264fc84a8049
Author: Daniel Mendler <mail@daniel-mendler.de>
Commit: Daniel Mendler <mail@daniel-mendler.de>

    Make temple-key a macro
---
 tempel.el | 7 ++++---
 1 file changed, 4 insertions(+), 3 deletions(-)

diff --git a/tempel.el b/tempel.el
index cad63e0cfa..aa03aab2cd 100644
--- a/tempel.el
+++ b/tempel.el
@@ -425,11 +425,12 @@ If called interactively, select a template with 
`completing-read'."
                     (tempel--region))))
 
 ;;;###autoload
-(defun tempel-key (key name &optional map)
+(defmacro tempel-key (key name &optional map)
   "Bind KEY to NAME in MAP."
   (let ((cmd (intern (format "tempel-insert-%s" name))))
-    (fset cmd (lambda () (interactive) (tempel-insert name)))
-    (define-key (or map global-map) (kbd key) cmd)))
+    `(progn
+       (defun ,cmd () (interactive) (tempel-insert ',name))
+       (define-key ,(or map 'global-map) ,(kbd key) #',cmd))))
 
 (provide 'tempel)
 ;;; tempel.el ends here