Re: Turn function into interactive

["Berry, Charles" <ccberry@health.ucsd.edu>]

> On Dec 29, 2019, at 9:26 PM, Lawrence Bottorff <borgauf@gmail.com> wrote:
> 
> I've discovered org-outline-level which when in a code block under a given header delivers as expected:
> 
> * This old level
> #+BEGIN_SRC emacs-lisp
> (org-current-level)
> #+END_SRC
> 
> #+RESULTS:
> : 1
> 
> Now, how could I turn this into an interactive callable with M-x? My stab in the dark
> 
> (defun my-insert-level ()
>   (interactive)
>   (insert (org-outline-level)))

> doesn't seem to be working. 

It works, but just isn't what you wanted. ;-)

Note:

,----[ C-h f insert RET ]
| insert is a built-in function in ‘C source code’.
| 
| (insert &rest ARGS)
| 
| Insert the arguments, either strings or characters, at point.
| Point and after-insertion markers move forward to end up
|  after the inserted text.
| [...]
`-----


So try something like

(defun my-insert-level ()
  (interactive)
  (insert (format "%d" (org-outline-level))))

To insert a string.

HTH,

Chuck