How to write an function which exands or jumps?

[tbdcit]

I would like to bind "TAB" in tempel-map to a function which expands the snippet at the point, or if there is no match, call tempel-next.

Any suggestions on how to do this?

[tbdcit]

The following seems to work well.

(defun my/tempel-expand-or-jump ()
  (interactive)
    (if-let ((templates (tempel--templates))
             (bounds (tempel--prefix-bounds))
             (name (buffer-substring-no-properties
                    (car bounds) (cdr bounds)))
             (sym (intern-soft name))
             (template (assq sym templates)))
    (tempel-expand template)
  (tempel-next 1)))