>>> "JK" == John Kitchin <jkitchin@andrew.cmu.edu> writes:

> there is nothing like that that I know of. You can write your own, in org
> (following Eric's use of radio targets) it might look like this.

> (defun my-heading ()
>   (interactive)
>   (let* ((title (string-trim (read-string "title: ")))
> (tokens (split-string title " " t))
> (label (format "<<sec:%s>>"
> (string-join
> (seq-take tokens (min 3 (length tokens)))
> "-"))))
>     (insert (format "%s %s" label title))))

> you could also insert the leading * if you prefer.

Aha! Brilliant thanks!
I will use
(format "%s %s" title label)
and think about inserting *.

I wonder why this was not implemented or asked for.

I googled but did not find anything.