Re: How to call org-set-property from a function

[Rasmus <rasmus@gmx.us>]

Hi Julien,


Julien Cubizolles <j.cubizolles@free.fr> writes:

> I have the following function to automate the creation of a new entry:
>
> #+begin_src emacs-lisp
>   (interactive)
>   (save-excursion
>     (org-beamer-select-environment)
>     (org-set-tags-command)
>     )
> #+end_src
>
> I'd like to add the possibility to set some properties through
> (org-set-property) but I can't figure out how to call it in its
> interactive way, so that it prompts me for a property and value ? Of
> course adding (org-set-property) or (interactive (org-set-property))
> doesn't work.

Does this do what you want:

     (call-interactively 'org-set-property) 

> Also, I will sometimes need to include several different
> properties. What would be the right way to run a loop where a new
> property is set until the user answers something like C-return at the
> prompt ?

Here's naive approach.  Probably you can find a more elegant way.

    (condition-case nil
        (while t
          (call-interactively 'org-set-property))
      (quit nil))

Rasmus

-- 
Spil noget med Slayer!