[elpa] externals/tempel 04d4f6c055 55/82: Use named key function

[ELPA Syncer]

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

    Use named key function
    
    Proposed by @Luis-Henriquez-Perez
---
 tempel.el | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

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